GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-06-24 02:31:10 -06:00
Code Issues Packages Projects Releases Wiki Activity

esto/isto in Spanish/Portuguese

Browse Source
This commit is contained in:
Krasimir Angelov
2023-10-16 16:20:42 +02:00
parent da608c2084
commit 17da1893d7
16 changed files with 168 additions and 42 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
src/italian/ExtraIta.gf
View File

@@ -39,6 +39,7 @@ concrete ExtraIta of ExtraItaAbs = ExtraRomanceIta **
PossFamQuant p = {
s = \\_,n,g,c => case n of {Sg => prepCase c ; _ => possCase g n c} ++ p.poss ! n ! g ;
sp = \\ n,g,c => case n of {Sg => prepCase c ; _ => possCase g n c} ++ p.poss ! n ! g ;
spn= \\ c => prepCase c ++ p.poss ! Sg ! Masc ;
s2 = [] ; isNeg = False
} ;

4
src/italian/MakeStructuralIta.gf
View File

@@ -34,6 +34,7 @@ oper
in lin Quant {
s = \\b => questo ;
sp = questo ;
spn= \\c => prepCase c ++ s ;
s2 = [] ;
isNeg = False
} ;
@@ -53,6 +54,7 @@ oper
in lin Quant {
s = \\b => questo ;
sp = questo ;
spn= \\c => prepCase c ++ tutto ;
s2 = [] ;
isNeg = False
} ;
@@ -62,6 +64,7 @@ oper
-- Does not inflect for number
mkDet : Str -> Number -> Det = \piu,n -> lin Det {
s,sp = \\_,_ => piu ;
spn = \\_ => piu ;
n = n ;
s2 = [] ;
isNeg = False
@@ -72,6 +75,7 @@ oper
Masc => \\_ => alcuni ;
Fem => \\_ => alcune
} ;
spn = \\_ => alcuni ;
n = n ;
s2 = [] ;
isNeg = False

33
src/italian/StructuralIta.gf
View File

@@ -31,10 +31,16 @@ lin
during_Prep = mkPrep "durante" ;
either7or_DConj = {s1,s2 = "o" ; n = Sg} ;
everybody_NP = makeNP ["tutti"] Masc Pl ;
every_Det = {s,sp = \\_,_ => "ogni" ; n = Sg ; s2 = [] ; isNeg = False} ;
every_Det = {
s,sp = \\_,_ => "ogni" ;
spn = \\c => prepCase c ++ "tutto" ;
n = Sg ; s2 = [] ; isNeg = False} ;
everything_NP = pn2np (mkPN ["tutto"] Masc) ;
everywhere_Adv = ss "dappertutto" ;
few_Det = {s,sp = \\g,c => prepCase c ++ genForms "pochi" "poche" ! g ; n = Pl ; s2 = [] ; isNeg = False} ;
few_Det = {
s,sp = \\g,c => prepCase c ++ genForms "pochi" "poche" ! g ;
spn = \\c => prepCase c ++ "pochi" ;
n = Pl ; s2 = [] ; isNeg = False} ;
---- first_Ord = {s = \\ag => (regA "primo").s ! Posit ! AF ag.g ag.n} ;
for_Prep = mkPrep "per" ;
from_Prep = da_Prep ;
@@ -60,11 +66,17 @@ lin
"lui" "lo" "gli" "glie" "lui" "suo" "sua" "suoi" "sue"
Masc Sg P3 ;
less_CAdv = X.mkCAdv "meno" conjThan ;
many_Det = {s,sp = \\g,c => prepCase c ++ genForms "molti" "molte" ! g ; n = Pl ; s2 = [] ; isNeg = False} ;
many_Det = {
s,sp = \\g,c => prepCase c ++ genForms "molti" "molte" ! g ;
spn = \\c => prepCase c ++ "molto" ;
n = Pl ; s2 = [] ; isNeg = False} ;
more_CAdv = X.mkCAdv "più" conjThan ;
most_Predet = {s = \\_,c => prepCase c ++ ["la maggior parte"] ; c = CPrep P_di ;
a = PNoAg} ;
much_Det = {s,sp = \\g,c => prepCase c ++ genForms "molto" "molta" ! g ; n = Sg ; s2 = [] ; isNeg = False} ;
much_Det = {
s,sp = \\g,c => prepCase c ++ genForms "molto" "molta" ! g ;
spn = \\c => prepCase c ++ "molto" ;
n = Sg ; s2 = [] ; isNeg = False} ;
must_VV = mkVV (verboV (dovere_47 "dovere")) ;
no_Utt = ss "no" ;
on_Prep = {s = [] ; c = CPrep P_su ; isDir = False} ;
@@ -83,8 +95,14 @@ lin
Fem Sg P3 ;
so_AdA = ss "così" ;
somebody_NP = pn2np (mkPN ["qualcuno"] Masc) ;
somePl_Det = {s,sp = \\_,c => prepCase c ++ "qualche" ; n = Pl ; s2 = [] ; isNeg = False} ;
someSg_Det = {s,sp = \\_,c => prepCase c ++ "qualche" ; n = Sg ; s2 = [] ; isNeg = False} ;
somePl_Det = {
s,sp = \\_,c => prepCase c ++ "qualche" ;
spn = \\c => prepCase c ++ "qualche cosa" ;
n = Pl ; s2 = [] ; isNeg = False} ;
someSg_Det = {
s,sp = \\_,c => prepCase c ++ "qualche" ;
spn = \\c => prepCase c ++ "qualche cosa" ;
n = Sg ; s2 = [] ; isNeg = False} ;
something_NP = pn2np (mkPN ["qualche cosa"] Masc) ;
somewhere_Adv = ss ["qualche parte"] ;
that_Quant = let
@@ -98,6 +116,7 @@ lin
quello (elision "quel" "quell'" "quello")
(elision "quei" "quegli" "quegli") ;
sp = quello "quello" "quelli" ;
spn= \\c => prepCase c ++ "quello" ;
s2 = [] ;
isNeg = False
} ;
@@ -118,6 +137,7 @@ lin
in {
s = \\_ => questo ;
sp = questo ;
spn= \\c => prepCase c ++ "questo" ;
s2 = [] ;
isNeg = False
} ;
@@ -169,6 +189,7 @@ lin
in {
s = \\_ => aucun ;
sp = aucun ;
spn= \\c => prepCase c ++ "nessuno" ;
s2 = [] ;
isNeg = True
} ;