GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-05-27 17:08:54 -06:00
Code Issues Packages Projects Releases Wiki Activity

mkLN in Catalan, Italian and Portuguese

Browse Source
This commit is contained in:
Krasimir Angelov
2023-08-07 15:59:19 +02:00
parent fb48791d6a
commit 1b696739be
3 changed files with 19 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/catalan/ParadigmsCat.gf
View File

@@ -139,6 +139,12 @@ oper
mkPN : N -> PN ; 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 --2 Adjectives

6
src/italian/ParadigmsIta.gf
View File

@@ -145,6 +145,12 @@ oper
mkPN : N -> PN ; -- get gender from noun 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 --2 Adjectives

7
src/portuguese/ParadigmsPor.gf
View File

@@ -206,6 +206,13 @@ oper
= \n -> lin PN {s = n.s ! Sg ; g = n.g} ; = \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 --2 Adjectives
compADeg : Adj -> A ; --% compADeg : Adj -> A ; --%
compADeg a = lin A compADeg a = lin A