anchor.diff:              fromGenShrink ( Gen.sized (fun n -> Gen.choose (-n,n)),
                               shrinkNumber)
   
  -        ///Generate arbitrary int32 that is between Int32.MinValue and Int32.MaxValue
  +        ///Generate arbitrary int32 that is unrestricted by size.
           [<Obsolete("Renamed to DoNotSizeInt32.")>]
           static member DontSizeInt32() =
               //let gen = Gen.choose(Int32.MinValue, Int32.MaxValue) doesn't work with random.fs, 
  
positive.code:             fromGenShrink(gen, shrink)
              |> convert DoNotSize DoNotSize.Unwrap
  
          ///Generate arbitrary int32 that is between Int32.MinValue and Int32.MaxValue
          static member DoNotSizeInt32() =
              //let gen = Gen.choose(Int32.MinValue, Int32.MaxValue) doesn't work with random.fs, 
              //so using this trick instead
  
negative.code:             from<int>
              |> convert (abs >> uint64) int
  
          ///Generate arbitrary uint64 that is unrestricted by size.
          [<Obsolete("Renamed to DoNotSizeUInt64.")>]
          static member DontSizeUInt64() =
              let gen =
  