finishing verbs; bug fixes in comp

This commit is contained in:
aarne
2004-11-27 08:13:45 +00:00
parent b299e79109
commit 4564fd2f99
6 changed files with 6641 additions and 6635 deletions

View File

@@ -882,10 +882,12 @@ oper
conj3choir : Str -> Verbe = \choir ->
let {
ch = Predef.tk 3 choir ;
tchoir = auxConj3usS "oi" "oy" "oi" "" (variants {"oir" ; "err"}) "oi" "oy" ""
e = Predef.tk 5 choir ;
tchoir =
auxConj3usS "choi" "choy" "choi" "ch"
(variants {"choir" ; "cherr"}) "choi" "choy" "ch"
} in
\\p => ch + tchoir ! p ;
\\p => e + tchoir ! p ;
conj3échoir : Str -> Verbe = \échoir ->
let {techoir = conj3choir échoir} in