(May) ImpersCl, AdvVP + tests about verbal prefixes

This commit is contained in:
Inari Listenmaa
2020-08-20 17:53:25 +02:00
parent 7f032c511f
commit ec9dcb92bf
4 changed files with 123 additions and 12 deletions
+9 -5
View File
@@ -6,13 +6,17 @@ concrete IdiomMay of Idiom = CatMay ** open Prelude, ResMay, VerbMay, NounMay, S
-- This module defines constructions that are formed in fixed ways,
-- often different even in closely related languages.
{- lin
lin
-- ImpersCl : VP -> Cl ; -- it is hot
-- GenericCl : VP -> Cl ; -- one sleeps
ImpersCl,
GenericCl = \vp -> predVP impersNP (passVP vp) ;
-- ImpersCl : VP -> Cl ; -- it is hot
ImpersCl vp = {
subj = [] ;
pred = \\vf,pol => vp.s ! Root ! pol -- force no prefix -- TODO check if legit?
} ;
{-
-- GenericCl : VP -> Cl ; -- one sleeps
GenericCl = \vp -> predVP impersNP (passVP vp) ;
CleftNP : NP -> RS -> Cl ; -- it is I who did it
CleftAdv : Adv -> S -> Cl ; -- it is here she slept