summaryrefslogtreecommitdiff
path: root/old-lib/resource/german/AdjectiveGer.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 /old-lib/resource/german/AdjectiveGer.gf
parent3049b59b35b25381a7c6787444165c200d66e08b (diff)
next-lib renamed to lib, lib to old-lib
Diffstat (limited to 'old-lib/resource/german/AdjectiveGer.gf')
-rw-r--r--old-lib/resource/german/AdjectiveGer.gf40
1 files changed, 40 insertions, 0 deletions
diff --git a/old-lib/resource/german/AdjectiveGer.gf b/old-lib/resource/german/AdjectiveGer.gf
new file mode 100644
index 000000000..6f174bb1e
--- /dev/null
+++ b/old-lib/resource/german/AdjectiveGer.gf
@@ -0,0 +1,40 @@
+concrete AdjectiveGer of Adjective = CatGer ** open ResGer, Prelude in {
+
+ flags optimize=all_subs ;
+
+ lin
+
+ PositA a = {
+ s = a.s ! Posit ;
+ isPre = True
+ } ;
+ ComparA a np = {
+ s = \\af => a.s ! Compar ! af ++ conjThan ++ np.s ! Nom ;
+ isPre = True
+ } ;
+
+-- $SuperlA$ belongs to determiner syntax in $Noun$.
+
+ ComplA2 a np = {
+ s = \\af => a.s ! Posit ! af ++ appPrep a.c2 np.s ;
+ isPre = True
+ } ;
+
+ ReflA2 a = {
+ s = \\af => a.s ! Posit ! APred ++ appPrep a.c2 (reflPron ! agrP3 Sg) ; --- agr
+ isPre = True
+ } ;
+
+ SentAP ap sc = {
+ s = \\a => ap.s ! a ++ sc.s ;
+ isPre = False
+ } ;
+
+ AdAP ada ap = {
+ s = \\a => ada.s ++ ap.s ! a ;
+ isPre = ap.isPre
+ } ;
+
+ UseA2 a = a ;
+
+}