for i = 1 to 5 do printf "Hello" done

#light
open System

for i = 1 to 5 do printf "Hello" done

dotimes 5 (fun () -> printf "Hello")

#light
open System

let rec dotimes n f =
match n with
| 0 -> ()
| _ -> f() ; dotimes (n - 1) f

dotimes 5 (fun () -> printf "Hello")

// Repetition via ranging over a List type(index ignored)
for _ in list do printf "Hello" done

#light
open System

let list = [1 .. 5]

// Repetition via ranging over a List type(index ignored)
for _ in list do printf "Hello" done

// The following examples are equivalent to the above code:
//
// List.iter (fun _ -> printf "Hello") list
//
// list |> List.iter (fun _ -> printf "Hello")

// Repetition via ranging over a Sequence type(index ignored)
for _ in sequence do printf "Hello" done

#light
open System

let sequence = {1 .. 5}

// Repetition via ranging over a Sequence type(index ignored)
for _ in sequence do printf "Hello" done

// The following examples are equivalent to the above code:
//
// Seq.iter (fun _ -> printf "Hello") sequence
//
// sequence |> Seq.iter (fun _ -> printf "Hello")

// Repetition via ranging over an Array type(index ignored)
for _ in array do printf "Hello" done

#light
open System

let array = [|1 .. 5|]

// Repetition via ranging over an Array type(index ignored)
for _ in array do printf "Hello" done

// The following examples are equivalent to the above code:
//
// Array.iter (fun _ -> printf "Hello") array
//
// array |> Array.iter (fun _ -> printf "Hello")