RosettaCodeData/Task/Loop-over-multiple-arrays-simultaneously/F-Sharp/loop-over-multiple-arrays-simultaneously.fs

for c1,c2,n in Seq.zip3 ['a';'b';'c'] ['A';'B';'C']
[1;2;3] do
  printfn "%c%c%d" c1 c2 n