next-lib renamed to lib, lib to old-lib

1 files changed, 0 insertions, 44 deletions

diff --git a/next-lib/src/swedish/IdiomSwe.gf b/next-lib/src/swedish/IdiomSwe.gf
deleted file mode 100644
index 65ebf9b30..000000000
--- a/next-lib/src/swedish/IdiomSwe.gf
+++ /dev/null
@@ -1,44 +0,0 @@
-concrete IdiomSwe of Idiom = CatSwe ** 
-  open MorphoSwe, ParadigmsSwe, IrregSwe, Prelude in {
-
-  flags optimize=all_subs ;
-
-  oper
-    utr = ParadigmsSwe.utrum ;
-    neutr = ParadigmsSwe.neutrum ;
-
-  lin
-    ImpersCl vp = mkClause "det" (agrP3 neutr Sg) vp ;
-    GenericCl vp = mkClause "man" (agrP3 utr Sg) vp ;
-
-    CleftNP np rs = mkClause "det" (agrP3 neutr Sg) 
-        (insertObj (\\_ => np.s ! rs.c ++ rs.s ! np.a) (predV verbBe)) ;
-
-    CleftAdv ad s = mkClause "det" (agrP3 neutr Sg) 
-      (insertObj (\\_ => ad.s ++ s.s ! Sub) (predV verbBe)) ;
-
-    ExistNP np = 
-      mkClause "det" (agrP3 neutr Sg) (insertObj 
-        (\\_ => np.s ! accusative) (predV (depV finna_V))) ;
-
-    ExistIP ip = {
-      s = \\t,a,p => 
-            let 
-              cls = 
-               (mkClause "det" (agrP3 neutr Sg) (predV (depV finna_V))).s ! t ! a ! p ;
-              who = ip.s ! accusative
-            in table {
-              QDir   => who ++ cls ! Inv ;
-              QIndir => who ++ cls ! Sub
-              }
-      } ;
-
-
-    ProgrVP vp = 
-      insertObj (\\a => "att" ++ infVP vp a) (predV (partV hålla_V "på")) ;
-
-    ImpPl1 vp = {s = ["låt oss"] ++ infVP vp {gn = Plg ; p = P1}} ;
-
-
-}
-