remove some obsolete code from Interlingua

2 files changed, 0 insertions, 23 deletions

diff --git a/next-lib/src/interlingua/CatIna.gf b/next-lib/src/interlingua/CatIna.gf
index 9dbaa5144..adfa365ea 100644
--- a/next-lib/src/interlingua/CatIna.gf
+++ b/next-lib/src/interlingua/CatIna.gf
@@ -50,7 +50,6 @@ concrete CatIna of Cat = CommonX ** open ResIna, Prelude in {
     Card = {s : Str; n : Number } ;
     Num = {s : Str; n : Number } ;
     Quant = {s : Number => Case => Str} ;
-    Art = {s : Number => Case => Str} ;
 
 -- Numeral
     
diff --git a/next-lib/src/interlingua/NounIna.gf b/next-lib/src/interlingua/NounIna.gf
index e99aed813..a61bca010 100644
--- a/next-lib/src/interlingua/NounIna.gf
+++ b/next-lib/src/interlingua/NounIna.gf
@@ -53,28 +53,6 @@ concrete NounIna of Noun = CatIna ** open ResIna, Prelude in {
       n = num.n
       } ;
 
-    DetArtOrd art num ord = {
-      s = \\c=>(art.s ! num.n !c) ++ num.s ++ ord.s ; 
-      n = num.n
-      } ;
-
-    DetArtCard art num = {
-      s = \\c=>(art.s ! num.n !c) ++ num.s ; 
-      n = num.n
-      } ;
-
-    DetArtSg art cn = {
-      s = \\c => art.s ! Sg ! c ++ cn.s ! Sg ; 
-      a = agrP3 Sg ;
-      isPronoun = False
-      };  -- iste pizza
-
-    DetArtPl art cn = {
-      s = \\c => art.s ! Pl ! c ++ cn.s ! Pl ; 
-      a = agrP3 Pl ;
-      isPronoun = False
-      };  -- iste pizza
-
     PossPron p = {s = \\_,c => casePrep [] c ++ p.possForm} ;
 
     NumPl = {s = []; n = Pl } ;