diff options
| author | aarne <aarne@chalmers.se> | 2009-06-22 15:39:08 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2009-06-22 15:39:08 +0000 |
| commit | e89fdae2fa1626348d8025824a7469252fa85e42 (patch) | |
| tree | c7d46bbd0494043b4bd6f917a25a7687517d0547 /next-lib/src/telugu/ConjunctionTel.gf | |
| parent | 3049b59b35b25381a7c6787444165c200d66e08b (diff) | |
next-lib renamed to lib, lib to old-lib
Diffstat (limited to 'next-lib/src/telugu/ConjunctionTel.gf')
| -rw-r--r-- | next-lib/src/telugu/ConjunctionTel.gf | 37 |
1 files changed, 0 insertions, 37 deletions
diff --git a/next-lib/src/telugu/ConjunctionTel.gf b/next-lib/src/telugu/ConjunctionTel.gf deleted file mode 100644 index 79e0e76bb..000000000 --- a/next-lib/src/telugu/ConjunctionTel.gf +++ /dev/null @@ -1,37 +0,0 @@ ---concrete ConjunctionTel of Conjunction = --- CatTel ** open ResTel, Coordination, Prelude in { ----- ----- flags optimize=all_subs ; ----- ----- lin ----- ----- ConjS = conjunctDistrSS ; ----- ----- ConjAdv = conjunctDistrSS ; ----- ----- ConjNP conj ss = conjunctDistrTable Case conj ss ** { ----- a = conjAgr (agrP3 conj.n) ss.a ----- } ; ----- ----- ConjAP 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} ; ----- ---} |