anchor.diff:          { requestContext : RequestContext; response : IRestResponse; data: JObject}
           member this.Parse<'T>() = 
               this.data.ToObject<'T>()
  +        
           member this.Follow (next:Follow) rest : RequestContext = 
               let nextUrl = this.data.["_links"].[next.rel].Value<string>("href") 
               let nextUrlSegments = next.urlSegments
  
positive.code:                         p.Type <- ParameterType.UrlSegment
                          p
                      )
  
              let newRp = {rp with follow = rp.follow @ [{rel=rel; urlSegments=segments}]}
              {this with requestParameters = newRp}
  
negative.code:                 let! response = this.GetAsync()
                  return response.Parse<'T>()
              }
          
          member private this.getUrlSegments(urlSegments: (string*string) list) : Parameter list = 
              let segments = 
                  urlSegments 
                  |> List.map (
  