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/scandinavian/ExtraScand.gf | 47 ---------------------------------
 1 file changed, 47 deletions(-)
 delete mode 100644 next-lib/src/scandinavian/ExtraScand.gf

(limited to 'next-lib/src/scandinavian/ExtraScand.gf')

diff --git a/next-lib/src/scandinavian/ExtraScand.gf b/next-lib/src/scandinavian/ExtraScand.gf
deleted file mode 100644
index 32ec58bc2..000000000
--- a/next-lib/src/scandinavian/ExtraScand.gf
+++ /dev/null
@@ -1,47 +0,0 @@
-incomplete concrete ExtraScand of ExtraScandAbs = CatScand ** 
-   open CommonScand,Coordination,ResScand in {
-  lin
-    GenNP np = {
-      s,sp = \\n,_,_,g => np.s ! NPPoss (gennum g n) ; 
-      det = DDef Indef
-      } ;
-
-    ComplBareVS v s  = insertObj (\\_ => s.s ! Sub) (predV v) ;
-
-    StrandRelSlash rp slash  = {
-      s = \\t,a,p,ag => 
-          rp.s ! ag.gn ! RNom ++ slash.s ! t ! a ! p ! Sub ++ slash.c2.s ;
-      c = NPAcc
-      } ;
-    EmptyRelSlash slash = {
-      s = \\t,a,p,ag => 
-          slash.s ! t ! a ! p ! Sub ++ slash.c2.s ;
-      c = NPAcc
-      } ;
-
-    StrandQuestSlash ip slash = {
-      s = \\t,a,p => 
-            let 
-              cls = slash.s ! t ! a ! p ;
-              who = ip.s ! accusative
-            in table {
-              QDir   => who ++ cls ! Inv ++ slash.c2.s ;
-              QIndir => who ++ cls ! Sub ++ slash.c2.s
-              }
-      } ;
-
-  lincat
-    VPI   = {s : VPIForm => Agr => Str} ;
-    [VPI] = {s1,s2 : VPIForm => Agr => Str} ;
-
-  lin
-    BaseVPI = twoTable2 VPIForm Agr ;
-    ConsVPI = consrTable2 VPIForm Agr comma ;
-
-    MkVPI vp = {
-      s = \\v,a => infVP vp a ---- no sup
-      } ;
-    ConjVPI = conjunctDistrTable2 VPIForm Agr ;
-    ComplVPIVV vv vpi = insertObj (\\a => vv.c2.s ++ vpi.s ! VPIInf ! a) (predV vv) ;
-
-} 
-- 
cgit v1.2.3