1
0
forked from GitHub/gf-rgl

two more assignments in Chi ; fixed position of some prepositions

This commit is contained in:
aarne
2013-09-27 10:09:37 +00:00
parent 4cd6be7bd6
commit 19b035c238
6 changed files with 1480 additions and 479 deletions

View File

@@ -36,7 +36,10 @@ oper
mkV = overload {
mkV : (walk : Str) -> V
= \walk -> lin V (regVerb walk) ;
= \walk -> case walk of {
v + "+" + p => lin V (regVerb (v + p)) ;
_ => lin V (regVerb walk)
} ;
mkV : (arrive : Str) -> Str -> Str -> Str -> Str -> V
= \arrive,pp,ds,dp,ep -> lin V (mkVerb arrive pp ds dp ep neg_s) ;
mkV : (arrive : Str) -> Str -> Str -> Str -> Str -> Str -> V