How to get current sequence number in iteration in F #?

Question

Consider the following code to demonstrate the question:

let sequence = Seq.initInfinite (fun _ -> "Element")
Seq.iter (fun _ -> printf "Element no:?") Sequence 

Is there any way to get the current serial number (for example, its rank) for printing?

Answer 1

Use the iteri function :

let sequence = Seq.initInfinite (fun _ -> "Element")
sequence |> Seq.iteri (fun i _ -> printfn "Element no. %d" i)