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

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

text i
int a, b, c

tbl.sort()

text name = 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(name)
    name = tbl.inc().toText()
    print name
/do forever

print a, b, c