bug fix in French verbs

This commit is contained in:
aarne
2005-02-15 21:31:00 +00:00
parent 7985de3252
commit 9fa3db48bc
6 changed files with 11 additions and 10 deletions

View File

@@ -38,7 +38,7 @@ lincat
N2 = Function ;
-- = CommNounPhrase ** {s2 : Preposition} ;
N3 = Function ** {s3 : Preposition} ;
Num = {s : Case => Str} ;
Num = {s : Case => Str ; n : Number} ;
Prep = {s : Str} ;
A = Adjective ;

View File

@@ -28,4 +28,4 @@ lin pot2as3 n = n ;
lin pot3 n = {s = n.s ++ "thousand"} ;
lin pot3plus n m = {s = n.s ++ "thousand" ++ m.s} ;
}
}