mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-25 19:16:28 -06:00
small fixes and additions
This commit is contained in:
@@ -29,8 +29,8 @@ concrete AdjectiveEus of Adjective = CatEus ** open ResEus, Prelude in {
|
||||
neureBuru : NounPhrase = empty_NP **
|
||||
{ s = \\cas => neure ++ "buru"
|
||||
++ artDef ! getNum agr ! cas ! FinalVow ;
|
||||
agr = agr } -- neure buruekin eskondua naiz /
|
||||
-- geure buruekin eskonduak gara
|
||||
agr = agr } -- neure buruekin ezkondua naiz /
|
||||
-- geure buruekin ezkonduak gara
|
||||
in applyPost a2.compl neureBuru ++ a2.s ! AF Posit ;
|
||||
typ = Bare } ;
|
||||
|
||||
@@ -59,7 +59,10 @@ concrete AdjectiveEus of Adjective = CatEus ** open ResEus, Prelude in {
|
||||
-- phrases, although the semantics is only clear for some adjectives.
|
||||
|
||||
-- : AP -> SC -> AP ; -- good that she is here
|
||||
SentAP ap sc = ap ; --TODO
|
||||
SentAP ap sc = ap ** {
|
||||
s = \\agr => sc.s ++ ap.s ! agr ;
|
||||
typ = Bare
|
||||
} ;
|
||||
|
||||
-- An adjectival phrase can be modified by an *adadjective*, such as "very".
|
||||
|
||||
@@ -72,7 +75,9 @@ concrete AdjectiveEus of Adjective = CatEus ** open ResEus, Prelude in {
|
||||
-- It can also be postmodified by an adverb, typically a prepositional phrase.
|
||||
|
||||
-- : AP -> Adv -> AP ; -- warm by nature
|
||||
AdvAP ap adv = ap ; --TODO
|
||||
AdvAP ap adv = ap **
|
||||
{ s = \\agr => ap.s ! agr ++ adv.s ;
|
||||
typ = Bare } ;
|
||||
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user