anchor.diff:          | Distributed id -> Some id.UUID
           | _ -> None
   
  -    /// System.Threading.Token for distributed cancellation token
  -    member __.LocalToken = getLocalToken()
  -
       /// Cancel cancellation token
       member __.Cancel() =
           if (let t = __.LocalToken in t.IsCancellationRequested) then ()
  
positive.code: 
      /// Wraps a CancellationEntry instance into a new CloudCancellationToken
      static member FromEntry(entry : ICancellationEntry) =
          new CloudCancellationToken(Distributed entry)
negative.code:                 | Canceled _ -> ()
                  | Localized _ -> localCancellationTokenSource.Cancel()
                  | Distributed token -> token.Cancel() |> Async.RunSync)
  
      member x.IsCancellationRequested = let t = getLocalToken() in t.IsCancellationRequested
  
      /// System.Threading.Token for distributed cancellation token
      member __.LocalToken = getLocalToken()
  
      interface ICloudCancellationToken with
          member x.IsCancellationRequested: bool = let t = getLocalToken() in t.IsCancellationRequested
  