From 76f11b532bd9e43e8417daa35ff6a9863b42a891 Mon Sep 17 00:00:00 2001
From: Aarne Ranta <aarne@chalmers.se>
Date: Thu, 13 Dec 2018 16:30:28 +0200
Subject: [PATCH] removed duplicate invarA in Eng

---
 src/english/ParadigmsEng.gf | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/src/english/ParadigmsEng.gf b/src/english/ParadigmsEng.gf
index 235c6c3a9..3aa7303cb 100644
--- a/src/english/ParadigmsEng.gf
+++ b/src/english/ParadigmsEng.gf
@@ -455,9 +455,6 @@ mkInterj : Str -> Interj
 
   mkOrd : Str -> Ord = \x -> lin Ord { s = regGenitiveS x};
 
-  invarA : Str -> A ;
-  invarA a = mkAdjective a a a a ;
-
   mk2A a b = mkAdjective a a a b ;
   regA a = case a of {
     _ + ("a" | "e" | "i" | "o" | "u" | "y") + ? + _ +