moving a few things to deprecated

This commit is contained in:
aarne
2009-12-09 09:47:16 +00:00
parent df019fa427
commit a2546722d1
676 changed files with 0 additions and 0 deletions

View File

@@ -0,0 +1,24 @@
--# -path=.:../abstract:../common:../../prelude
concrete AdverbRus of Adverb = CatRus ** open ResRus, Prelude in {
flags coding=utf8 ;
lin
PositAdvAdj a = {s = a.s !Posit! AdvF} ;
ComparAdvAdj cadv a np = {
s = cadv.s ++ a.s !Posit! AdvF ++ "чем" ++ np.s ! PF Nom No NonPoss
} ;
ComparAdvAdjS cadv a s = {
s = cadv.s ++ a.s !Posit! AdvF ++ "чем" ++ s.s
} ;
PrepNP na stol = ss (na.s ++ stol.s ! PF na.c Yes NonPoss) ;
AdAdv = cc2 ;
SubjS = cc2 ;
AdnCAdv cadv = {s = cadv.s ++ "чем"} ;
}