anchor.diff:                                   || (v.Second = 0 && v.Minute = 0) 
                                    || (v.Second = 0 && v.Minute = 0 && v.Hour = 0) )
   
  -    [<Property>]
  +    [<Fact>]
       let ``TimeSpan``() =
           generate<TimeSpan> |> sample 10 |> List.forall (fun _ -> true)
   
  
positive.code:     let Flags (value:TestFlags) =
          List.exists (fun e -> e = int value) [0;1;2;3;4;5;6;7]
  
      [<Property>]
      let ``Generic List``() =
          generate<List<int>> |> sample 10 |> List.forall (fun _ -> true)
  
      [<Property>]
      let ``Generic IList``() =
          generate<IList<int>> |> sample 10 |> List.forall (fun _ -> true)
  
  
negative.code:         shrink value 
          |> Seq.forall (fun l -> l.Count <= value.Count)
  
      [<Fact>]
      let ``Generic ICollection``() =
          generate<ICollection<int>> |> sample 10 |> List.forall (fun _ -> true)
  
  