> seq { printfn "Generating outer seq"; yield seq { printfn "Generating inner seq 1"; yield 1.0; }; yield seq { printfn "Generating inner seq 2"; yield 2.0; } } |> flatten;;
Generating outer seq
Generating inner seq 1
Generating inner seq 1
Generating inner seq 2
Generating inner seq 2
Generating inner seq 2
val it : seq<float> = seq [1.0; 1.5; 2.0]