GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-30 14:52:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

romanian_modified

Browse Source
This commit is contained in:
ra.monique
2009-09-14 01:33:06 +00:00
parent a81def4168
commit 18d01be869
15 changed files with 928 additions and 938 deletions
Download Patch File Download Diff File Expand all files Collapse all files

116
lib/src/romanian/CatRon.gf
View File

@@ -15,98 +15,85 @@ concrete CatRon of Cat =
S = {s : Mood => Str} ;
QS = {s : QForm => Str} ;
RS = {s : Mood => Agr => Str ; c : NCase} ;
SSlash = {
s : AAgr => Mood => Str ;
c2 : Compl
} ;
SSlash = {s : AAgr => Mood => Str ;
c2 : Compl} ;
-- Sentence
Cl = {s : Direct => RTense => Anteriority => Polarity => Mood => Str} ;
ClSlash = {
s : AAgr => Direct => RTense => Anteriority => Polarity => Mood => Str ;
c2 : Compl
} ;
ClSlash = {s : Bool => AAgr => Direct => RTense => Anteriority => Polarity => Mood => Str ;
c2 : Compl} ;
Imp = {s : Polarity => ImpForm => Gender => Str} ;
-- Relative
RCl = {
s : Agr => RTense => Anteriority => Polarity => Mood => Str ;
c : NCase
} ;
RCl = {s : Agr => RTense => Anteriority => Polarity => Mood => Str ;
c : NCase } ;
RP = {s : AAgr => NCase => Str ; a : AAgr ; hasAgr : Bool; hasRef : Bool} ;
-- Verb
VP = {
s : VForm => Str ;
isRefl : Agr => RAgr ;
nrClit : VClit ;
isFemSg : Bool ; -- needed for the correct placement of the Accusative clitic
neg : Polarity => Str ; -- ne-pas not needed - just "nu"
clAcc : RAgr ; -- le/se -- not needed if they are used in the noun
clDat : RAgr ; -- lui -- not needed if they are used in the noun
comp : Agr => Str ; -- content(e) ; à ma mère ; hier -
ext : Polarity => Str ; -- que je dors / que je dorme - so that it always comes after all the complements
} ;
VPSlash = VP ** {c2 : Compl; needAgr : Bool} ;
-- Comp = {s : Agr => Str} ;
VP = ResRon.VerbPhrase ;
VPSlash = ResRon.VerbPhrase ** {c2 : Compl; needAgr : Bool; needClit : Bool} ;
-- Adjective
AP = {s : AForm => Str ; isPre : Bool} ;
AP = {s : AForm => Str ; isPre : Bool} ;
-- Noun
lincat
CN = {s : Number => Species => ACase => Str; g : NGender; a : Animacy } ;
Pron = {s : NCase => Str ;
c1, c2 : Clitics => Str ;
a : Agr ;
poss : Number => Gender => Str
} ;
poss : Number => Gender => Str } ;
NP = NounPhrase ;
--NCase because of the pronoun
Det = {s : Gender => NCase => Str ; n : Number ;
isDef : Bool ;
post : Gender => NCase => Str ;
sp : Gender => NCase => Str ; -- pentru Lexicon e aceeasi forma totusi ! posibil
-- probabil pentru ca orice Quant -> Det
size : Str ; --because of the numerals
hasRef : Bool
};
Det = {s : Gender => NCase => Str ; n : Number ;
isDef : Bool ;
post : Gender => NCase => Str ;
sp : Gender => NCase => Str ;
size : Str ; --because of the numerals
hasRef : Bool };
Predet = {s : AAgr => ACase => Str ; c : NCase} ;
-- Art = {s : Bool => Number => Gender => NCase => Str ; isDef : Bool } ;
Quant = {
s : Bool => Number => Gender => ACase => Str ;
sp : Number => Gender => ACase => Str ; -- diferente si in Lexicon, ex : acesta, aceasta
isDef : Bool ;
isPost : Bool ;
hasRef : Bool
};
Quant = {s : Bool => Number => Gender => ACase => Str ;
sp : Number => Gender => ACase => Str ;
isDef : Bool ;
isPost : Bool ;
hasRef : Bool };
-- Numeral
Numeral = {s : ACase => CardOrd => NumF => Str ;
sp : ACase => CardOrd => NumF => Str ; size : Size } ;
Digits = {s : CardOrd => Str ; n : Size ; isDig : Bool} ;
Num = {s : Gender => Str ; sp : Gender => Str ;
isNum : Bool ; n : Number; size : Str } ;
Card = {s : Gender => Str ; sp : Gender => Str ;
n : Number; size : Size} ;
Ord = {s : Number => Gender => NCase => Str; isPre : Bool} ;
--Question
-- Question
QCl = {s : RTense => Anteriority => Polarity => QForm => Str} ;
IComp = {s : AAgr => Str} ;
IDet = {s : Gender => ACase => Str ; n : Number} ;
IQuant = {s : Number => Gender => ACase => Str } ;
IP = {s : NCase => Str ; a : AAgr ; hasRef : Bool} ;
-- Structural
Conj = {s1,s2 : Str ; n : Number} ;
@@ -114,25 +101,37 @@ concrete CatRon of Cat =
Prep = {s : Str ; c : NCase ; isDir : PrepDir ; needIndef : Bool ; prepDir : Str} ;
-- Open lexical classes, e.g. Lexicon
--Verb = {s : VForm => Str } ;
V ={s : VForm => Str ; isRefl : Agr => RAgr; nrClit : VClit} ;
VQ, VA = V ;
V2,V2S, V2Q = V ** {c2 : Compl} ;
V3,V2A, V2V = V ** {c2,c3 : Compl} ;
VS = V ** {m : Polarity => Mood} ;
VV = V ** {c2 : Agr => Str} ;
V = ResRon.Verb;
VQ, VA = ResRon.Verb ;
V2,V2S, V2Q = ResRon.Verb ** {c2 : Compl} ;
V3,V2A, V2V = ResRon.Verb ** {c2,c3 : Compl} ;
VS = ResRon.Verb ** {m : Polarity => Mood} ;
VV = ResRon.Verb ** {c2 : Agr => Str} ;
A = {s : AForm => Str ; isPre : Bool} ;
A2 = {s : AForm => Str ; c2 : Compl} ;
N = Noun ;
N2 = Noun ** {c2 : Compl} ;
N3 = Noun ** {c2,c3 : Compl} ;
PN = {s : NCase => Str ; g : Gender ; n : Number; a : Animacy} ;
Comp = {s : Agr => Str} ;
Temp = {s : Str ; t : RTense ; a : Anteriority} ;
Tense = {s : Str ; t : RTense} ;
lin
TTAnt t a = {s = a.s ++ t.s ; a = a.a ; t = t.t} ;
TPres = {s = []} ** {t = RPres} ;
@@ -146,6 +145,7 @@ concrete CatRon of Cat =
oper
aagr : Gender -> Number -> AAgr = \g,n ->
{g = g ; n = n} ;
agrP3 : Gender -> Number -> Agr = \g,n ->
aagr g n ** {p = P3} ;
@@ -162,10 +162,8 @@ oper
} ;
--Conjuctions
conjThan : Str = "decât" ;
conjThat : Str = "cã" ;
}