diff --git a/src/catalan/ParadigmsCat.gf b/src/catalan/ParadigmsCat.gf index eb662765..ada9ec08 100644 --- a/src/catalan/ParadigmsCat.gf +++ b/src/catalan/ParadigmsCat.gf @@ -139,6 +139,12 @@ oper mkPN : N -> PN ; } ; + mkLN : Str -> LN = \s -> + lin LN {s = s ; + p = {s=""; c=CPrep P_a; isDir=True} ; + art = NoArt ; + g = Masc ; + num = Sg} ; --2 Adjectives diff --git a/src/italian/ParadigmsIta.gf b/src/italian/ParadigmsIta.gf index 759f10ad..bfd39385 100644 --- a/src/italian/ParadigmsIta.gf +++ b/src/italian/ParadigmsIta.gf @@ -145,6 +145,12 @@ oper mkPN : N -> PN ; -- get gender from noun } ; + mkLN : Str -> LN = \s -> + lin LN {s = s ; + p = {s=""; c=CPrep P_a; isDir=True} ; + art = NoArt ; + g = Masc ; + num = Sg} ; --2 Adjectives diff --git a/src/portuguese/ParadigmsPor.gf b/src/portuguese/ParadigmsPor.gf index e46ad496..f183220d 100644 --- a/src/portuguese/ParadigmsPor.gf +++ b/src/portuguese/ParadigmsPor.gf @@ -206,6 +206,13 @@ oper = \n -> lin PN {s = n.s ! Sg ; g = n.g} ; } ; + mkLN : Str -> LN = \s -> + lin LN {s = s ; + p = {s=""; c=CPrep P_a; isDir=True} ; + art = NoArt ; + g = Masc ; + num = Sg} ; + --2 Adjectives compADeg : Adj -> A ; --% compADeg a = lin A