mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-23 02:06:20 -06:00
8 lines
180 B
Plaintext
8 lines
180 B
Plaintext
concrete RelativeFao of Relative = CatFao ** open ResFao in {
|
|
lin
|
|
IdRP = {s = "sum"} ;
|
|
RelVP rp vp = {
|
|
s = \\t,pol,g,pn => rp.s ++ vp.Indicative ! t ! pol ! g ! pn
|
|
} ;
|
|
}
|