mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 08:58:55 -06:00
12 lines
324 B
Plaintext
12 lines
324 B
Plaintext
concrete AdjectiveSqi of Adjective = CatSqi ** open ResSqi, Prelude in {
|
|
|
|
lin
|
|
PositA a = {
|
|
s = \\spec,c,g,n => case a.clit of {
|
|
True => link_clitic ! spec ! c ! g ! n ++ a.s ! c ! g ! n ;
|
|
False => a.s ! c ! g ! n
|
|
}
|
|
} ;
|
|
|
|
}
|