constructor PositAdAAdj in Adverb, for most langs

This commit is contained in:
aarne
2010-11-19 16:49:30 +00:00
parent 48a327ddee
commit 94d818c60a
9 changed files with 23 additions and 3 deletions

View File

@@ -12,6 +12,7 @@ concrete AdverbEng of Adverb = CatEng ** open ResEng, Prelude in {
PrepNP prep np = {s = prep.s ++ np.s ! Acc} ;
AdAdv = cc2 ;
PositAdAAdj a = {s = a.s ! AAdv} ;
SubjS = cc2 ;