anchor.diff:  namespace FSharp.Data.GraphQL
   
   open System
  -open System.IO
   open System.Security.Cryptography
   open FSharp.Core
   open System.Reflection
  
positive.code:                         (name, mapper %%value) @@>
                  let args =
                      let names = variables |> List.map fst
                      let args = 
                          match contextInfo with
                          | Some _ ->
                              match args with
                              | _ :: tail when tail.Length > 0 -> List.take (tail.Length - 1) tail
                              | _ -> []
                          | None ->
                              match args with
                              | _ :: _ :: tail when tail.Length > 0 -> tail
                              | _ -> []
                      List.zip names args |> List.map exprMapper
                  Expr.NewArray(typeof<string * obj>, args)
              let defaultContextExpr = 
  
negative.code: module internal ProvidedRecord =
      let ctor = typeof<RecordBase>.GetConstructors().[0]
  
      let makeProvidedType(tdef : ProvidedRecordTypeDefinition, properties : RecordPropertyMetadata list) =
          let name = tdef.Name
          let propertyMapper (metadata : RecordPropertyMetadata) : MemberInfo =
  