anchor.diff:      override __.IdentifierTypeAnnotation (canonicalDataCase, key, _) =
           match key with
           | "expected" ->
  -            match canonicalDataCase.Input.["target"].ToObject<int64>() with
  -            | 0L -> Some "int list option"
  +            match canonicalDataCase.Input.["target"].ToObject<int>() with
  +            | 0 -> Some "int list option"
               | _  -> None
           | _ -> None
   
  
positive.code:                     
                      sprintf "let %s = reactor.createComputeCell %s (fun values -> %s)" cellName inputParams funBody
                  | "input" -> 
                      let initialValue = cellValue.["initial_value"].ToObject<int64>()
                      sprintf "let %s = reactor.createInputCell %s" cellName (renderObj initialValue)
                  | _ -> ""
              )
  
negative.code: 
      let renderAllergicToAssert canonicalDataCase (jToken: JToken) =
          let substance = renderAllergenEnum jToken.["substance"]
          let score = canonicalDataCase.Input.["score"].ToObject<int>()
          let sut = sprintf "allergicTo %d %s" score substance
          let expected = jToken.Value<bool>("result") |> Bool.render
          
  