anchor.diff:              entry.Info.CancellationTokenSource.Token
           
           member x.Result: 'T = x.Result
  -        
  -        member x.Status: CloudProcessStatus = cell.Value.Status
  -        
  +        member x.Status: CloudProcessStatus = cell.Value.State.Status
           member x.TryGetResult(): Async<'T option> = x.TryGetResult()
   
   /// Cloud Process client object
  
positive.code:         member __.Dispose() = clients.TryRemove runtime.Id |> ignore
          
           
  and internal CloudProcessReporter() = 
      static let template : Field<CloudProcess> list = 
          [ Field.create "Name" Left (fun p -> match p.Name with Some n -> n | None -> "")
            Field.create "Process Id" Right (fun p -> p.Id)
            Field.create "Status" Right (fun p -> sprintf "%A" p.Status)
            Field.create "Execution Time" Left (fun p -> Option.toNullable p.ExecutionTime)
            Field.create "Work items" Center (fun p -> sprintf "%3d / %3d / %3d / %3d"  p.ActiveWorkItems p.FaultedWorkItems p.CompletedWorkItems p.TotalWorkItems)
            Field.create "Result Type" Left (fun p -> Type.prettyPrintUntyped p.Type) 
            Field.create "Start Time" Left (fun p -> p.StartTime |> Option.map (fun d -> d.LocalDateTime) |> Option.toNullable)
            Field.create "Completion Time" Left (fun p -> p.CompletionTime |> Option.map (fun d -> d.LocalDateTime) |> Option.toNullable)
          ]
      
      static member Report(processes : seq<CloudProcess>, title : string, borders : bool) = 
          let ps = processes 
                   |> Seq.sortBy (fun p -> p.StartTime)
                   |> Seq.toList
  
negative.code:     let [<DataMember(Name = "ProcessCompletionSource")>] entry = source
      let [<DataMember(Name = "RuntimeId")>] runtimeId = runtime.Id
  
      let mkCell () = CacheAtom.Create(CloudProcessData.OfCloudProcessEntry entry, intervalMilliseconds = 500)
  
      let [<IgnoreDataMember>] mutable lockObj = new obj()
      let [<IgnoreDataMember>] mutable cell = mkCell()
  