summaryrefslogtreecommitdiff
path: root/old-lib/resource/arabic/ConjunctionAra.gf
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2009-12-09 09:47:16 +0000
committeraarne <aarne@chalmers.se>2009-12-09 09:47:16 +0000
commitc8ceed08efcc0bdc1fcbd89bce643d9f52f0991b (patch)
tree5f0b314341c129eba1bc67b8b887fb8a4486fad8 /old-lib/resource/arabic/ConjunctionAra.gf
parent101df06f6c8380328d4266adadac3ab6d1bac0b3 (diff)
moving a few things to deprecated
Diffstat (limited to 'old-lib/resource/arabic/ConjunctionAra.gf')
-rw-r--r--old-lib/resource/arabic/ConjunctionAra.gf45
1 files changed, 0 insertions, 45 deletions
diff --git a/old-lib/resource/arabic/ConjunctionAra.gf b/old-lib/resource/arabic/ConjunctionAra.gf
deleted file mode 100644
index f7683c6cc..000000000
--- a/old-lib/resource/arabic/ConjunctionAra.gf
+++ /dev/null
@@ -1,45 +0,0 @@
-concrete ConjunctionAra of Conjunction =
- CatAra ** open ResAra, Coordination, Prelude in {
---
--- flags optimize=all_subs ;
---
--- lin
---
--- ConjS = conjunctSS ;
--- DConjS = conjunctDistrSS ;
---
--- ConjAdv = conjunctSS ;
--- DConjAdv = conjunctDistrSS ;
---
--- ConjNP conj ss = conjunctTable Case conj ss ** {
--- a = {n = conjNumber conj.n ss.a.n ; p = ss.a.p}
--- } ;
--- DConjNP conj ss = conjunctDistrTable Case conj ss ** {
--- a = {n = conjNumber conj.n ss.a.n ; p = ss.a.p}
--- } ;
---
--- ConjAP conj ss = conjunctTable Agr conj ss ** {
--- isPre = ss.isPre
--- } ;
--- DConjAP conj ss = conjunctDistrTable Agr conj ss ** {
--- isPre = ss.isPre
--- } ;
---
----- These fun's are generated from the list cat's.
---
--- BaseS = twoSS ;
--- ConsS = consrSS comma ;
--- BaseAdv = twoSS ;
--- ConsAdv = consrSS comma ;
--- BaseNP x y = twoTable Case x y ** {a = conjAgr x.a y.a} ;
--- ConsNP xs x = consrTable Case comma xs x ** {a = conjAgr xs.a x.a} ;
--- BaseAP x y = twoTable Agr x y ** {isPre = andB x.isPre y.isPre} ;
--- ConsAP xs x = consrTable Agr comma xs x ** {isPre = andB xs.isPre x.isPre} ;
---
--- lincat
--- [S] = {s1,s2 : Str} ;
--- [Adv] = {s1,s2 : Str} ;
--- [NP] = {s1,s2 : Case => Str ; a : Agr} ;
--- [AP] = {s1,s2 : Agr => Str ; isPre : Bool} ;
---
-}