(Ara) Misc fixes to tenses, NPs, VPs

This commit is contained in:
Inari Listenmaa
2018-11-13 17:03:32 +01:00
parent eb43758d37
commit c14e879224
5 changed files with 23 additions and 16 deletions
+2 -1
View File
@@ -26,7 +26,8 @@ concrete VerbAra of Verb = CatAra ** open Prelude, ResAra in {
vp ** {
s = \\pgn,vpf => vvVP.s ! pgn ! vpf
++ vv.c2.s -- أَنْ
++ vp.s ! pgn ! VPImpf Cnj
++ vp.s ! pgn ! VPImpf Cnj ;
isPred = False
} ;
-- ComplVS v s = insertObj (\\_ => conjThat ++ s.s) (predV v) ;