array tbl = array("alice", "dick", "barnabe",
           "donald", "amanda")

text initiale(text prenom)
  if prenom = "" return ""
return prenom[0]

text i
int a, b, c

tbl.sort()

text prenom = tbl.begin().toText()

do
  case i = "a":
    a + 1
  case i = "b":
    b + 1
  case i = "c":
    c + 1
  case i = "d":
    break
  always:
    i = initiale(prenom)
    prenom = tbl.inc().toText()
    print prenom
/do forever

print a, b, c