let indices = Seq.unfold (fun x -> Some(x, x + 1)) 0
let zipWithIndex coll = Seq.zip coll indices
let x = [12; 8; 9; 90; 3; 24] |> zipWithIndex
printfn "%A" (Seq.minBy fst x)
bGV0IGluZGljZXMgPSBTZXEudW5mb2xkIChmdW4geCAtPiBTb21lKHgsIHggKyAxKSkgMAoKbGV0IHppcFdpdGhJbmRleCBjb2xsID0gU2VxLnppcCBjb2xsIGluZGljZXMKbGV0IHggPSBbMTI7IDg7IDk7IDkwOyAzOyAyNF0gfD4gemlwV2l0aEluZGV4CnByaW50Zm4gIiVBIiAoU2VxLm1pbkJ5IGZzdCB4KQ==