removed gfcc via gfc everywhere; workaround for russian in present

This commit is contained in:
aarne
2007-12-13 22:05:14 +00:00
parent 095018c8e4
commit 3dca8b78d7
7 changed files with 56 additions and 534 deletions

View File

@@ -196,7 +196,10 @@ oper
case t of { Present => VPresent p ; PastRus => VPast; Future => VFuture p } ;
getTense : Tense -> RusTense= \t ->
case t of { Pres => Present ; Fut => Future; _ => PastRus} ;
case t of { Pres => Present
; Fut => Future --# notpresent
; _ => PastRus --# notpresent
} ;
getVoice: VerbForm -> Voice = \vf ->