anchor.diff:        toolId = id }
   
   let parseTags (tagsAsString: string) =
  -    let items = 
  +    let items =
           Newtonsoft.Json.JsonConvert.DeserializeObject<RfidReads[]>(tagsAsString)
           |> Array.sortBy (fun x -> x.timestamp)
           |> Array.rev
  
positive.code:     async {
          let! str = AsyncHttp "http://192.168.1.112/reads.json"
          return str
      } 
      |> Async.StartAsTask
  
negative.code: open System.Net
  
  type ToolEntry =
      { toolName: string
        toolId : string }
  
  type RfidReads =
  