From c8ceed08efcc0bdc1fcbd89bce643d9f52f0991b Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Wed, 9 Dec 2009 09:47:16 +0000
Subject: moving a few things to deprecated

---
 old-lib/resource/russian/QuestionRus.gf | 72 ---------------------------------
 1 file changed, 72 deletions(-)
 delete mode 100644 old-lib/resource/russian/QuestionRus.gf

(limited to 'old-lib/resource/russian/QuestionRus.gf')

diff --git a/old-lib/resource/russian/QuestionRus.gf b/old-lib/resource/russian/QuestionRus.gf
deleted file mode 100644
index 28a9dfccd..000000000
--- a/old-lib/resource/russian/QuestionRus.gf
+++ /dev/null
@@ -1,72 +0,0 @@
---# -path=.:../abstract:../common:../../prelude
-
-concrete QuestionRus of Question = CatRus ** open ResRus, Prelude in {
-
-  flags optimize=all_subs ; coding=utf8 ;
-
-  lin
-
-    QuestCl cl = {s = \\b,cf,_ => cl.s ! b ! cf  } ; 
-
-    QuestVP kto spit =
-    {s = \\b,clf,qf  => (predVerbPhrase kto spit).s!b!clf  } ;
-
-    QuestSlash Kto yaGovoruO =
-    let {  kom = Kto.s ! (mkPronForm yaGovoruO.c No NonPoss) ; o = yaGovoruO.s2 } in 
-    {s =  \\b,clf,_ => o ++ kom ++ yaGovoruO.s ! b ! clf  
-    } ;
-
-    QuestIAdv kak tuPozhivaesh =
-    {s = \\b,clf,q => kak.s ++ tuPozhivaesh.s!b!clf } ; 
- 
-    QuestIComp kak tuPozhivaesh =
-    {s = \\b,clf,q => let ne = case b of {Neg => ""; Pos => []}
-     in 
-     kak.s ++ ne ++tuPozhivaesh.s! PF Nom No NonPoss } ; 
-
-
-    PrepIP p ip = {s = p.s ++ ip.s ! PF Nom No NonPoss} ;
-
-    AdvIP ip adv = {
-      s = \\c => ip.s ! c ++ adv.s ;
-       n = ip.n; p=ip.p; g=ip.g; anim=ip.anim; pron=ip.pron 
-      } ;
-
-    IdetCN kakoj okhotnik =
-    {s = \\pf => case kakoj.c of {
-       Nom => 
-        kakoj.s ! AF (extCase pf) okhotnik.anim (gNum okhotnik.g kakoj.n) ++ 
-         okhotnik.s ! kakoj.n ! (extCase pf) ; 
-       _ => 
-        kakoj.s ! AF (extCase pf) okhotnik.anim (gNum okhotnik.g kakoj.n) ++ 
-        okhotnik.s ! kakoj.n ! kakoj.c };
-     n = kakoj.n ; 
-     p = P3 ;
-     pron = False;
-     g = kakoj.g ;
-     anim = okhotnik.anim 
-    } ;
-
--- 1.4 additions 17/6/2008 by AR
-
-    IdetIP kakoj = let anim = Inanimate in
-    {s = \\pf => kakoj.s ! AF (extCase pf) anim (pgNum kakoj.g kakoj.n) ;
-     n = kakoj.n ; 
-     p = P3 ;
-     pron = False;
-     g = kakoj.g ; 
-     anim = anim 
-    } ;
- 
-    IdetQuant kakoj pyat = -- okhotnik =
-    {s = \\af => 
-           kakoj.s ! pyat.n ! af ++
-           pyat.s ! caseAF af ! genAF af ;
-     n = pyat.n ;
-     g = kakoj.g ;
-     c = kakoj.c 
-    } ;
-
-    CompIAdv a = a ;
-    CompIP ip = {s = ip.s ! PF Nom No NonPoss} ;
-}
-- 
cgit v1.2.3