(Ara) Add subject case field to VP

2018-11-15 16:45:51 +01:00
parent bb0c93968b
commit be42e20158
3 changed files with 8 additions and 4 deletions
@@ -22,7 +22,8 @@ concrete VerbAra of Verb = CatAra ** open Prelude, ResAra, ParamX in {
        s = \\pgn,vpf => vvVP.s ! pgn ! vpf
                      ++ vv.c2.s  -- أَنْ
                      ++ vp.s ! pgn ! VPImpf Cnj ;
-        isPred = False
+        isPred = False ;
+        sc = vv.sc
      } ;

    -- : VS -> S -> VP ;  -- say that she runs