anchor.diff:          let binding = (a, id) @~> b
   
           a <~ 5
  -        Assert.True(!!b = 5)
  +        Assert.Equal(5, !!b)
   
           a <~ 6
  -        Assert.True(!!b = 6)
  +        Assert.Equal(6, !!b)
   
           binding.Dispose()
   
           a <~ 7
  -        Assert.True(!!b = 6)
  +        Assert.Equal(6, !!b)
   
       [<Fact>]
       let ``two-way binding should work`` () =
  
positive.code:             use binding = (a, id) <~@~> (b, id)
  
              a <~ 5
              Assert.True(!!b = 5)
              b <~ 6
              Assert.True(!!a = 6)
  
          a <~ 7
          Assert.True(!!b = 6)
  
      [<Fact>]
      let ``binding an observable to property should work`` () =
  
negative.code: 
          let vals = o.Take(3).ToEnumerable() |> Array.ofSeq
  
          Assert.Equal<int[]>([| 1; 2; 3 |], vals)
  