word
  := syll cons end
   | init penult end
   | init syll penult end
   | init syll syll penult end
   ;

syll := cons vowel;
init := 4: cons vowel | 4: vowel | vowel cons vowel;
penult := cons vowel cons;

end ::= el ael as as as es us us em em um um arm
        is os os os on at ar or or ir o a a a;
cons ::= b g t t t d d h v v z z z ch j x c c c
         l l l m n s s s p f r r r s;
vowel := 3: 'a'| 2: 'i' | 'u' | 2: 'e' | 'o' | 3: 'æ';

puts word;