1 files changed, 0 insertions, 38 deletions
diff --git a/next-lib/src/danish/IdiomDan.gf b/next-lib/src/danish/IdiomDan.gf
deleted file mode 100644
index 91c46af12..000000000
--- a/next-lib/src/danish/IdiomDan.gf
+++ /dev/null
@@ -1,38 +0,0 @@
-concrete IdiomDan of Idiom = CatDan ** 
-  open MorphoDan, ParadigmsDan, IrregDan, Prelude in {
-
-  flags optimize=all_subs ;
-
-  lin
-    ImpersCl vp = mkClause "det" (agrP3 MorphoDan.neutrum Sg) vp ;
-    GenericCl vp = mkClause "man" (agrP3 MorphoDan.utrum Sg) vp ;
-
-    CleftNP np rs = mkClause "det" (agrP3 MorphoDan.neutrum Sg) 
-        (insertObj (\\_ => np.s ! rs.c ++ rs.s ! np.a) (predV verbBe)) ;
-
-    CleftAdv ad s = mkClause "det" (agrP3 MorphoDan.neutrum Sg) 
-      (insertObj (\\_ => ad.s ++ s.s ! Sub) (predV verbBe)) ;
-
-    ExistNP np = 
-      mkClause "det" (agrP3 MorphoDan.neutrum Sg) (insertObj 
-        (\\_ => np.s ! accusative) (predV (depV finde_V))) ;
-
-    ExistIP ip = {
-      s = \\t,a,p => 
-            let 
-              cls = 
-               (mkClause "det" (agrP3 MorphoDan.neutrum Sg) (predV (depV finde_V))).s ! t ! a ! p ;
-              who = ip.s ! accusative
-            in table {
-              QDir   => who ++ cls ! Inv ;
-              QIndir => who ++ cls ! Sub
-              }
-      } ;
-
-    ProgrVP vp = 
-      insertObj (\\a => ["ved å"] ++ infVP vp a) (predV verbBe) ;
-
-    ImpPl1 vp = {s = ["lad os"] ++ infVP vp {gn = Plg ; p = P1}} ;
-
-}
-