Consonants solutions

Consonants was solved using Lisp by 3 contestants. Solution sizes: average 937 bytes (shortest: 555; longest: 1609).