mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-09 04:59:31 -06:00
added ConjunctionSlv
This commit is contained in:
@@ -31,6 +31,7 @@ lincat
|
||||
Numeral = {s : Gender => Case => Str ; n : NumAgr} ;
|
||||
|
||||
-- Structural
|
||||
Conj = {s : Str} ;
|
||||
Prep = {s : Str; c : Case} ;
|
||||
|
||||
-- Open lexical classes, e.g. Lexicon
|
||||
|
||||
20
lib/src/slovenian/ConjunctionSlv.gf
Normal file
20
lib/src/slovenian/ConjunctionSlv.gf
Normal file
@@ -0,0 +1,20 @@
|
||||
concrete ConjunctionSlv of Conjunction =
|
||||
CatSlv ** open ResSlv in {
|
||||
|
||||
lin
|
||||
ConjAP conj xs = {
|
||||
s = \\sp,g,c,n => xs.s1 ! sp ! g ! c ! n ++ conj.s ++ xs.s2 ! sp ! g ! c ! n
|
||||
} ;
|
||||
|
||||
-- These fun's are generated from the list cat's.
|
||||
|
||||
BaseAP x y = { s1 = x.s; s2=y.s } ;
|
||||
ConsAP x xs = {
|
||||
s1 = \\sp,g,c,n => x.s ! sp ! g ! c ! n ++ xs.s1 ! sp ! g ! c ! n ;
|
||||
s2 = xs.s2
|
||||
} ;
|
||||
|
||||
lincat
|
||||
[AP] = {s1,s2 : Species => Gender => Case => Number => Str} ;
|
||||
|
||||
}
|
||||
@@ -8,8 +8,8 @@ concrete GrammarSlv of Grammar =
|
||||
NumeralSlv,
|
||||
SentenceSlv,
|
||||
QuestionSlv,
|
||||
{- RelativeSlv,
|
||||
ConjunctionSlv,-}
|
||||
{- RelativeSlv,-}
|
||||
ConjunctionSlv,
|
||||
PhraseSlv,
|
||||
TextX - [Pol,PPos,PNeg],
|
||||
StructuralSlv,
|
||||
|
||||
Reference in New Issue
Block a user