From e89fdae2fa1626348d8025824a7469252fa85e42 Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Mon, 22 Jun 2009 15:39:08 +0000
Subject: next-lib renamed to lib, lib to old-lib

---
 next-lib/src/russian/ConjunctionRus.gf | 107 ---------------------------------
 1 file changed, 107 deletions(-)
 delete mode 100644 next-lib/src/russian/ConjunctionRus.gf

(limited to 'next-lib/src/russian/ConjunctionRus.gf')

diff --git a/next-lib/src/russian/ConjunctionRus.gf b/next-lib/src/russian/ConjunctionRus.gf
deleted file mode 100644
index 783399ad0..000000000
--- a/next-lib/src/russian/ConjunctionRus.gf
+++ /dev/null
@@ -1,107 +0,0 @@
---# -path=.:../abstract:../common:../../prelude
-
-concrete ConjunctionRus of Conjunction = 
-  CatRus ** open ResRus, Coordination, Prelude in {
-
-  flags optimize=all_subs ;  coding=utf8 ;
-
-  lin
-
-    ConjS = conjunctDistrSS ;
-
-    ConjAdv = conjunctDistrSS ;
-                                                    
-    ConjNP c xs =
-    conjunctDistrTable PronForm c xs ** {n = conjNumber c.n xs.n ; 
-      p = xs.p ; pron = xs.pron ; anim = xs.anim ; 
-       g = xs.g } ;
-
-
-    ConjAP c xs = conjunctDistrTable AdjForm c xs ** {p = xs.p} ;
-
-  ---- AR 17/12/2008
-    ConjRS c xs = conjunctDistrTable3 GenNum Case Animacy c xs ** {p = xs.p} ;
-
--- These fun's are generated from the list cat's.
-
-    BaseS = twoSS ;
-    ConsS = consrSS comma ;
-    BaseAdv = twoSS ;
-    ConsAdv = consrSS comma ;
-
-
-    ConsNP  x xs =
-    consTable PronForm comma xs x ** 
-       {n = conjNumber xs.n x.n ; g = conjPGender x.g xs.g ;
-          anim = conjAnim x.anim xs.anim ;
-          p = conjPerson xs.p x.p; pron = conjPron xs.pron x.pron} ;
-      
-    ConsAP x xs = consTable AdjForm comma xs x ** {p = andB xs.p x.p} ;
-
-
-    BaseAP x y = twoTable AdjForm x y ** {p = andB x.p y.p} ;
-
-    BaseNP x y = twoTable PronForm x y ** {n = conjNumber x.n y.n ; 
-       g = conjPGender x.g y.g ; p = conjPerson x.p y.p ;
-       pron = conjPron x.pron y.pron ; anim = conjAnim x.anim y.anim } ;
-
-  ---- AR 17/12/2008
-    BaseRS x y = twoTable3 GenNum Case Animacy x y ** {c = y.c} ;
-    ConsRS xs x = consrTable3 GenNum Case Animacy comma xs x ** {c = xs.c} ;
-
-
-
-  lincat
-    [S] = {s1,s2 : Str} ;
-    [Adv] = {s1,s2 : Str} ;
- -- The structure is the same as for sentences. The result is either always plural
- -- or plural if any of the components is, depending on the conjunction.
-    [NP] = { s1,s2 : PronForm => Str ; g: PronGen ; 
-             anim : Animacy ; n : Number ; p : Person ;  pron : Bool } ;
- -- The structure is the same as for sentences. The result is a prefix adjective
- -- if and only if all elements are prefix.
-    [AP] =  {s1,s2 : AdjForm => Str ; p : Bool} ;
-
-  ---- AR 17/12/2008
-   [RS] = {s1,s2 : GenNum => Case => Animacy => Str} ;
-
-oper
-
--- We have to define a calculus of numbers of persons. For numbers,
--- it is like the conjunction with $Pl$ corresponding to $False$.
---
--- The following are given in $ParamX$.
---
---  conjNumber : Number -> Number -> Number = \m,n -> case <m,n> of {
---    <Sg,Sg> => Sg ;
---    _ => Pl 
---    } ;
-
--- For persons, we let the latter argument win ("либо ты, либо я пойду"
--- but "либо я, либо ты пойдешь"). This is not quite clear.
-
---  conjPerson : Person -> Person -> Person = \_,p -> 
---    p ;
-
--- For pron, we let the latter argument win - "Маша или моя мама" (Nominative case)
--- but - "моей или Машина мама" (Genetive case) both corresponds to 
--- "Masha's or my mother"), which is actually not exactly correct, since
--- different cases should be used - "Машина или моя мама".
-
-  conjPron : Bool -> Bool -> Bool = \_,p -> 
-    p ;
-
--- For gender in a similar manner as for person:
--- Needed for adjective predicates like:
--- "Маша или Оля - красивая", "Антон или Олег - красивый",
--- "Маша или Олег - красивый".
--- The later is not totally correct, but there is no correct way to say that.
-
-  conjGender : Gender -> Gender -> Gender = \_,m -> m ; 
- conjPGender : PronGen -> PronGen -> PronGen = \_,m -> m ; 
-
-  conjAnim : Animacy -> Animacy -> Animacy = \_,m -> m ; 
-
-
-}
-
-- 
cgit v1.2.3