anchor.diff:  namespace Giraffe.Serialization
  -
  -open FSharp.Control.Tasks.V2
   
   // ---------------------------
   // JSON
  
positive.code:                 JsonConvert.SerializeObject(x, settings)
                  |> Encoding.UTF8.GetBytes
  
              member __.SerializeToStreamAsync (x : 'T) (stream : Stream) =
                  let memoryStream = new MemoryStream()
                  let streamWriter = new StreamWriter(memoryStream, Utf8EncodingWithoutBom)
                  let jsonTextWriter = new JsonTextWriter(streamWriter)
                  serializer.Serialize(jsonTextWriter, x)
                  memoryStream.CopyToAsync(stream)
  
              member __.Deserialize<'T> (json : string) =
                  JsonConvert.DeserializeObject<'T>(json, settings)
  
negative.code:                 JsonConvert.DeserializeObject<'T>(json, settings)
  
              member __.DeserializeAsync<'T> (stream : Stream) = task {
                  use memoryStream = new MemoryStream()
                  do! stream.CopyToAsync(memoryStream)
                  memoryStream.Seek(0L, SeekOrigin.Begin) |> ignore
                  use streamReader = new StreamReader(memoryStream)
                  use jsonTextReader = new JsonTextReader(streamReader)
                  return serializer.Deserialize<'T>(jsonTextReader)
              }
  // ---------------------------
  