anchor.diff:              |> runOnCloud 
               |> Choice.shouldBe (function Some r -> expected.Contains r | None -> Set.isEmpty expected)
   
  -        Check.QuickThrowOnFail(checker, maxRuns = self.FsCheckMaxTests)
  +        Check.QuickThrowOnFail(checker, maxRuns = __.FsCheckMaxTests)
   
       [<Test>]
       member __.``2. Choice : all inputs 'None'`` () =
  
positive.code:         } |> runOnCloud |> Choice.shouldEqual (Seq.init parallelismFactor (fun i -> i + 1) |> Seq.sum)
  
      [<Test>]
      member __.``1. Parallel : random inputs`` () =
          let checker (ints:int[]) =
              if ints = null then () else
  
negative.code:                 return! Seq.init ints.Length f |> Cloud.Parallel
              } |> runOnCloud |> Choice.shouldEqual ints
  
          Check.QuickThrowOnFail(checker, maxRuns = __.FsCheckMaxTests)
  
      [<Test>]
      member __.``1. Parallel : use binding`` () =
  