mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-11 04:02:52 -06:00
Latvian RG: approaching RGL API
This commit is contained in:
normundsg
@@ -1,142 +1,84 @@
|
||||
concrete CatLav of Cat = CommonX - [CAdv, Voc] ** open ResLav, Prelude in {
|
||||
--# -path=.:../abstract:../common:../prelude
|
||||
|
||||
flags optimize=all_subs ;
|
||||
concrete CatLav of Cat = CommonX - [CAdv, Voc] ** open
|
||||
ResLav,
|
||||
Prelude
|
||||
in {
|
||||
|
||||
lincat
|
||||
S = {s : Str} ;
|
||||
QS = {s : Str} ;
|
||||
RS = {s : Agr => Str} ; -- ; c : Case c for it clefts
|
||||
SSlash = {s : Str; p : Prep};
|
||||
|
||||
N = {s : Number => Case => Str ; g : Gender} ;
|
||||
N2 = {s : Number => Case => Str ; g : Gender} ** {p : Prep; isPre : Bool}; -- case / preposition used. if isPre, then located before the noun.
|
||||
N3 = {s : Number => Case => Str ; g : Gender} ** {p1,p2 : Prep; isPre1, isPre2 : Bool};
|
||||
PN = {s : Case => Str ; g : Gender; n : Number} ;
|
||||
A = {s : AForm => Str };
|
||||
A2 = A ** {p : Prep};
|
||||
V, VQ, VA, VV = Verb ;
|
||||
VS = Verb ** {subj : Subj} ;
|
||||
V2, V2A, V2Q, V2V = Verb ** {p : Prep} ; -- TODO - valence, pieòemam ka viena; bûtu jânorâda semantika - integrçt ar FrameNet?
|
||||
V2S = Verb ** {p : Prep; subj : Subj} ;
|
||||
V3 = Verb ** {p1, p2 : Prep} ;
|
||||
|
||||
Pron = {s : Case => Str ; a : ResLav.Agr; possessive : Gender => Number => Case => Str} ;
|
||||
Conj = {s1,s2 : Str ; n : Number} ;
|
||||
Subj = {s : Str} ;
|
||||
Prep = {s : Str; c : Number => Case} ; -- e.g. 'ar' + Sg-Acc or Pl-Dat; Preposition may be empty [] for simple case-based valences
|
||||
-- TODO - pozîcija nav noteikta; daþi ir pirms daþi pçc
|
||||
|
||||
Cl = {s : VerbMood => Polarity => Str} ;
|
||||
ClSlash = {s : VerbMood => Polarity => Str; p : Prep};
|
||||
|
||||
Imp = {s : Polarity => Number => Str} ;
|
||||
|
||||
QCl = {s : VerbMood => Polarity => Str} ;
|
||||
IP = {s : Case => Str; n: Number };
|
||||
IQuant = {s : Gender => Number => Str} ;
|
||||
IDet = {s : Gender => Str ; n : Number} ;
|
||||
flags
|
||||
coding = utf8 ;
|
||||
optimize = all_subs ;
|
||||
|
||||
RCl = {s : VerbMood => Polarity => Agr => Str} ;
|
||||
RP = {s : Case => Str} ;
|
||||
|
||||
CN = {s : Definite => Number => Case => Str ; g : Gender} ;
|
||||
Det = {s : Gender => Case => Str ; n : Number ; d: Definite} ;
|
||||
Predet = {s : Gender => Str} ;
|
||||
Quant = {s : Gender => Number => Case => Str ; d: Definite} ;
|
||||
Card = { s : Gender => Case => Str ; n: Number} ;
|
||||
Ord = { s : Gender => Case => Str } ;
|
||||
NP = {s : Case => Str ; a : ResLav.Agr} ;
|
||||
AP = {s : Definite => Gender => Number => Case => Str} ;
|
||||
VP = ResLav.VP;
|
||||
VPSlash = VP ** {p : Prep};
|
||||
Comp = {s : ResLav.Agr => Str} ;
|
||||
|
||||
Num = {s : Gender => Case => Str ; n : Number ; hasCard : Bool} ;
|
||||
Numeral = {s : CardOrd => Gender => Case => Str ; n : Number} ;
|
||||
Digits = {s : CardOrd => Str ; n : Number} ;
|
||||
|
||||
CAdv = { s : Str; p : Str; d: Degree } ;
|
||||
{-
|
||||
-- Tensed/Untensed
|
||||
lincat
|
||||
-- Tensed/Untensed
|
||||
S = { s : Str } ;
|
||||
QS = { s : Str } ;
|
||||
RS = { s : Agr => Str } ; -- Eng: c : Case -- c for it clefts
|
||||
SSlash = { s : Str ; p : Prep } ;
|
||||
|
||||
S = {s : Str} ;
|
||||
QS = {s : QForm => Str} ;
|
||||
RS = {s : Agr => Str ; c : Case} ; -- c for it clefts
|
||||
SSlash = {s : Str ; c2 : Str} ;
|
||||
-- Sentence
|
||||
Cl = { s : VerbMood => Polarity => Str } ;
|
||||
ClSlash = { s : VerbMood => Polarity => Str ; p : Prep } ;
|
||||
Imp = { s : Polarity => Number => Str } ;
|
||||
|
||||
-- Sentence
|
||||
-- Question
|
||||
QCl = { s : VerbMood => Polarity => Str } ;
|
||||
IP = { s : Case => Str ; n: Number } ;
|
||||
--IComp = { s : Str } ;
|
||||
IDet = { s : Gender => Str ; n : Number } ;
|
||||
IQuant = { s : Gender => Number => Str } ;
|
||||
|
||||
Cl = {s : ResEng.Tense => Anteriority => CPolarity => Order => Str} ;
|
||||
ClSlash = {
|
||||
s : ResEng.Tense => Anteriority => CPolarity => Order => Str ;
|
||||
c2 : Str
|
||||
} ;
|
||||
Imp = {s : CPolarity => ImpForm => Str} ;
|
||||
-- Relative
|
||||
RCl = { s : VerbMood => Polarity => Agr => Str } ;
|
||||
RP = { s : Gender => Case => Str } ;
|
||||
|
||||
-- Question
|
||||
-- Verb
|
||||
VP = ResLav.VP ;
|
||||
VPSlash = ResLav.VP ** { p : Prep } ;
|
||||
Comp = { s : ResLav.Agr => Str } ;
|
||||
|
||||
QCl = {s : ResEng.Tense => Anteriority => CPolarity => QForm => Str} ;
|
||||
IP = {s : Case => Str ; n : Number} ;
|
||||
IComp = {s : Str} ;
|
||||
IDet = {s : Str ; n : Number} ;
|
||||
IQuant = {s : Number => Str} ;
|
||||
-- Adjective
|
||||
AP = { s : Definite => Gender => Number => Case => Str } ;
|
||||
|
||||
-- Relative
|
||||
-- Noun
|
||||
CN = { s : Definite => Number => Case => Str ; g : Gender } ;
|
||||
NP = { s : Case => Str ; a : ResLav.Agr } ;
|
||||
Pron = { s : Case => Str ; a : ResLav.Agr ; possessive : Gender => Number => Case => Str } ;
|
||||
Det = { s : Gender => Case => Str ; n : Number ; d : Definite } ;
|
||||
Predet = { s : Gender => Str } ;
|
||||
Ord = { s : Gender => Case => Str } ;
|
||||
Num = { s : Gender => Case => Str ; n : Number ; hasCard : Bool } ;
|
||||
Card = { s : Gender => Case => Str ; n : Number } ;
|
||||
Quant = { s : Gender => Number => Case => Str ; d : Definite } ;
|
||||
|
||||
RCl = {
|
||||
s : ResEng.Tense => Anteriority => CPolarity => Agr => Str ;
|
||||
c : Case
|
||||
} ;
|
||||
-- Numeral
|
||||
Numeral = { s : CardOrd => Gender => Case => Str ; n : Number } ;
|
||||
Digits = { s : CardOrd => Str ; n : Number } ;
|
||||
|
||||
-- Verb
|
||||
-- Structural
|
||||
Conj = { s1, s2 : Str ; n : Number } ;
|
||||
Subj = { s : Str } ;
|
||||
Prep = { s : Str ; c : Number => Case } ;
|
||||
-- e.g. 'ar' + Sg-Acc or Pl-Dat; preposition may be empty ([]) for case-based valences
|
||||
-- TODO: pozīcija (pre/post) nav noteikta
|
||||
|
||||
VP = ResEng.VP ;
|
||||
VPSlash = ResEng.VP ** {c2 : Str} ;
|
||||
Comp = {s : Agr => Str} ;
|
||||
-- Open lexical classes, e.g. Lexicon
|
||||
N = { s : Number => Case => Str ; g : Gender } ;
|
||||
N2 = { s : Number => Case => Str ; g : Gender } ** { p : Prep ; isPre : Bool } ;
|
||||
-- case/preposition used; if isPre, then located before the noun
|
||||
N3 = { s : Number => Case => Str ; g : Gender } ** { p1, p2 : Prep ; isPre1, isPre2 : Bool } ;
|
||||
PN = { s : Case => Str ; g : Gender ; n : Number } ;
|
||||
|
||||
-- Adjective
|
||||
A = { s : AForm => Str } ;
|
||||
A2 = A ** { p : Prep } ;
|
||||
|
||||
AP = {s : Agr => Str ; isPre : Bool} ;
|
||||
V, VQ, VA, VV = Verb ;
|
||||
VS = Verb ** { subj : Subj } ;
|
||||
V2, V2A, V2Q, V2V = Verb ** { p : Prep } ;
|
||||
V2S = Verb ** { p : Prep ; subj : Subj } ;
|
||||
V3 = Verb ** { p1, p2 : Prep } ;
|
||||
-- TODO: pieņemam ka viena valence; būtu jānorāda semantika - integrēt ar FrameNet
|
||||
|
||||
-- Noun
|
||||
CAdv = { s, p : Str ; d : Degree } ;
|
||||
|
||||
CN = {s : Number => Case => Str ; g : Gender} ;
|
||||
NP = {s : Case => Str ; a : Agr} ;
|
||||
Pron = {s : Case => Str ; sp : Case => Str ; a : Agr} ;
|
||||
Det = {s : Str ; sp : Case => Str ; n : Number} ;
|
||||
Predet = {s : Str} ;
|
||||
Ord = { s : Case => Str } ;
|
||||
Num = {s : Case => Str ; n : Number ; hasCard : Bool} ;
|
||||
Card = {s : Case => Str ; n : Number} ;
|
||||
Quant = {s : Bool => Number => Str ; sp : Bool => Number => Case => Str} ;
|
||||
|
||||
-- Numeral
|
||||
|
||||
Numeral = {s : CardOrd => Case => Str ; n : Number} ;
|
||||
Digits = {s : CardOrd => Case => Str ; n : Number ; tail : DTail} ;
|
||||
|
||||
-- Structural
|
||||
|
||||
Conj = {s1,s2 : Str ; n : Number} ;
|
||||
---b Conj = {s : Str ; n : Number} ;
|
||||
---b DConj = {s1,s2 : Str ; n : Number} ;
|
||||
Subj = {s : Str} ;
|
||||
Prep = {s : Str} ;
|
||||
|
||||
-- Open lexical classes, e.g. Lexicon
|
||||
|
||||
V, VS, VQ, VA = Verb ; -- = {s : VForm => Str} ;
|
||||
V2, V2A, V2Q, V2S = Verb ** {c2 : Str} ;
|
||||
V3 = Verb ** {c2, c3 : Str} ;
|
||||
VV = {s : VVForm => Str ; isAux : Bool} ;
|
||||
V2V = Verb ** {c2 : Str ; isAux : Bool} ;
|
||||
|
||||
A = {s : AForm => Str} ;
|
||||
A2 = {s : AForm => Str ; c2 : Str} ;
|
||||
|
||||
N = {s : Number => Case => Str ; g : Gender} ;
|
||||
N2 = {s : Number => Case => Str ; g : Gender} ** {c2 : Str} ;
|
||||
N3 = {s : Number => Case => Str ; g : Gender} ** {c2,c3 : Str} ;
|
||||
PN = {s : Case => Str ; g : Gender} ;
|
||||
-}
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user