1
0
forked from GitHub/gf-rgl

Merge remote-tracking branch 'upstream/master' into por-passive

This commit is contained in:
odanoburu
2018-05-10 17:29:51 +00:00
6 changed files with 121 additions and 149 deletions

View File

@@ -17,13 +17,7 @@ resource MorphoCat = CommonRomance, ResCat **
--2 Nouns --2 Nouns
-- --
-- The following macro is useful for creating the forms of number-dependent
-- tables, such as common nouns.
-- gcc M2.3
oper oper
numForms : (_,_ : Str) -> Number => Str = \vi, vins ->
table {Sg => vi ; Pl => vins} ;
nomCep : Str -> Number => Str = \cep -> nomCep : Str -> Number => Str = \cep ->
numForms cep (cep + "s") ; numForms cep (cep + "s") ;

View File

@@ -24,15 +24,8 @@ oper
--2 Nouns --2 Nouns
--
-- The following macro is useful for creating the forms of number-dependent
-- tables, such as common nouns.
numForms : Str -> Str -> Number => Str = \bon,bons ->
table {Sg => bon ; Pl => bons} ;
-- For example, the regular noun forms are defined as follows:
-- regular noun forms are defined as follows:
nomReg : Str -> Number => Str = \bu -> numForms bu (bu + "s") ; nomReg : Str -> Number => Str = \bu -> numForms bu (bu + "s") ;
-- Common nouns are inflected in number and have an inherent gender. -- Common nouns are inflected in number and have an inherent gender.

View File

@@ -18,15 +18,7 @@ resource MorphoIta = CommonRomance, ResIta **
--2 Nouns --2 Nouns
-- --
-- The following macro is useful for creating the forms of number-dependent
-- tables, such as common nouns.
oper oper
numForms : (_,_ : Str) -> Number => Str = \vino, vini ->
table {Sg => vino ; Pl => vini} ;
-- For example:
nomVino : Str -> Number => Str = \vino -> let {vin = Predef.tk 1 vino} in nomVino : Str -> Number => Str = \vino -> let {vin = Predef.tk 1 vino} in
numForms vino (vin + "i") ; numForms vino (vin + "i") ;

View File

@@ -19,9 +19,6 @@ resource MorphoPor = CommonRomance, ResPor **
-- number-dependent tables, such as common nouns. -- number-dependent tables, such as common nouns.
oper oper
numForms : (_,_ : Str) -> Number => Str = \campus, campi ->
table {Sg => campus ; Pl => campi} ;
-- For example: -- For example:
nomVinho : Str -> Number => Str = \vinho -> nomVinho : Str -> Number => Str = \vinho ->
numForms vinho (vinho + "s") ; numForms vinho (vinho + "s") ;

View File

@@ -205,6 +205,11 @@ oper
Fem => bonne Fem => bonne
} ; } ;
-- The following macro is useful for creating the forms of
-- number-dependent tables, such as common nouns.
numForms : (_,_ : Str) -> Number => Str = \campus, campi ->
table {Sg => campus ; Pl => campi} ;
aagrForms : (x1,_,_,x4 : Str) -> (AAgr => Str) = \tout,toute,tous,toutes -> aagrForms : (x1,_,_,x4 : Str) -> (AAgr => Str) = \tout,toute,tous,toutes ->
table { table {
{g = g ; n = Sg} => genForms tout toute ! g ; {g = g ; n = Sg} => genForms tout toute ! g ;
@@ -241,4 +246,3 @@ oper
param RPolarity = RPos | RNeg Bool ; -- RNeg True = "ne", RNeg False = "ne - pas" param RPolarity = RPos | RNeg Bool ; -- RNeg True = "ne", RNeg False = "ne - pas"
} }

View File

@@ -17,16 +17,8 @@ resource MorphoSpa = CommonRomance, ResSpa **
--2 Nouns --2 Nouns
--
-- The following macro is useful for creating the forms of number-dependent
-- tables, such as common nouns.
oper oper
numForms : (_,_ : Str) -> Number => Str = \vino, vini ->
table {Sg => vino ; Pl => vini} ;
-- For example:
nomVino : Str -> Number => Str = \vino -> nomVino : Str -> Number => Str = \vino ->
numForms vino (vino + "s") ; numForms vino (vino + "s") ;