1
0
forked from GitHub/gf-rgl

*** empty log message ***

This commit is contained in:
janna
2004-01-30 16:01:15 +00:00
parent 50c9ee9041
commit faf3edb236
3 changed files with 159 additions and 23 deletions

View File

@@ -163,6 +163,7 @@ oper
nEau = \eau -> mkN eau (eau + "z") ;
nCas = \cas -> mkN cas cas ;
nReg = \cas -> mkN cas (cas + "s") ;
nCheval = \cheval -> mkN cheval (Predef.tk 1 cheval + "ux") masculine ;
funPrep = \n,p -> n ** complement p ** {lock_Fun = <>} ;