anchor.diff:  
   
       [<Test>]
  -    [<Repeat(4)>]
  +    [<Repeat(repeats)>]
       let ``Parallel : exception contention`` () =
           let latch = Latch.Init(0)
           cloud {
  
positive.code: 
  
      [<Test>]
      [<Repeat(4)>]
      let ``Parallel : to local`` () =
          // check local semantics are forced by using ref cells.
          cloud {
  
negative.code:         } |> run |> Choice.shouldEqual 20
  
      [<Test>]
      [<Repeat(repeats)>]
      let ``Parallel : to sequential`` () =
          // check sequential semantics are forced by deliberately
          // making use of code that is not thread-safe.
  