(Pes) make Subj take indicative or subjunctive

2026-07-01 11:38:34 -06:00 · 2019-03-01 15:21:45 +01:00
parent a51a31ca7f
commit d005032374
10 changed files with 41 additions and 33 deletions
@@ -158,7 +158,12 @@ oper
     = mk2Conj
  } ;

-
+  mkSubj = overload {
+    mkSubj : Str -> Subj -- Takes its verbal complement in indicative.
+      = \s -> lin Subj {s=s ; compl=indicative} ;
+    mkSubj : VVForm -> Str -> Subj -- Specify whether it takes complement in subjunctive or indicative.
+      = \vvf,s -> lin Subj {s=s ; compl=vvf}
+  } ;

 --.
 --2 Definitions of paradigms