upgraded resources, esp. romance

This commit is contained in:
aarne
2005-05-31 17:42:39 +00:00
parent 04ae4c37cb
commit 24b595c98f
17 changed files with 167 additions and 47 deletions

View File

@@ -1,7 +1,7 @@
--# -path=.:../romance:../../prelude
instance SyntaxSpa of SyntaxRomance =
TypesSpa ** open Prelude, (CO=Coordination), MorphoSpa in {
TypesSpa ** open Prelude, (CO=Coordination), MorphoSpa, BeschSpa in {
oper
nameNounPhrase = \jean ->
normalNounPhrase
@@ -358,5 +358,11 @@ oper
negNe = "no" ; negPas = [] ;
progressiveSats subj vp =
mkSatsObject subj
(mkTransVerbDir (verbPres (estar_2 "estar") AHabere)) --- hack to reuse
(nameNounPhrase (mkProperName ( --- this function
vp.s ! VIGerund ! (pgen2gen subj.g) ! subj.n ! subj.p) Masc)) ;
}