anchor.diff:          let wlA1 = WrappedListA [1..10]
           let testVal = filter ((=)2) wlA1
           Assert.AreEqual (testVal, WrappedListA [2])
  -        Assert.IsInstanceOf (typeof<Option<WrappedListA<int>>>, Some testVal)
  +        Assert.IsInstanceOf<Option<WrappedListA<int>>> (Some testVal)
   
       [<Test>]
       member x.foldAternatives() = 
  
positive.code: 
          let testVal = [1;2] |+| [10;20] |+| [100;200] |+  2
          Assert.AreEqual ([113; 213; 123; 223; 114; 214; 124; 224], testVal)
          Assert.IsInstanceOf (typeof<Option<list<int>>>, Some testVal)
  
  
      [<Test>]
  
negative.code:         Assert.AreEqual (toList (run res9n5), toList (run' res9n5'))
  
  
  // Idiom brackets from http://www.haskell.org/haskellwiki/Idiom_brackets
  type Ii = Ii
  type Ji = Ji
  type J = J
  type Idiomatic = Idiomatic with
      static member inline ($) (Idiomatic, si) = fun sfi x -> (Idiomatic $ x) (sfi <*> si)
      static member        ($) (Idiomatic, Ii) = id
  
  type Applicative with
      [<Test>]
  