add slash3v3 and SlashV2A

This commit is contained in:
Meowyam
2022-01-12 17:17:10 +08:00
committed by Inari Listenmaa
parent 1a3b3ef796
commit bf0e3a58dd
7 changed files with 43 additions and 19 deletions

View File

@@ -248,6 +248,7 @@ oper
VPSlash : Type = VerbPhrase ** {
c2 : Preposition ;
adjCompl : Str ;
} ;
useV : Verb -> VerbPhrase = \v -> v ** {
@@ -295,6 +296,7 @@ oper
predVPSlash : NounPhrase -> VPSlash -> ClSlash = \np,vps ->
predVP np <vps : VerbPhrase> ** {c2 = vps.c2} ;
-- mkClause : Str -> NounPhrase -> VPSlash -> Clause = \str,np,vp -> {
-- subj = str ++ np.s ! Bare;
-- pred = vp.s