treebank creating script; duplicated consonants in LexiconEng

This commit is contained in:
aarne
2006-03-04 14:58:11 +00:00
parent 277a333a02
commit ee26cf955b
9 changed files with 70 additions and 16 deletions

View File

@@ -114,7 +114,7 @@ pCommand ws = case ws of
"cc" : s -> aUnit $ CComputeConcrete $ unwords s
"so" : s -> aUnit $ CShowOpers $ unwords s
"tb" : [] -> aUnit CTreeBank
"lt" : s -> aString CLookupTreebank s
"ut" : s -> aString CLookupTreebank s
"tq" : i:o:[] -> aUnit (CTranslationQuiz (language i) (language o))
"tl":i:o:[] -> aUnit (CTranslationList (language i) (language o))