(Extend,Eng,Spa,Swe) New function: "what we did (fas fun)"

This commit is contained in:
Inari Listenmaa
2019-04-12 15:00:11 +02:00
parent a9fd3eec92
commit d25bbe7175
5 changed files with 17 additions and 3 deletions
+2
View File
@@ -61,6 +61,8 @@ concrete ExtendSpa of Extend = CatSpa ** ExtendRomanceFunctor -
s = "qué tan" ++ adv.s
} ;
WhatSSC s = {s = \\_ => "lo que" ++ s.s ! Indic} ; --- mood
ExistsNP np =
mkClause [] True False np.a
(insertComplement (\\_ => (np.s ! Nom).ton)