mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-24 10:41:15 -06:00
fix the word order for superlatives
This commit is contained in:
@@ -6,6 +6,6 @@ concrete CompatibilityIta of Compatibility = CatIta ** open Prelude, CommonRoman
|
||||
|
||||
lin
|
||||
NumInt n = {s = \\_ => n.s ; isNum = True ; n = Pl} ;
|
||||
OrdInt n = {s = \\_ => n.s ++ SOFT_BIND ++ "."} ; ---
|
||||
OrdInt n = {s = \\_ => n.s ++ SOFT_BIND ++ "." ; s2 = \\_ => []} ; ---
|
||||
|
||||
}
|
||||
|
||||
@@ -254,4 +254,7 @@ instance DiffIta of DiffRomance - [contractInf] = open CommonRomance, PhonoIta,
|
||||
param
|
||||
HasArt = NoArt | UseArt ;
|
||||
|
||||
oper
|
||||
superlCanBePost = True ;
|
||||
|
||||
}
|
||||
|
||||
@@ -66,7 +66,7 @@ oper
|
||||
s,sp = \\_,_ => piu ;
|
||||
spn = \\_ => piu ;
|
||||
n = n ;
|
||||
s2 = [] ;
|
||||
s2 = \\g => [] ;
|
||||
isNeg = False
|
||||
} ;
|
||||
-- Inflects for number
|
||||
@@ -77,7 +77,7 @@ oper
|
||||
} ;
|
||||
spn = \\_ => alcuni ;
|
||||
n = n ;
|
||||
s2 = [] ;
|
||||
s2 = \\g => [] ;
|
||||
isNeg = False
|
||||
} ;
|
||||
} ;
|
||||
|
||||
@@ -34,13 +34,13 @@ lin
|
||||
every_Det = {
|
||||
s,sp = \\_,_ => "ogni" ;
|
||||
spn = \\c => prepCase c ++ "tutto" ;
|
||||
n = Sg ; s2 = [] ; isNeg = False} ;
|
||||
n = Sg ; s2 = \\g => [] ; isNeg = False} ;
|
||||
everything_NP = pn2np (mkPN ["tutto"] Masc) ;
|
||||
everywhere_Adv = ss "dappertutto" ;
|
||||
few_Det = {
|
||||
s,sp = \\g,c => prepCase c ++ genForms "pochi" "poche" ! g ;
|
||||
spn = \\c => prepCase c ++ "pochi" ;
|
||||
n = Pl ; s2 = [] ; isNeg = False} ;
|
||||
n = Pl ; s2 = \\g => [] ; isNeg = False} ;
|
||||
---- first_Ord = {s = \\ag => (regA "primo").s ! Posit ! AF ag.g ag.n} ;
|
||||
for_Prep = mkPrep "per" ;
|
||||
from_Prep = da_Prep ;
|
||||
@@ -69,14 +69,14 @@ lin
|
||||
many_Det = {
|
||||
s,sp = \\g,c => prepCase c ++ genForms "molti" "molte" ! g ;
|
||||
spn = \\c => prepCase c ++ "molto" ;
|
||||
n = Pl ; s2 = [] ; isNeg = False} ;
|
||||
n = Pl ; s2 = \\g => [] ; 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 ;
|
||||
spn = \\c => prepCase c ++ "molto" ;
|
||||
n = Sg ; s2 = [] ; isNeg = False} ;
|
||||
n = Sg ; s2 = \\g => [] ; isNeg = False} ;
|
||||
must_VV = mkVV (verboV (dovere_47 "dovere")) ;
|
||||
no_Utt = ss "no" ;
|
||||
on_Prep = {s = [] ; c = CPrep P_su ; isDir = False} ;
|
||||
@@ -98,11 +98,11 @@ lin
|
||||
somePl_Det = {
|
||||
s,sp = \\_,c => prepCase c ++ "qualche" ;
|
||||
spn = \\c => prepCase c ++ "qualche cosa" ;
|
||||
n = Pl ; s2 = [] ; isNeg = False} ;
|
||||
n = Pl ; s2 = \\g => [] ; isNeg = False} ;
|
||||
someSg_Det = {
|
||||
s,sp = \\_,c => prepCase c ++ "qualche" ;
|
||||
spn = \\c => prepCase c ++ "qualche cosa" ;
|
||||
n = Sg ; s2 = [] ; isNeg = False} ;
|
||||
n = Sg ; s2 = \\g => [] ; isNeg = False} ;
|
||||
something_NP = pn2np (mkPN ["qualche cosa"] Masc) ;
|
||||
somewhere_Adv = ss ["qualche parte"] ;
|
||||
that_Quant = let
|
||||
|
||||
Reference in New Issue
Block a user