summaryrefslogtreecommitdiff
path: root/next-lib/src/german/SymbolGer.gf
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2009-06-22 15:39:08 +0000
committeraarne <aarne@chalmers.se>2009-06-22 15:39:08 +0000
commite89fdae2fa1626348d8025824a7469252fa85e42 (patch)
treec7d46bbd0494043b4bd6f917a25a7687517d0547 /next-lib/src/german/SymbolGer.gf
parent3049b59b35b25381a7c6787444165c200d66e08b (diff)
next-lib renamed to lib, lib to old-lib
Diffstat (limited to 'next-lib/src/german/SymbolGer.gf')
-rw-r--r--next-lib/src/german/SymbolGer.gf45
1 files changed, 0 insertions, 45 deletions
diff --git a/next-lib/src/german/SymbolGer.gf b/next-lib/src/german/SymbolGer.gf
deleted file mode 100644
index c2e6b2a1d..000000000
--- a/next-lib/src/german/SymbolGer.gf
+++ /dev/null
@@ -1,45 +0,0 @@
---# -path=.:abstract:common
-
-concrete SymbolGer of Symbol = CatGer ** open Prelude, ResGer in {
-
-lin
- SymbPN i = {s = \\c => i.s ; g = Neutr} ; --- c
- IntPN i = {s = \\c => i.s ; g = Neutr} ; --- c
- FloatPN i = {s = \\c => i.s ; g = Neutr} ; --- c
- NumPN i = {s = i.s ! Neutr ; g = Neutr} ; --- c
-
- CNIntNP cn i = {
- s = \\c => cn.s ! Weak ! Sg ! Nom ++ i.s ;
- a = agrP3 Sg ;
- isPron = False
- } ;
- CNSymbNP det cn xs = let g = cn.g in {
- s = \\c => det.s ! g ! c ++ cn.s ! adjfCase det.a c ! det.n ! c ++ xs.s ;
- a = agrP3 det.n ;
- isPron = False
- } ;
- CNNumNP cn i = {
- s = \\c => artDef ! (GSg cn.g) ! c ++ cn.s ! Weak ! Sg ! Nom ++ i.s ! Neutr ! c ;
- a = agrP3 Sg ;
- isPron = False
- } ;
-
- SymbS sy = {s = \\_ => sy.s} ;
-
- SymbNum n = {s = \\_,_ => n.s ; n = Pl ; isNum = True} ;
- SymbOrd n = {s = \\_ => n.s ++ "."} ;
-
-
-lincat
-
- Symb, [Symb] = SS ;
-
-lin
-
- MkSymb s = s ;
-
- BaseSymb = infixSS "und" ;
- ConsSymb = infixSS "," ;
-
-}
-