Many additions; more numerals; tests;

This commit is contained in:
Roman Suzi
2020-08-26 18:10:35 +03:00
parent 0e363f02dd
commit f7f784aeb1
16 changed files with 481 additions and 93 deletions

View File

@@ -84,6 +84,7 @@ lin
let pol = case polarity of {Neg => PNeg; Pos => PPos} in
let a = Ag gn P2 in
(R.verbEnvAgr "" "" vp.verb Imperative Pres a pol)
++ vp.dep
++ vp.adv ! a
++ vp.compl ! pol.p ! a
} ;