anchor.diff:                      |> Array.unzip
   
                   sb.Clear() |> ignore
  -                ~~(sprintf "INSERT INTO %s " (entity.Table.FullName.Replace("[","\"").Replace("]","\"")))
  +                ~~(sprintf "INSERT INTO \"%s\".\"%s\" " entity.Table.Schema entity.Table.Name)
   
                   match columnNames with
                   | [||] -> ~~(sprintf "DEFAULT VALUES")
                   | _ -> ~~(sprintf "(%s) VALUES (%s)"
  -                           (String.Join(",",columnNames))
  +                           (String.Join(",",columnNames |> Array.map (fun c -> sprintf "\"%s\"" c)))
                              (String.Join(",",values |> Array.map(fun p -> p.ParameterName))))
   
  -                ~~(sprintf " RETURNING %s;" pk)
  +                ~~(sprintf " RETURNING \"%s\";" pk)
   
                   values |> Array.iter (cmd.Parameters.Add >> ignore)
                   cmd.CommandText <- sb.ToString()
  
positive.code:         /// Have not attempted stored procs yet
          member __.GetSprocs(con) = Sql.connect con PostgreSQL.getSprocs 
  
          member this.GetIndividualsQueryText(table,amount) = sprintf "SELECT * FROM %s LIMIT %i;" (table.FullName.Replace("[","\"").Replace("]","\"")) amount 
  
          member this.GetIndividualQueryText(table,column) = sprintf "SELECT * FROM \"%s\".\"%s\" WHERE \"%s\".\"%s\".\"%s\" = @id" table.Schema table.Name table.Schema table.Name  column
  
  
negative.code:                 let p = (this :> ISqlProvider).CreateCommandParameter(QueryParameter.Create("@id",0),pkValue)
  
                  cmd.Parameters.Add(p) |> ignore
                  ~~(sprintf "DELETE FROM \"%s\".\"%s\" WHERE %s = @id" entity.Table.Schema entity.Table.Name pk )
                  cmd.CommandText <- sb.ToString()
                  cmd
  
  