mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-09-22 10:16:06 -06:00
12 lines
463 B
Plaintext
12 lines
463 B
Plaintext
concrete AdverbSqi of Adverb = CatSqi ** open Prelude, ResSqi in {
|
|
lin
|
|
PositAdvAdj a = {s=a.s ! Nom ! Masc ! Sg} ;
|
|
PrepNP p np = {s=p.s ++ np.s ! p.c} ;
|
|
ComparAdvAdj c a np = {s=c.s ++ a.s ! Nom ! Masc ! Sg ++ c.p ++ np.s ! Ablat} ;
|
|
ComparAdvAdjS c a s = {s=c.s ++ a.s ! Nom ! Masc ! Sg ++ c.p ++ s.s} ;
|
|
AdAdv a adv = {s=a.s ++ adv.s} ;
|
|
PositAdAAdj a = {s=a.s ! Nom ! Masc ! Sg} ;
|
|
SubjS subj s = {s=subj.s ++ s.s} ;
|
|
AdnCAdv c = {s=c.s ++ c.p} ;
|
|
}
|