mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-30 19:18:34 -06:00
Faroese grammar
This commit is contained in:
@@ -1,7 +1,16 @@
|
||||
concrete RelativeFao of Relative = CatFao ** open ResFao in {
|
||||
lin
|
||||
IdRP = {s = "sum"} ;
|
||||
RelCl cl = {
|
||||
s = \\t,pol,_,_ => "sum" ++ cl.Indicative ! t ! pol
|
||||
} ;
|
||||
RelVP rp vp = {
|
||||
s = \\t,pol,g,pn => rp.s ++ vp.Indicative ! t ! pol ! g ! pn
|
||||
} ;
|
||||
RelSlash rp cls = {
|
||||
s = \\t,pol,_,_ => rp.s ++ cls.s ! t ! pol
|
||||
} ;
|
||||
FunRP prep np rp = {
|
||||
s = prep.s ++ np.s ! prep.c ++ rp.s
|
||||
} ;
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user