1
0
forked from GitHub/gf-core

starting German: nouns

This commit is contained in:
aarne
2006-01-04 13:01:05 +00:00
parent 958c754112
commit 5f1cd79b9b
29 changed files with 2437 additions and 168 deletions

View File

@@ -0,0 +1,10 @@
--concrete TensedGer of Tensed = CatGer, TenseX ** open ResGer in {
--
-- flags optimize=all_subs ;
--
-- lin
-- UseCl t a p cl = {s = t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! ODir} ;
-- UseQCl t a p cl = {s = \\q => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! q} ;
-- UseRCl t a p cl = {s = \\r => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! r} ;
--
--}