mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-15 22:22:51 -06:00
imperatives in Slovenian
This commit is contained in:
@@ -1,9 +1,16 @@
|
||||
concrete VerbSlv of Verb = CatSlv ** open ResSlv, Prelude in {
|
||||
|
||||
lin
|
||||
UseV v = predV v.s ;
|
||||
UseV v =
|
||||
{ s = v.s ;
|
||||
s2 = \\a => ""
|
||||
} ;
|
||||
|
||||
SlashV2a v = predV v.s ** {c2 = v.c2} ;
|
||||
SlashV2a v =
|
||||
{ s = v.s ;
|
||||
s2 = \\a => "" ;
|
||||
c2 = v.c2
|
||||
} ;
|
||||
|
||||
ComplSlash vp np =
|
||||
insertObj (\\_ => vp.c2.s ++ np.s ! vp.c2.c) vp ;
|
||||
|
||||
Reference in New Issue
Block a user