anchor.diff:          let ro =
             smap.Value
             |> Nessos.Streams.Stream.ofSeq
  -          |> Nessos.Streams.Stream.map (fun x -> x.Value + 123456.0)
  -          |> Nessos.Streams.Stream.map (fun x -> x/789.0)
  -          |> Nessos.Streams.Stream.map (fun x -> x*10.0)
  +          |> Nessos.Streams.Stream.map (fun x -> x.Value + 123456.0f)
  +          |> Nessos.Streams.Stream.map (fun x -> x/789.0f)
  +          |> Nessos.Streams.Stream.map (fun x -> x*10.0f)
             |> Nessos.Streams.Stream.toSeq
           
           for i in ro do
  
positive.code:     for i in 0..9 do
        let mutable res = Unchecked.defaultof<_>
        perf count "Series Add/divide Chained" (fun _ ->
          let ro = smap.Value.Map(fun x -> x + 123456.0).Map(fun x -> x/789.0).Map(fun x -> x*10.0)
          for i in ro do
            res <- i.Value
            ()
        )
        if res < 0.0 then failwith "avoid gc" 
        ()
  
  
      for i in 0..9 do
        perf count "Series Add/Delete Inline" (fun _ ->
          let ro = smap.Value.Map(fun k x -> ((x + 123456.0)/789.0)*10.0)
          for i in ro do
            let res = i.Value
            ()
  
negative.code: 
      for i in 0..9 do
        perf count "LINQ Add/Delete Inline" (fun _ ->
          let ro = smap.Value.Select(fun x -> KVP(x.Key, ((x.Value + 123456.0f)/789.0f)*10.0f))
          for i in ro do
            let res = i
            ()
  