commit 138144f1f4a35108ebd73ca072d418b22cee2cd8
Author: Tanmai Khanna <khanna.tanmai@gmail.com>
Date:   Sun Aug 18 21:43:41 2019 +0530

    Add list of animate fem nouns and modify anaphora macro

diff --git a/apertium-eng-spa.spa-eng.t1x b/apertium-eng-spa.spa-eng.t1x
index 0ce85f0..4e82568 100644
--- a/apertium-eng-spa.spa-eng.t1x
+++ b/apertium-eng-spa.spa-eng.t1x
@@ -652,6 +652,20 @@ Si se quiere empezar a tratar las frase impersonales en el t2x, habría que hace
       <list-item v="pronto"/>
 </def-list>
 
+<def-list n="en_nouns_fem">
+      <list-item v="girl"/>
+      <list-item v="woman"/>
+      <list-item v="daughter"/>
+      <list-item v="sister"/>
+      <list-item v="mother"/>
+      <list-item v="lady"/>
+      <list-item v="wife"/>
+      <list-item v="madam"/>
+      <list-item v="waitress"/>
+      <list-item v="actress"/>
+</def-list>
+
+
   </section-def-lists>
 
 
@@ -3128,7 +3142,15 @@ Si se quiere empezar a tratar las frase impersonales en el t2x, habría que hace
             <let><clip pos="1" side="tl" part="gen"/><lit-tag v="m"/></let>
           </when>
           <when> <!-- Should also check for animacy: la máquina ... el seu ... → the machine ... its ... -->
-            <test><equal><clip pos="1" side="ref" part="gen"/><lit-tag v="f"/></equal></test>
+            <test>
+              <or>
+                <equal><clip pos="1" side="ref" part="gen"/><lit-tag v="f"/></equal>
+                <in>
+                  <clip pos="1" side="ref" part="lem"/>
+                  <list n="en_nouns_fem"/>
+                </in>
+              </or>
+            </test>
             <let><clip pos="1" side="tl" part="lem"/><lit v="her"/></let>
             <let><clip pos="1" side="tl" part="gen"/><lit-tag v="f"/></let>
           </when>