let myMap = [ ("Hello", 1); ("World", 2); ("!", 3) ]

for k, v in myMap do
  printfn "%s -> %d" k v