anchor.diff:          taskCount.Value |> should equal 0
   
       [<Test>]
  -    [<Repeat(4)>]
  +    [<Repeat(repeats)>]
       let ``Choice : to local`` () =
           // check local semantics are forced by using ref cells.
           cloud {
  
positive.code: 
  
      [<Test>]
      [<Repeat(4)>]
      let ``Parallel : exception cancellation`` () =
          cloud {
              let latch = Latch.Init 0
  
negative.code:         } |> run |> Choice.shouldMatch(fun i -> i < 5)
  
      [<Test>]
      [<Repeat(repeats)>]
      let ``Parallel : nested exception cancellation`` () =
          cloud {
              let latch = Latch.Init 0
  