fork download
  1. let indices = Seq.unfold (fun x -> Some(x, x + 1)) 0
  2.  
  3. let zipWithIndex coll = Seq.zip coll indices
  4. let x = [12; 8; 9; 90; 3; 24] |> zipWithIndex
  5. printfn "%A" (Seq.minBy fst x)
Success #stdin #stdout 0.2s 12616KB
stdin
Standard input is empty
stdout
(3, 4)