add TypeProviderUser.TSQL.fsproj with a set of tests running on sql server

[smoothdeveloper]

note that

[<Test>]
let ``test raw sql parameter`` () =
    let results =
        RawSQLQuery.Command(whereClause = [| sql "1="; arg 1 |]) |> runOnTestData
    for result in results do
        printfn "%A" result.Email

is failing due to this code being generated (apparently invalid TSQL):

use rzsql
declare @RZSQL_INLINE_0 int = 1
SELECT
[Users].[Created]
, [Users].[Email]
, [Users].[Id]
, [Users].[Name]
, [Users].[ProfilePictureSHA256]
, [Users].[RandomId]
FROM [Users]
WHERE ((1=@RZSQL_INLINE_0)<>0);