anchor.diff:                  |> Async.RunSynchronously
           
           let embedded = resource.data.["_embedded"]
  -
  -        Assert.IsNotNull embedded
  +        embedded |> should not' (be Null)
   
           let target = embedded.["card"]
  -        Assert.IsNotNull target
  +        target |> should not' (be Null)
   
           let ne = Newtonsoft.Json.Linq.JObject.Parse("{foo:20}")
           let wn = Newtonsoft.Json.Linq.JObject.Parse("{foo:20, _embedded:null}") //pain
  
positive.code: 
          let body = resource.Parse<CardHolderDetails>()
          
          let ignored = Assert.AreEqual("Johny", body.name)
          Assert.AreEqual("lala", body.anotherCard.idAgain)
  
      [<Test>]
      member test.``should post form to sever and parse body nicely (if you want)`` () = 
  
negative.code:                 .Follow("register")
                  .DeleteAsync(newData) |> Async.RunSynchronously
          
          let locationHeader = resource.response.Headers.GetValues("Location") |> Seq.head
  
          resource.response.StatusCode === HttpStatusCode.OK
          locationHeader === "/api/cardholders" 
  
      [<Test>]
      member test.``should follow location header`` () =
  