yyyyyyyyyyyyy

This commit is contained in:
janna
2006-04-26 12:56:40 +00:00
parent 3adcd02b0b
commit 93121ef2f3
20 changed files with 2333 additions and 0 deletions

View File

@@ -0,0 +1,15 @@
--# -path=.:../abstract:../common:../../prelude
concrete IdiomRus of Idiom = CatRus ** open Prelude, ResRus in {
--
-- flags optimize=all_subs ;
--
-- lin
-- ExistNP np =
-- mkClause "there" (agrP3 np.a.n) (insertObj (\\_ => np.s ! Acc) (predAux auxBe)) ;
-- ImpersCl vp = mkClause "it" (agrP3 Sg) vp ;
-- GenericCl vp = mkClause "one" (agrP3 Sg) vp ;
--
-- ProgrVP vp = insertObj (\\a => vp.ad ++ vp.prp ++ vp.s2 ! a) (predAux auxBe) ;
--
}