<?xml version="1.0" encoding="UTF-8"?> <!-- -*- nxml -*- -->
<transfer>
  <section-def-cats>
    <def-cat n="nom">
      <cat-item tags="n.*"/>
    </def-cat>

   <!-- <def-cat n="qualsevol">
      <cat-item tags="*"/>
    </def-cat>
    <def-cat n="descon">
      <cat-item lemma="*" tags=""/>
    </def-cat>
    <def-cat n="descbil">
      <cat-item lemma="@*" tags="n.*"/>
    </def-cat> -->
    <def-cat n="npant">
      <cat-item tags="np.ant"/>
    </def-cat>

    <def-cat n="nploc">
      <cat-item tags="np.loc"/>
    </def-cat>    
    <def-cat n="nom_loc">
      <cat-item tags="n.*"/>
      <cat-item tags="np.loc"/>
    </def-cat>    

    <def-cat n="det">          
      <cat-item tags="det.*"/>
      <cat-item tags="predet.*"/>
    </def-cat>

    <def-cat n="detdef">
      <cat-item tags="det.def.*"/>
    </def-cat>
    
    <def-cat n="predet">
      <cat-item tags="predet.*"/>
    </def-cat>

    <def-cat n="adjec">          
      <cat-item tags="adj.*"/>
      <cat-item tags="vblex.pp.*"/>
    </def-cat>

    <def-cat n="adj">          
      <cat-item tags="adj.*"/>
    </def-cat>

    <def-cat n="adv">
      <cat-item tags="adv"/>
      <cat-item tags="preadv"/>
    </def-cat>

    <def-cat n="prep">
      <cat-item tags="pr"/>
    </def-cat>    

    
    <def-cat n="relat">
      <cat-item tags="rel.*"/>
    </def-cat>

    <def-cat n="prn">          	  	  
      <cat-item tags="prn.tn.*"/>
      <cat-item tags="prn.itg.*"/>	 	 	
    </def-cat>

    <def-cat n="prnenc">   	  	  
      <cat-item tags="prn.enc.*"/>
    </def-cat>     

    <def-cat n="prnpro">   	  	  
      <cat-item tags="prn.pro.*"/>
    </def-cat>

    <def-cat n="prnproref">   	  	  
      <cat-item lemma="em" tags="prn.pro.p1.mf.sg"/>
      <cat-item lemma="et" tags="prn.pro.p2.mf.sg"/>
      <cat-item lemma="es" tags="prn.pro.ref.p3.mf.sp"/>
      <cat-item lemma="ens" tags="prn.pro.p1.mf.pl"/>
      <cat-item lemma="us" tags="prn.pro.p2.mf.pl"/>
    </def-cat>

    <def-cat n="prnpro3">   	  	  
      <cat-item lemma="el" tags="prn.pro.*"/>
      <cat-item lemma="en" tags="prn.pro.adv"/>
    </def-cat>
    
    <def-cat n="lopronom">
      <cat-item lemma="el" tags="prn.pro.p3.mf.sg"/>
    </def-cat>
    
    <def-cat n="perquè">   	  	  
      <cat-item lemma="perquè" tags="cnjadv"/>
    </def-cat>
    
    <def-cat n="nosaltres">
      <cat-item lemma="nosaltres" tags="prn.tn.p1.mf.pl"/>
      <cat-item lemma="vosaltres" tags="prn.tn.p2.mf.pl"/>
    </def-cat>
    

    <def-cat n="verb">
      <cat-item tags="vblex.*"/>
      <cat-item tags="vbser.*"/>
      <cat-item tags="vbhaver.*"/>
      <cat-item tags="vbmod.*"/>
    </def-cat>
    <def-cat n="ser_estar">
      <cat-item tags="vbser.*"/>
      <cat-item lemma="estar" tags="vblex.*"/>
    </def-cat>
    
    <def-cat n="subj">
      <cat-item tags="vblex.pis.*"/>
      <cat-item tags="vblex.prs.*"/>
      <cat-item tags="vbser.pis.*"/>
      <cat-item tags="vbser.prs.*"/>
      <cat-item tags="vbmod.pis.*"/>
      <cat-item tags="vbmod.prs.*"/>
    </def-cat>

    <def-cat n="haversubj">
      <cat-item tags="vbhaver.pis.*"/>
      <cat-item tags="vbhaver.prs.*"/>
    </def-cat>

    <def-cat n="caldre">
      <cat-item lemma="caldre" tags="vbmod.*"/>
    </def-cat>

    <def-cat n="inf">
      <cat-item tags="vblex.inf"/>
      <cat-item tags="vbser.inf"/>
      <cat-item tags="vbhaver.inf"/>
      <cat-item tags="vbmod.inf"/>
    </def-cat>

    <def-cat n="infnm">
      <cat-item tags="vblex.inf"/>
      <cat-item tags="vbser.inf"/>
      <cat-item tags="vbhaver.inf"/>
    </def-cat>

    <def-cat n="infnh">
      <cat-item tags="vblex.inf"/>
      <cat-item tags="vbser.inf"/>
      <cat-item tags="vbmod.inf"/>
    </def-cat>

    <def-cat n="pp">
      <cat-item tags="vblex.pp.*"/>
      <cat-item tags="vbser.pp.*"/>
      <cat-item tags="vbhaver.pp.*"/>
      <cat-item tags="vbmod.pp.*"/>
    </def-cat>
    
    <def-cat n="ppf">
      <cat-item tags="vblex.pp.f.sg"/>
      <cat-item tags="vbhaver.pp.f.sg"/>
      <cat-item tags="vbmod.pp.f.sg"/>
    </def-cat>

    <def-cat n="ppfmpl">
      <cat-item tags="vblex.pp.f.*"/>
      <cat-item tags="vbhaver.pp.f.*"/>
      <cat-item tags="vbmod.pp.f.*"/>
      <cat-item tags="vblex.pp.m.pl"/>
      <cat-item tags="vbhaver.pp.m.pl"/>
      <cat-item tags="vbmod.pp.m.pl"/>
    </def-cat>

    <def-cat n="num">
      <cat-item tags="num.*"/>
      <cat-item tags="num"/>
    </def-cat>

    <def-cat n="multiHiha">
      <cat-item lemma="hi ha" tags="vblex.pri.p3.sg"/>
    </def-cat>


    <def-cat n="anar">
      <cat-item lemma="anar" tags="vblex.pri.*"/>
    </def-cat>

    <def-cat n="en">
      <cat-item lemma="en" tags="pr"/>
    </def-cat>

    <def-cat n="a">
      <cat-item lemma="a" tags="pr"/>
    </def-cat>

    <def-cat n="per">
      <cat-item lemma="per" tags="pr"/>
    </def-cat>

    <def-cat n="dir">
      <cat-item lemma="dir" tags="vblex.pri.*"/>
      <cat-item lemma="dir" tags="vblex.fti.*"/>
    </def-cat>

    <def-cat n="haver">
      <cat-item lemma="haver" tags="vbhaver.*"/>
    </def-cat>

    <def-cat n="tot">
      <cat-item lemma="tot" tags="predet.*"/>
      <cat-item lemma="tot" tags="prn.tn.m.sg"/>
    </def-cat>

    <def-cat n="i">
      <cat-item lemma="i" tags="cnjcoo"/>
    </def-cat>

    <def-cat n="no">
      <cat-item lemma="no" tags="adv"/>
    </def-cat>

    <def-cat n="sent">
      <cat-item tags="sent"/>
    </def-cat>

  </section-def-cats>

  <section-def-attrs>

    <def-attr n="a_nom">
      <attr-item tags="n"/>
      <attr-item tags="n.acr"/>
      <attr-item tags="np.loc"/>
    </def-attr>

    <def-attr n="a_npant">
      <attr-item tags="np.ant"/>
    </def-attr>

    <def-attr n="a_nploc">
      <attr-item tags="np.loc"/>
    </def-attr>        

    <def-attr n="a_det">          
      <attr-item tags="det.def"/>
      <attr-item tags="det.ind"/>
      <attr-item tags="det.dem"/>
      <attr-item tags="det.pos"/>
      <attr-item tags="predet"/>
    </def-attr>

    <def-attr n="a_detdef">
      <attr-item tags="det.def"/>
    </def-attr>
    
    <def-attr n="a_predet">
      <attr-item tags="predet"/>
    </def-attr>

    <def-attr n="a_adjec">          
      <attr-item tags="adj.ind"/>
      <attr-item tags="adj.sup"/>
      <attr-item tags="adj.itg"/>
      <attr-item tags="adj.pos"/>
      <attr-item tags="adj"/>
      <attr-item tags="vblex.pp"/>
      <attr-item tags="vblex.v2.pp"/>
    </def-attr>

    <def-attr n="a_adj">          
      <attr-item tags="adj.ind"/>
      <attr-item tags="adj.sup"/>
      <attr-item tags="adj.itg"/>
      <attr-item tags="adj.pos"/>
      <attr-item tags="adj"/>
      <attr-item tags="vblex.pp"/>
      <attr-item tags="vblex.v2.pp"/>
    </def-attr>

    <def-attr n="a_adv">
      <attr-item tags="adv"/>
      <attr-item tags="preadv"/>
    </def-attr>

    <def-attr n="a_prep">
      <attr-item tags="pr"/>
    </def-attr>    

    

    <def-attr n="a_relat">
      <attr-item tags="rel.adv"/>
      <attr-item tags="rel.nn"/>
      <attr-item tags="rel.aa"/>
      <attr-item tags="rel.an"/>
    </def-attr>

    <def-attr n="a_prn">          	  	  
      <attr-item tags="prn.tn.p1"/>
      <attr-item tags="prn.tn.p2"/>
      <attr-item tags="prn.tn.p3"/>
      <attr-item tags="prn.tn"/>	 
      <attr-item tags="prn.tn.ref.p3"/>	 
      <attr-item tags="prn.tn.pos"/>	     
      
      <attr-item tags="prn.itg"/>	 	 	
    </def-attr>

    <def-attr n="a_prnenc">   	  	  
      <attr-item tags="prn.enc"/>
      <attr-item tags="prn.enc.ref"/>
    </def-attr>     

    <def-attr n="a_prnpro">   	  	  
      <attr-item tags="prn.pro"/>
      <attr-item tags="prn.pro.ref"/>
    </def-attr>

    <def-attr n="a_verb">
      <attr-item tags="vblex"/>
     <!-- <attr-item tags="vblex.v2"/>-->
      <attr-item tags="vbser"/>
      <attr-item tags="vbhaver"/>
      <attr-item tags="vbmod"/>
    </def-attr>

    <def-attr n="a_val">
      <attr-item tags="v2"/>
    </def-attr>

    <def-attr n="a_inf">
      <attr-item tags="vblex.inf"/>
<!--      <attr-item tags="vblex.v2.inf"/>-->
      <attr-item tags="vbser.inf"/>
      <attr-item tags="vbhaver.inf"/>
      <attr-item tags="vbmod.inf"/>
    </def-attr>

    <def-attr n="a_infnm">
      <attr-item tags="vblex.inf"/>
<!--      <attr-item tags="vblex.v2.inf"/>-->
      <attr-item tags="vbser.inf"/>
      <attr-item tags="vbhaver.inf"/>
    </def-attr>

    <def-attr n="a_infnh">
      <attr-item tags="vblex.inf"/>
<!--      <attr-item tags="vblex.v2.inf"/>-->
      <attr-item tags="vbser.inf"/>
      <attr-item tags="vbmod.inf"/>
    </def-attr>

    <def-attr n="a_pp">
      <attr-item tags="vblex.pp"/>
<!--      <attr-item tags="vblex.v2.pp"/>-->
      <attr-item tags="vbser.pp"/>
      <attr-item tags="vbhaver.pp"/>
      <attr-item tags="vbmod.pp"/>
    </def-attr>
    
    
    <def-attr n="a_num">
      <attr-item tags="num"/>
    </def-attr>

    <def-attr n="gen">
      <attr-item tags="m"/>
      <attr-item tags="f"/>
      <attr-item tags="mf"/>
      <attr-item tags="GD"/>
      <attr-item tags="nt"/>
    </def-attr>

    <def-attr n="nbr">
      <attr-item tags="sg"/>
      <attr-item tags="pl"/>
      <attr-item tags="sp"/>
      <attr-item tags="ND"/>
    </def-attr>

    <def-attr n="persona">
      <attr-item tags="p1"/>
      <attr-item tags="p2"/>
      <attr-item tags="p3"/>
    </def-attr>

    <def-attr n="tipoadv">
      <attr-item tags="itg"/>     
    </def-attr>
    
    
    <def-attr n="tipoenc_pro">
      <attr-item tags="ref.p3.mf.sp"/>  
      <attr-item tags="p1.mf.sg"/>
      <attr-item tags="p1.mf.pl"/>
      <attr-item tags="p2.mf.sg"/>
      <attr-item tags="p2.mf.pl"/>
      <attr-item tags="p3.mf.sg"/>
      <attr-item tags="p3.mf.pl"/>
      <attr-item tags="p3.mf.sp"/> <!--incorrecte, tradueix "li<prn><enc><p3><mf><sp>" per "se", cal canviar diccionari ja que és li-ho<sg> i los-ho<pl> (dárselo)-->
      <attr-item tags="p3.m.sg"/>
      <attr-item tags="p3.m.pl"/>
      <attr-item tags="p3.f.sg"/>
      <attr-item tags="p3.f.pl"/>
      <attr-item tags="p3.nt"/>
    </def-attr>

    <def-attr n="temps">
      <attr-item tags="inf"/>
      <attr-item tags="ger"/>
      <attr-item tags="pp"/>
      <attr-item tags="pri"/>
      <attr-item tags="ifi"/>
      <attr-item tags="pii"/>
      <attr-item tags="fti"/>
      <attr-item tags="cni"/>
      <attr-item tags="prs"/>
      <attr-item tags="pis"/>
      <attr-item tags="fts"/>
      <attr-item tags="imp"/>
    </def-attr>

    
  </section-def-attrs>

  <section-def-vars>
    <def-var n="valverb"/>
    <def-var n="prepo"/>
    <def-var n="hi"/>
    <def-var n="tipusverb"/>
    <def-var n="uno"/>
    <def-var n="genero"/>
    <def-var n="numero"/>
    <def-var n="concDet"/>
    <def-var n="concAdj"/>
    <def-var n="concPrimero"/>
    <def-var n="concSegundo"/>
    <def-var n="concTercero"/>
    <def-var n="interrogativa"/>
    <def-var n="exclamativa"/>
  </section-def-vars>

  <section-def-lists>
    <def-list n="huma">
      <list-item v="chico"/>
      <list-item v="niño"/>
      <list-item v="menor"/>      
      <list-item v="administración"/>
      <list-item v="empresa"/>
    </def-list>
    <def-list n="verbs_moviment">
      <list-item v="anar"/>
      <list-item v="traslladar"/>
      <list-item v="viatjar"/>
      <list-item v="emigrar"/>
      <list-item v="inmigrar"/>
      <list-item v="moure"/>
      <list-item v="venir"/>
      <list-item v="vindre"/>
      <list-item v="eixir"/>
      <list-item v="sortir"/>
      <list-item v="entrar"/>
      <list-item v="pujar"/>
      <list-item v="baixar"/>
      <list-item v="caminar"/>
      <list-item v="dirigir"/>
      <list-item v="apropar"/>
      <list-item v="córrer"/>
      <list-item v="portar"/>
      <list-item v="tornar"/>
      <list-item v="regressar"/>
      <list-item v="arribar"/>
      <list-item v="marxar"/>
      <list-item v="enviar"/>
      <list-item v="fer #costat"/>
    </def-list>
    
    <def-list n="verbs_estat">
      <list-item v="conviure"/>
      <list-item v="viure"/>
      <list-item v="actuar"/>
      <list-item v="allotjar"/>
      <list-item v="assentar"/>
      <list-item v="buscar"/>
      <list-item v="celebrar"/>
      <list-item v="centralitzar"/>
      <list-item v="cercar"/>
      <list-item v="col·locar"/>
      <list-item v="concentrar"/>
      <list-item v="desembocar"/>
      <list-item v="endinsar"/>
      <list-item v="establir"/>
      <list-item v="estrenar"/>
      <list-item v="excavar"/>
      <list-item v="exercir"/>
      <list-item v="existir"/>
      <list-item v="exposar"/>
      <list-item v="ficar"/>
      <list-item v="inaugurar"/>
      <list-item v="incloure"/>
      <list-item v="indagar"/>
      <list-item v="ingressar"/>
      <list-item v="inserir"/>
      <list-item v="instal·lar"/>
      <list-item v="introduir"/>
      <list-item v="irrompre"/>
      <list-item v="penetrar"/>
      <list-item v="pescar"/>
      <list-item v="publicar"/>
      <list-item v="reunir"/>
      <list-item v="romandre"/>
      <list-item v="treballar"/>
      <list-item v="trobar"/>
      <list-item v="ubicar"/> 
      <list-item v="estudiar"/> 
      <list-item v="retenir"/> 
    </def-list>
    <def-list n="per_de">
      <list-item v="lalala"/>
    </def-list>
    <def-list n="locatiu">
      <list-item v="món"/>
      <list-item v="seu"/>
      <list-item v="base"/>
      <list-item v="ascensor"/>
      <list-item v="carrer"/>
      <list-item v="plaça"/>
 <!--     <list-item v="mercat"/>-->
      <list-item v="zona"/>
      <list-item v="àrea"/>
      <list-item v="comarca"/>
      <list-item v="barri"/>
      <list-item v="ciutat"/>
      <list-item v="província"/>
      <list-item v="illa"/>
      <list-item v="país"/>
      <list-item v="planeta"/>
      <list-item v="parlament"/>
      <list-item v="casa"/>
      <list-item v="tren"/>
      <list-item v="universitat"/>
      <list-item v="roba"/>
      <list-item v="escola"/>
      <list-item v="congrés"/>
      <list-item v="domicili"/>
      <list-item v="urbanització"/>
      <list-item v="presó"/>
      <list-item v="fàbrica"/>
      <list-item v="muntanya"/>
      <list-item v="cambra"/>
      <list-item v="habitació"/>
      <list-item v="vall"/>
      <list-item v="frontera"/>
      <list-item v="castell"/>
      <list-item v="sala"/>
      <list-item v="declaració"/>
      <list-item v="església"/>
      <list-item v="festa"/>
      <list-item v="esplanada"/>
      <list-item v="internet"/>
      <list-item v="ajuntament"/>
      <list-item v="polígon"/>
      <list-item v="auditori"/>
      <list-item v="estranger"/>
      <list-item v="poble"/>
      <list-item v="portal"/>
      <list-item v="canal"/>
      <list-item v="terra"/>
      <list-item v="torre"/>
      <list-item v="pati"/>
      <list-item v="programació"/>
      <list-item v="programa"/>
      <list-item v="aula"/>
      <list-item v="edifici"/>
      <list-item v="hospital"/>
      <list-item v="cambra"/>
      <list-item v="internet"/>
      <list-item v="programari"/>
      <list-item v="principat"/>
      <list-item v="banc"/>
      <list-item v="botiga"/>
      <list-item v="franja"/>
      <list-item v="senat"/>
      <list-item v="comtat"/>
      <list-item v="govern"/>
      <list-item v="capital"/>
      <list-item v="segle"/>
      <list-item v="estat"/>
      <list-item v="pressupost"/>
      <list-item v="hotel"/>
      <list-item v="cinema"/>
      <list-item v="apartament"/>
      <list-item v="platja"/>
      <list-item v="pàgina"/>
      <list-item v="mà"/>
      <list-item v="campus"/>
      <list-item v="territori"/>
      <list-item v="UOC"/>
      <list-item v="xarxa"/>
      <list-item v="parc"/>
      <list-item v="dutxa"/>
      <list-item v="regió"/>
      <list-item v="catàleg"/> <!-- a="mireiafarrus" -->
      <list-item v="biblioteca"/> <!-- a="mireiafarrus" -->
      <list-item v="centre"/> <!-- a="mireiafarrus" per solucionar "al centre de suport">"*al centro de apoyo" -->
    </def-list>

    <def-list n="dies">
      <list-item v="dilluns"/>
      <list-item v="dimarts"/>
      <list-item v="dimecres"/>
      <list-item v="dijous"/>
      <list-item v="divendres"/>
      <list-item v="dissabte"/>
      <list-item v="diumenge"/>
    </def-list>
    
    <def-list n="mesos">
      <list-item v="gener"/>
      <list-item v="febrer"/>
      <list-item v="març"/>
      <list-item v="abril"/>
      <list-item v="maig"/>
      <list-item v="juny"/>
      <list-item v="juliol"/>
      <list-item v="agost"/>
      <list-item v="setembre"/>
      <list-item v="octubre"/>
      <list-item v="novembre"/>
      <list-item v="desembre"/>
    </def-list>


  </section-def-lists>

  <section-def-macros>
    <def-macro n="f_enviaa" npar="1">
      <choose>
	<when>
	  <test>
	    <and>
	      <equal>
		<var n="valverb"/>
		<lit v="2"/>
	      </equal>
	      <or>
		<equal>
		  <clip pos="1" side="sl" part="a_npant"/>
		  <lit-tag v="np.ant"/>
		</equal>
		<in caseless="yes">
		  <clip pos="1" side="tl" part="lem"/>
		  <list n="huma"/>
		</in>
	      </or>
	    </and>
	  </test>
	  <out>
	    <lu>
	      <lit v="a"/>
	      <lit-tag v="pr"/>
	    </lu>
	    <b/>
	    
	  </out>
	</when>
      </choose>
      <let>
	<var n="valverb"/>
	<lit v=""/>
      </let>
    </def-macro>


    <def-macro n="marca_no" npar="1">
      <choose>
	<when>
	  <test>
	    <equal caseless="yes">
	      <clip pos="1" side="sl" part="lem"/>
	      <lit v="no"/>
	    </equal>
	  </test>
	  <let>
	    <var n="no"/>
	    <lit v="yes"/>
	  </let>
	</when>
      </choose>
    </def-macro>
    
    <def-macro n="f_tipusverb" npar="1">
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="a_val"/>
	      <lit-tag v="v2"/>
	    </equal>
	  </test>
	  <let>
	    <var n="valverb"/>
	    <lit v="2"/>
	  </let>
	</when>
      </choose>
      <choose>
	<when>
	  <test>
	    <in caseless="yes">
	      <clip pos="1" side="sl" part="lem"/>
	      <list n="per_de"/>
	    </in>
	  </test>
	  <let>
	    <var n="tipusverb"/>
	    <lit v="vbper_de"/>
	  </let>
	</when>
	<when>
	  <test>
	    <in caseless="yes">
	      <clip pos="1" side="sl" part="lem"/>
	      <list n="verbs_estat"/>
	    </in>
	  </test>
	  <let>
	    <var n="tipusverb"/>
	    <lit v="vba_en"/>
	  </let>
	</when>
	<when>
	  <test>
	    <in caseless="yes">
	      <clip pos="1" side="sl" part="lem"/>
	      <list n="verbs_moviment"/>
	    </in>
	  </test>
	  <let>
	    <var n="tipusverb"/>
	    <lit v="verbmov"/>
	  </let>
	</when>
      </choose>
      <call-macro n="f_serhi">
	<with-param pos="1"/>
      </call-macro>
    </def-macro>

    <def-macro n="f_hi" npar="1">
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="1" side="sl" part="lem"/>
	      <lit v="hi"/>
	    </equal>
	  </test>
	  <let>
	    <var n="hi"/>
	    <lit v="yes"/>
	  </let>
	</when>
      </choose>
    </def-macro>
    
    <def-macro n="f_serhi" npar="1">
      <choose>
	<when>
	  <test>
	    <and>
	      <or>
		<equal>
		  <clip pos="1" side="sl" part="a_verb"/>
		  <lit-tag v="vbser"/>
		</equal>
		<equal>
		  <clip pos="1" side="sl" part="lem"/>
		  <lit v="restar"/>
		</equal>
	      </or>
	      <equal>
		<var n="hi"/>
		<lit v="yes"/>
	      </equal>
	    </and>
	  </test>
	  <let>
	    <clip pos="1" side="tl" part="a_verb"/>
	    <lit-tag v="vblex"/>
	  </let>
	  <let>
	    <clip pos="1" side="tl" part="lem"/>
	    <lit v="estar"/>
	  </let>
	</when>
      </choose>
      <let>
	<var n="hi"/>
	<lit v=""/>
      </let>
    </def-macro>
    
    <def-macro n="f_preps" npar="2">
      
      <choose> 
	<when>
	  <test>
	    <equal caseless="yes">
	      <clip pos="1" side="sl" part="lem"/>
	      <lit v="de"/>
	    </equal>
	  </test>
	 
	 
	  <choose>
	    <when>
	      <test>
		<equal>
		  <var n="tipusverb"/>
		  <lit v="vbde_per"/>
		</equal>
	      </test>
	      
	      <let>
		<clip pos="1" side="tl" part="lem"/>
		<get-case-from pos="1">
		  <lit v="per"/>
		</get-case-from>
	      </let>
	    </when>
	    <otherwise>
	      <let>
		<var n="prepo"/>
		<lit v="de"/>
	      </let>
	    </otherwise>
	  </choose>	  
	</when>

	<when>
	  <test>
	    <equal caseless="yes">
	      <clip pos="1" side="sl" part="lem"/>
	      <lit v="a"/>
	    </equal>
	  </test>
	  <choose>
	    <when>
	      <test>
		<or>
		  <equal>
		    <var n="tipusverb"/>
		    <lit v="vba_en"/>
		  </equal>
		  <and>
		    <in caseless="yes">
		      <clip pos="2" side="sl" part="lem"/>
		      <list n="locatiu"/>
		    </in>
		    <not>
		      <equal>
			<var n="prepo"/>
			<lit v="de"/>
		      </equal>
		    </not>
		    <not>
		      <equal>
			<var n="tipusverb"/>
			<lit v="verbmov"/>
		      </equal>
		    </not>
		  </and>
		</or>		
	      </test>
	      <let>
		<clip pos="1" side="tl" part="lem"/>
		<get-case-from pos="1">
		  <lit v="en"/>
		</get-case-from>
	      </let>
	    </when>
	  </choose>
	  <let>
	    <var n="prepo"/>
	    <lit v=""/>
	  </let>
	  
	</when>
      </choose>
      <out>
	<lu>
	  <clip pos="1" side="tl" part="whole"/>
	</lu>
	<b pos="1"/>
      </out>
      <let>
	<var n="tipusverb"/>
	<lit v=""/>
      </let>
      
    </def-macro>

    <def-macro n="f_bcond" npar="1"><!--Per mirar si el blanc conté o no format. Cal posar aquesta funció en les regles en què desaparegui alguna paraula, per tal de decidir si el blanc de la paraula eliminada s'ha d'eliminar o conservar. Si conté format cal conservar-la, si no en conté cal eliminar-la perquè no apareguin dos espais seguits. -->
      <choose>
	<when>
	  <test>
	    <not>
	      <equal>
		<b pos="1"/>
		<lit v=" "/>
	      </equal>
	    </not>
	  </test>
	  <out>
	    <b pos="1"/>
	  </out>
	</when>     	    
      </choose>
    </def-macro>

    <def-macro n="f_outverb2" npar="2"><!--Comprueba si hay pronombres que se traducen por nada de catalán a español según el diccionario ("hi" y "en") y envía el verbo con o sin pronombres de acuerdo con esta comprobación. Esta función es para el caso de verbo + 1 enclítico. Función necesaria para el correcto colocamiento de la cola en multipalabras con flexión intercalada. -->
      <choose>
	<when>
	  <test>
	    <not>
	      <equal>
		<clip pos="2" side="tl" part="lem"/>
		<lit v=""/>
	      </equal>
	    </not>
	  </test>
	  <out>
	    <mlu>
	      <lu>
		<clip pos="1" side="tl" part="lemh"/>
		<clip pos="1" side="tl" part="a_verb"/>
		<clip pos="1" side="tl" part="temps"/>
		<clip pos="1" side="tl" part="persona"/>
		<clip pos="1" side="tl" part="nbr"/>
	      </lu>
	      <lu>
		<clip pos="2" side="tl" part="lem"/>
		<clip pos="2" side="tl" part="a_prnenc"/>
		<clip pos="2" side="tl" part="persona"/>
		<clip pos="2" side="tl" part="gen"/>
		<clip pos="2" side="tl" part="nbr"/>
		<clip pos="1" side="tl" part="lemq"/>
	      </lu>  
	    </mlu>
	  </out>
	</when>
	<otherwise>
	  <call-macro n="f_hi">
	    <with-param pos="1"/>
	  </call-macro>
	  <call-macro n="f_serhi">
	    <with-param pos="1"/>
	  </call-macro>
	  <out>
	    <lu>
	      <clip pos="1" side="tl" part="lemh"/>
	      <clip pos="1" side="tl" part="a_verb"/>
	      <clip pos="1" side="tl" part="temps"/>
	      <clip pos="1" side="tl" part="persona"/>
	      <clip pos="1" side="tl" part="nbr"/>
	      <clip pos="1" side="tl" part="lemq"/>
	    </lu>
	  </out>
	</otherwise>
      </choose>
    </def-macro>

    <def-macro n="f_outverb3" npar="3"><!--Comprueba si hay pronombres que se traducen por nada de catalán a español según el diccionario ("hi" y "en") y envía el verbo con o sin pronombres de acuerdo con esta comprobación. Esta función es para el caso de verbo + 2 enclíticos.-->
      <choose>
	<when>
	  <test>
	    <not>
	      <equal>
		<clip pos="2" side="tl" part="lem"/>
		<lit v=""/>
	      </equal>
	    </not>
	  </test>
	  <choose>
	    <when>
	      <test>
		<not>
		  <equal>
		    <clip pos="3" side="tl" part="lem"/>
		    <lit v=""/>
		  </equal>
		</not>
	      </test>
	      <out>
		<mlu>
		  <lu>
		    <clip pos="1" side="tl" part="lemh"/>
		    <clip pos="1" side="tl" part="a_verb"/>
		    <clip pos="1" side="tl" part="temps"/>
		    <clip pos="1" side="tl" part="persona"/>
		    <clip pos="1" side="tl" part="nbr"/>
		  </lu>
		  <lu>
		    <clip pos="2" side="tl" part="lem"/>
		    <clip pos="2" side="tl" part="a_prnenc"/>
		    <clip pos="2" side="tl" part="persona"/>
		    <clip pos="2" side="tl" part="gen"/>
		    <clip pos="2" side="tl" part="nbr"/>
		  </lu>
		  <lu>
		    <clip pos="3" side="tl" part="lem"/>
		    <clip pos="3" side="tl" part="a_prnenc"/>
		    <clip pos="3" side="tl" part="persona"/>
		    <clip pos="3" side="tl" part="gen"/>
		    <clip pos="3" side="tl" part="nbr"/>
		    <clip pos="1" side="tl" part="lemq"/>
		  </lu>    
		</mlu>
	      </out>
	    </when>
	    <otherwise>
	      <out>
		<mlu>
		  <lu>
		    <clip pos="1" side="tl" part="lemh"/>
		    <clip pos="1" side="tl" part="a_verb"/>
		    <clip pos="1" side="tl" part="temps"/>
		    <clip pos="1" side="tl" part="persona"/>
		    <clip pos="1" side="tl" part="nbr"/>
		  </lu>
		  <lu>
		    <clip pos="2" side="tl" part="lem"/>
		    <clip pos="2" side="tl" part="a_prnenc"/>
		    <clip pos="2" side="tl" part="persona"/>
		    <clip pos="2" side="tl" part="gen"/>
		    <clip pos="2" side="tl" part="nbr"/>
		    <clip pos="1" side="tl" part="lemq"/>
		  </lu>  
		</mlu>
	      </out> 
	    </otherwise>
	  </choose>
	</when>
	<otherwise>
	  <out>
	    <lu>
	      <clip pos="1" side="tl" part="lemh"/>
	      <clip pos="1" side="tl" part="a_verb"/>
	      <clip pos="1" side="tl" part="temps"/>
	      <clip pos="1" side="tl" part="persona"/>
	      <clip pos="1" side="tl" part="nbr"/>
	      <clip pos="1" side="tl" part="lemq"/>
	    </lu>
	  </out>
	</otherwise>
      </choose>
    </def-macro>

    <def-macro n="f_concord1" npar="1">
      
      <choose><!--To determine value of variables of gender and
		  number and propagate to other rules.  Variables are
		  not used again in this rule -->
	<when> 
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="gen"/>
	      <lit-tag v="m"/>
	    </equal>
	  </test>
	  <let><var n="genero"/><lit-tag v="m"/></let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="gen"/>
	      <lit-tag v="f"/>
	    </equal>
	  </test>
	  <let><var n="genero"/><lit-tag v="f"/></let>
	</when>
      </choose> 
      <choose>
	<when> 
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="nbr"/>
	      <lit-tag v="sg"/>
	    </equal>
	  </test>
	  <let><var n="numero"/><lit-tag v="sg"/></let>
	</when>
	<when> 
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="nbr"/>
	      <lit-tag v="pl"/>
	    </equal>
	  </test>
	  <let><var n="numero"/><lit-tag v="pl"/></let>
	</when>
      </choose>
      <choose>
	<when>
	  <test> <!-- If word has GD or ND, we try to assign the
		      gender or number of the previous rule. If there is no
		      value for the gender or number variable from previous
		      rules, gender will be masculine and number singular.-->
	    <equal>
	      <clip pos="1" side="tl" part="gen"/>
	      <lit-tag v="GD"/>
	    </equal>
	  </test>
	  <choose> 
	    <when>
	      <test>
		<equal>
		  <var n="genero"/>
		  <lit-tag v="f"/>
		</equal>
	      </test>
	      <let><clip pos="1" side="tl" part="gen"/><lit-tag v="f"/></let>
	    </when>
	    <otherwise>
	      <let><clip pos="1" side="tl" part="gen"/><lit-tag v="m"/></let>
	    </otherwise>
	  </choose>
	</when>
      </choose>
      <choose>
	<when>
	  <test> 
	    <equal>
	      <clip pos="1" side="tl" part="nbr"/>
	      <lit-tag v="ND"/>
	    </equal>
	  </test>
	  <choose> 
	    <when>
	      <test>
		<equal>
		  <var n="numero"/>
		  <lit-tag v="pl"/>
		</equal>
	      </test>
	      <let><clip pos="1" side="tl" part="nbr"/><lit-tag v="pl"/></let>                   
	    </when>
	    <otherwise>
	      <let><clip pos="1" side="tl" part="nbr"/><lit-tag v="sg"/></let>
	    </otherwise>
	  </choose>
	</when>
      </choose>    
    </def-macro>


    <def-macro n="f_concord2" npar="2">
      <choose>
	<when>
	  <test> <!-- do the main and second parameter gender agree?-->
	    <and>
	      <or>
		<equal>
		  <clip pos="2" side="sl" part="gen"/>
		  <clip pos="1" side="sl" part="gen"/>
		</equal>
		<equal>
		  <clip pos="2" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
		<equal>
		  <clip pos="1" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
	      </or>
	      <or>
		<equal> <!-- do the main and second parameter number agree?-->
		  <clip pos="2" side="sl" part="nbr"/>
		  <clip pos="1" side="sl" part="nbr"/>
		</equal>
		<equal>
		  <clip pos="2" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
		<equal>
		  <clip pos="1" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
	      </or>
	    </and>
	  </test>
	  <let><var n="concPrimero"/><lit v="true"/></let><!-- there is gender and number agreement-->
	</when>
	<otherwise> 
	  <let><var n="concPrimero"/><lit v="false"/></let><!-- there isn't gender and number agreement-->
	</otherwise>
      </choose>
      
      <choose>
	<when>
	  <test> <!-- Propagate the main parameter gender if it has been modified during the translation  -->
	    <and>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="gen"/>
		  <clip pos="1" side="sl" part="gen"/>
		</equal>
	      </not>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
	      </not>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="gen"/>
		  <lit-tag v="GD"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <choose>
	    <when>
	      <test>
		<and>
		  <not>
		    <equal>
		      <clip pos="2" side="tl" part="gen"/>
		      <lit-tag v="mf"/>
		    </equal>
		  </not>
		  <not>
		    <and>
		      <equal>
			<clip pos="2" side="sl" part="gen"/>
			<lit-tag v="mf"/>
		      </equal>
		      <not>
			<equal>
			  <clip pos="2" side="tl" part="gen"/>
			  <lit-tag v="GD"/>
			</equal>
		      </not>
		    </and>
		  </not>
		  <equal>
		    <var n="concPrimero"/>
		    <lit v="true"/>
		  </equal>
		</and>
	      </test>		 	       
	      <let>
		<clip pos="2" side="tl" part="gen"/>
		<clip pos="1" side="tl" part="gen"/> 
	      </let>
	    </when>
	  </choose>
	</when>
      </choose>  
      <choose>
	<when>
	  <test> <!-- Propagate the main parameter number if it has been modified during the translation  -->
	    <and>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="nbr"/>
		  <clip pos="1" side="sl" part="nbr"/>
		</equal>
	      </not>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
	      </not>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="nbr"/>
		  <lit-tag v="ND"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <choose>
	    <when>
	      <test>
		<and>
		  <not>
		    <equal>
		      <clip pos="2" side="tl" part="nbr"/>
		      <lit-tag v="sp"/>
		    </equal>
		  </not>
		  <not>
		    <and>
		      <equal>
			<clip pos="2" side="sl" part="nbr"/>
			<lit-tag v="sp"/>
		      </equal>
		      <not>
			<equal>
			  <clip pos="2" side="tl" part="nbr"/>
			  <lit-tag v="ND"/>
			</equal>
		      </not>
		    </and>
		  </not>
		  <equal>
		    <var n="concPrimero"/>
		    <lit v="true"/>
		  </equal>
		</and>
	      </test>
	      <let>
		<clip pos="2" side="tl" part="nbr"/>
		<clip pos="1" side="tl" part="nbr"/> 
	      </let>
	    </when>
	  </choose>
	</when>
      </choose>
      
      <choose>
	<when>
	  <test> <!-- Which is the rule general gender? -->
	    <equal>
	      <clip pos="1" side="tl" part="gen"/>
	      <lit-tag v="m"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="m"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="gen"/>
	      <lit-tag v="f"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="f"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="gen"/>
	      <lit-tag v="m"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="m"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="gen"/>
	      <lit-tag v="f"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="f"/>
	  </let>
	</when>
	<when>
	  <test>
	    <and>
	      <equal>
		<clip pos="1" side="tl" part="gen"/>
		<lit-tag v="mf"/>
	      </equal>
	      <not>
		<equal>
		  <clip pos="1" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <let>
	    <var n="genero"/>
	    <clip pos="1" side="sl" part="gen"/> 
	  </let>
	</when>
	<when>
	  <test>
	    <and>
	      <equal>
		<clip pos="2" side="tl" part="gen"/>
		<lit-tag v="mf"/>
	      </equal>
	      <not>
		<equal>
		  <clip pos="2" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <let>
	    <var n="genero"/>
	    <clip pos="2" side="sl" part="gen"/> 
	  </let>
	</when>
	<otherwise>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="m"/>
	  </let>
	</otherwise>
      </choose>



      <choose>
	<when><!-- Which is the rule general number? -->
	  <test> 
	    <equal>
	      <clip pos="1" side="tl" part="nbr"/>
	      <lit-tag v="sg"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="sg"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="nbr"/>
	      <lit-tag v="pl"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="pl"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="nbr"/>
	      <lit-tag v="sg"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="sg"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="nbr"/>
	      <lit-tag v="pl"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="pl"/>
	  </let>
	</when>
	<when>
	  <test>
	    <and>
	      <equal>
		<clip pos="1" side="tl" part="nbr"/>
		<lit-tag v="sp"/>
	      </equal>
	      <not>
		<equal>
		  <clip pos="1" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <let>
	    <var n="numero"/>
	    <clip pos="1" side="sl" part="nbr"/> 
	  </let>
	</when>
	<when>
	  <test>
	    <and>
	      <equal>
		<clip pos="2" side="tl" part="nbr"/>
		<lit-tag v="sp"/>
	      </equal>
	      <not>
		<equal>
		  <clip pos="2" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <let>
	    <var n="numero"/>
	    <clip pos="2" side="sl" part="nbr"/> 
	  </let>
	</when>
	<when>
	  <test>
	    <and>
	      <equal>
		<clip pos="2" side="tl" part="nbr"/>
		<lit-tag v="sp"/>
	      </equal>
	      <equal>
		<clip pos="1" side="tl" part="nbr"/>
		<lit-tag v="ND"/>
	      </equal>
	      <equal>
		<clip pos="2" side="tl" part="a_num"/>
		<lit-tag v="num"/>
	      </equal>
	    </and>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="pl"/>
	  </let>
	</when>
	<otherwise>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="sg"/>
	  </let>
	</otherwise>
      </choose>

      <choose> <!-- Determine gender and number value if they are undetermined -->
	<when>
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="gen"/>
	      <lit-tag v="GD"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="1" side="tl" part="gen"/>
	    <var n="genero"/>
	  </let>
	</when>
      </choose>
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="gen"/>
	      <lit-tag v="GD"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="2" side="tl" part="gen"/>
	    <var n="genero"/>
	  </let>
	</when>
      </choose>
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="nbr"/>
	      <lit-tag v="ND"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="1" side="tl" part="nbr"/>
	    <var n="numero"/>
	  </let>
	</when>
      </choose>
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="nbr"/>
	      <lit-tag v="ND"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="2" side="tl" part="nbr"/>
	    <var n="numero"/>
	  </let>
	</when>
      </choose>
    </def-macro>


    <def-macro n="f_concord3" npar="3"> 
      <choose><!-- Look if in source language there is concordance between first and second element -->
	<when>
	  <test> 
	    <and>
	      <or>
		<equal>
		  <clip pos="2" side="sl" part="gen"/>
		  <clip pos="1" side="sl" part="gen"/>
		</equal>
		<equal>
		  <clip pos="2" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
		<equal>
		  <clip pos="1" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
	      </or>
	      <or>
		<equal>
		  <clip pos="2" side="sl" part="nbr"/>
		  <clip pos="1" side="sl" part="nbr"/>
		</equal>
		<equal>
		  <clip pos="2" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
		<equal>
		  <clip pos="1" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
	      </or>
	    </and>
	  </test>
	  <let><var n="concPrimero"/><lit v="true"/></let>
	</when>
	<otherwise> 
	  <let><var n="concPrimero"/><lit v="false"/></let>
	</otherwise>
      </choose>
      <choose><!-- Look if in source language there is concordance between second and third element -->
	<when>
	  <test> 
	    <and>
	      <or>
		<equal>
		  <clip pos="3" side="sl" part="gen"/>
		  <clip pos="1" side="sl" part="gen"/>
		</equal>
		<equal>
		  <clip pos="3" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
		<equal>
		  <clip pos="1" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
	      </or>
	      <or>
		<equal>
		  <clip pos="3" side="sl" part="nbr"/>
		  <clip pos="1" side="sl" part="nbr"/>
		</equal>
		<equal>
		  <clip pos="3" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
		<equal>
		  <clip pos="1" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
	      </or>
	    </and>
	  </test>
	  <let><var n="concSegundo"/><lit v="true"/></let>
	</when>	 
	<otherwise> 
	  <let><var n="concSegundo"/><lit v="false"/></let>
	</otherwise>
      </choose>


      <choose><!-- Propagate the main parameter gender if it has been modified during the translation -->
	<when>
	  <test> 
	    <and>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="gen"/>
		  <clip pos="1" side="sl" part="gen"/>
		</equal>
	      </not>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
	      </not>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="gen"/>
		  <lit-tag v="GD"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <choose>
	    <when>
	      <test>
		<and>
		  <not>
		    <equal>
		      <clip pos="2" side="tl" part="gen"/>
		      <lit-tag v="mf"/>
		    </equal>
		  </not>
		  <not>
		    <and>
		      <equal>
			<clip pos="2" side="sl" part="gen"/>
			<lit-tag v="mf"/>
		      </equal>
		      <not>
			<equal>
			  <clip pos="2" side="tl" part="gen"/>
			  <lit-tag v="GD"/>
			</equal>
		      </not>
		    </and>
		  </not>
		  <equal>
		    <var n="concPrimero"/>
		    <lit v="true"/>
		  </equal>
		</and>
	      </test>
	      <let>
		<clip pos="2" side="tl" part="gen"/>
		<clip pos="1" side="tl" part="gen"/> 
	      </let>
	    </when> 
	  </choose>   
	  <choose>
	    <when>
	      <test> 
		<and>
		  <not>
		    <equal>
		      <clip pos="3" side="tl" part="gen"/>
		      <lit-tag v="mf"/>
		    </equal>
		  </not>
		  <not>
		    <and>
		      <equal>
			<clip pos="3" side="sl" part="gen"/>
			<lit-tag v="mf"/>
		      </equal>
		      <not>
			<equal>
			  <clip pos="3" side="tl" part="gen"/>
			  <lit-tag v="GD"/>
			</equal>
		      </not>
		    </and>
		  </not>
		  <equal>
		    <var n="concSegundo"/>
		    <lit v="true"/>
		  </equal>
		</and>
	      </test>
	      <let>
		<clip pos="3" side="tl" part="gen"/>
		<clip pos="1" side="tl" part="gen"/> 
	      </let> 
	    </when> 
	  </choose>
	</when>
      </choose>

      <choose><!-- Propagate the main parameter number if it has been modified during the translation -->
	<when>
	  <test> 
	    <and>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="nbr"/>
		  <clip pos="1" side="sl" part="nbr"/>
		</equal>
	      </not>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
	      </not>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="nbr"/>
		  <lit-tag v="ND"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <choose>
	    <when>
	      <test>
		<and>
		  <not>
		    <equal>
		      <clip pos="2" side="tl" part="nbr"/>
		      <lit-tag v="sp"/>
		    </equal>
		  </not>
		  <not>
		    <and>
		      <equal>
			<clip pos="2" side="sl" part="nbr"/>
			<lit-tag v="sp"/>
		      </equal>
		      <not>
			<equal>
			  <clip pos="2" side="tl" part="nbr"/>
			  <lit-tag v="ND"/>
			</equal>
		      </not>
		    </and>
		  </not>
		  <equal>
		    <var n="concPrimero"/>
		    <lit v="true"/>
		  </equal>
		</and>
	      </test>
	      <let>
		<clip pos="2" side="tl" part="nbr"/>
		<clip pos="1" side="tl" part="nbr"/> 
	      </let>
	    </when>
	  </choose>
	  <choose>
	    <when>
	      <test>
		<and>
		  <not>
		    <equal>
		      <clip pos="3" side="tl" part="nbr"/>
		      <lit-tag v="sp"/>
		    </equal>
		  </not>
		  <not>
		    <and>
		      <equal>
			<clip pos="3" side="sl" part="nbr"/>
			<lit-tag v="sp"/>
		      </equal>
		      <not>
			<equal>
			  <clip pos="3" side="tl" part="nbr"/>
			  <lit-tag v="ND"/>
			</equal>
		      </not>
		    </and>
		  </not>
		  <equal>
		    <var n="concSegundo"/>
		    <lit v="true"/>
		  </equal>
		</and>
	      </test>
	      <let>
		<clip pos="3" side="tl" part="nbr"/>
		<clip pos="1" side="tl" part="nbr"/> 
	      </let>
	    </when>
	  </choose>
	</when>
      </choose>



      <choose> <!-- Determine the rule general gender. Priority order: main, second and third element -->
	<when>
	  <test> 
	    <equal>
	      <clip pos="1" side="tl" part="gen"/>
	      <lit-tag v="m"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="m"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="gen"/>
	      <lit-tag v="f"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="f"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="gen"/>
	      <lit-tag v="m"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="m"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="gen"/>
	      <lit-tag v="f"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="f"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="3" side="tl" part="gen"/>
	      <lit-tag v="m"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="m"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="3" side="tl" part="gen"/>
	      <lit-tag v="f"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="f"/>
	  </let>
	</when> 
	<when>
	  <test>
	    <and>
	      <equal>
		<clip pos="1" side="tl" part="gen"/>
		<lit-tag v="mf"/>
	      </equal>
	      <not>
		<equal>
		  <clip pos="1" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <let>
	    <var n="genero"/>
	    <clip pos="1" side="sl" part="gen"/> 
	  </let>
	</when>
	<when>
	  <test>
	    <and>
	      <equal>
		<clip pos="2" side="tl" part="gen"/>
		<lit-tag v="mf"/>
	      </equal>
	      <not>
		<equal>
		  <clip pos="2" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <let>
	    <var n="genero"/>
	    <clip pos="2" side="sl" part="gen"/> 
	  </let>
	</when>
	<when>
	  <test>
	    <and>
	      <equal>
		<clip pos="3" side="tl" part="gen"/>
		<lit-tag v="mf"/>
	      </equal>
	      <not>
		<equal>
		  <clip pos="3" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <let>
	    <var n="genero"/>
	    <clip pos="3" side="sl" part="gen"/> 
	  </let>
	</when>               
	<otherwise>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="m"/>
	  </let>
	</otherwise>
      </choose>
      
      <choose><!-- Determine the rule general number. Priority order: main, second and third element -->
	<when>
	  <test> 
	    <equal>
	      <clip pos="1" side="tl" part="nbr"/>
	      <lit-tag v="sg"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="sg"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="nbr"/>
	      <lit-tag v="pl"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="pl"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="nbr"/>
	      <lit-tag v="sg"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="sg"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="nbr"/>
	      <lit-tag v="pl"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="pl"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="3" side="tl" part="nbr"/>
	      <lit-tag v="sg"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="sg"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="3" side="tl" part="nbr"/>
	      <lit-tag v="pl"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="pl"/>
	  </let>
	</when>     
	<when>
	  <test>
	    <and>
	      <equal>
		<clip pos="1" side="tl" part="nbr"/>
		<lit-tag v="sp"/>
	      </equal>
	      <not>
		<equal>
		  <clip pos="1" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <let>
	    <var n="numero"/>
	    <clip pos="1" side="sl" part="nbr"/> 
	  </let>
	</when>
	<when>
	  <test>
	    <and>
	      <equal>
		<clip pos="2" side="tl" part="nbr"/>
		<lit-tag v="sp"/>
	      </equal>
	      <not>
		<equal>
		  <clip pos="2" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <let>
	    <var n="numero"/>
	    <clip pos="2" side="sl" part="nbr"/> 
	  </let>
	</when>
	<when>
	  <test>
	    <and>
	      <equal>
		<clip pos="3" side="tl" part="nbr"/>
		<lit-tag v="sp"/>
	      </equal>
	      <not>
		<equal>
		  <clip pos="3" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <let>
	    <var n="numero"/>
	    <clip pos="3" side="sl" part="nbr"/> 
	  </let>
	</when>	
	<when>
	  <test>
	    <and>
	      <equal>
		<clip pos="2" side="tl" part="nbr"/>
		<lit-tag v="sp"/>
	      </equal>
	      <equal>
		<clip pos="1" side="tl" part="nbr"/>
		<lit-tag v="ND"/>
	      </equal>
	      <equal>
		<clip pos="2" side="tl" part="a_num"/>
		<lit-tag v="num"/>
	      </equal>
	    </and>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="pl"/>
	  </let>
	</when>
	
	<otherwise>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="sg"/>
	  </let>
	</otherwise>
      </choose>

      <choose> <!-- Assign values to GD and ND -->
	<when>
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="gen"/>
	      <lit-tag v="GD"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="1" side="tl" part="gen"/>
	    <var n="genero"/>
	  </let>
	</when>
      </choose>
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="gen"/>
	      <lit-tag v="GD"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="2" side="tl" part="gen"/>
	    <var n="genero"/>
	  </let>
	</when>
      </choose>
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="3" side="tl" part="gen"/>
	      <lit-tag v="GD"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="3" side="tl" part="gen"/>
	    <var n="genero"/>
	  </let>
	</when>
      </choose>
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="nbr"/>
	      <lit-tag v="ND"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="1" side="tl" part="nbr"/>
	    <var n="numero"/>
	  </let>
	</when>
      </choose>
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="nbr"/>
	      <lit-tag v="ND"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="2" side="tl" part="nbr"/>
	    <var n="numero"/>
	  </let>
	</when>
      </choose>
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="3" side="tl" part="nbr"/>
	      <lit-tag v="ND"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="3" side="tl" part="nbr"/>
	    <var n="numero"/>
	  </let>
	</when>
      </choose>      
    </def-macro>     
    
    
    <def-macro n="f_concord4" npar="4">
      <choose>
	<when>
	  <test> 
	    <and>
	      <or>
		<equal>
		  <clip pos="2" side="sl" part="gen"/>
		  <clip pos="1" side="sl" part="gen"/>
		</equal>
		<equal>
		  <clip pos="2" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
		<equal>
		  <clip pos="1" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
	      </or>
	      <or>
		<equal>
		  <clip pos="2" side="sl" part="nbr"/>
		  <clip pos="1" side="sl" part="nbr"/>
		</equal>
		<equal>
		  <clip pos="2" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
		<equal>
		  <clip pos="1" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
	      </or>
	    </and>
	  </test>
	  <let><var n="concPrimero"/><lit v="true"/></let>
	</when>
	<otherwise> 
	  <let><var n="concPrimero"/><lit v="false"/></let>
	</otherwise>
      </choose>
      
      <choose>
	<when>
	  <test> 
	    <and>
	      <or>
		<equal>
		  <clip pos="3" side="sl" part="gen"/>
		  <clip pos="1" side="sl" part="gen"/>
		</equal>
		<equal>
		  <clip pos="3" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
		<equal>
		  <clip pos="1" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
	      </or>
	      <or>
		<equal>
		  <clip pos="3" side="sl" part="nbr"/>
		  <clip pos="1" side="sl" part="nbr"/>
		</equal>
		<equal>
		  <clip pos="3" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
		<equal>
		  <clip pos="1" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
	      </or>
	    </and>
	  </test>
	  <let><var n="concSegundo"/><lit v="true"/></let>
	</when>	 
	<otherwise>
	  <let><var n="concSegundo"/><lit v="false"/></let>
	</otherwise>
      </choose>

      <choose>
	<when>
	  <test> 
	    <and>
	      <or>
		<equal>
		  <clip pos="4" side="sl" part="gen"/>
		  <clip pos="1" side="sl" part="gen"/>
		</equal>
		<equal>
		  <clip pos="4" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
		<equal>
		  <clip pos="1" side="sl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
	      </or>
	      <or>
		<equal>
		  <clip pos="4" side="sl" part="nbr"/>
		  <clip pos="1" side="sl" part="nbr"/>
		</equal>
		<equal>
		  <clip pos="4" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
		<equal>
		  <clip pos="1" side="sl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
	      </or>
	    </and>
	  </test>
	  <let><var n="concTercero"/><lit v="true"/></let>
	</when>	 
	<otherwise> 
	  <let><var n="concTercero"/><lit v="false"/></let>
	</otherwise>
      </choose>
      

      <choose>
	<when>
	  <test> 
	    <and>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="gen"/>
		  <clip pos="1" side="sl" part="gen"/>
		</equal>
	      </not>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="gen"/>
		  <lit-tag v="mf"/>
		</equal>
	      </not>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="gen"/>
		  <lit-tag v="GD"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <choose>
	    <when>
	      <test>
		<and>
		  <not>
		    <equal>
		      <clip pos="2" side="tl" part="gen"/>
		      <lit-tag v="mf"/>
		    </equal>
		  </not>
		  <not>
		    <and>
		      <equal>
			<clip pos="2" side="sl" part="gen"/>
			<lit-tag v="mf"/>
		      </equal>
		      <not>
			<equal>
			  <clip pos="2" side="tl" part="gen"/>
			  <lit-tag v="GD"/>
			</equal>
		      </not>
		    </and>
		  </not>
		  <equal>
		    <var n="concPrimero"/>
		    <lit v="true"/>
		  </equal>
		</and>
	      </test>
	      <let>
		<clip pos="2" side="tl" part="gen"/>
		<clip pos="1" side="tl" part="gen"/> 
	      </let>
	    </when> 
	  </choose>
	  <choose>
	    <when>
	      <test>
		<and>
		  <not>
		    <equal>
		      <clip pos="3" side="tl" part="gen"/>
		      <lit-tag v="mf"/>
		    </equal>
		  </not>
		  <not>
		    <and>
		      <equal>
			<clip pos="3" side="sl" part="gen"/>
			<lit-tag v="mf"/>
		      </equal>
		      <not>
			<equal>
			  <clip pos="3" side="tl" part="gen"/>
			  <lit-tag v="GD"/>
			</equal>
		      </not>
		    </and>
		  </not>
		  <equal>
		    <var n="concSegundo"/>
		    <lit v="true"/>
		  </equal>
		</and>
	      </test>
	      <let>
		<clip pos="3" side="tl" part="gen"/>
		<clip pos="1" side="tl" part="gen"/> 
	      </let>
	    </when> 
	  </choose>  
	  <choose>
	    <when>
	      <test>  
		<and>
		  <not>
		    <equal>
		      <clip pos="4" side="tl" part="gen"/>
		      <lit-tag v="mf"/>
		    </equal>
		  </not>
		  <not>
		    <and>
		      <equal>
			<clip pos="4" side="sl" part="gen"/>
			<lit-tag v="mf"/>
		      </equal>
		      <not>
			<equal>
			  <clip pos="4" side="tl" part="gen"/>
			  <lit-tag v="GD"/>
			</equal>
		      </not>
		    </and>
		  </not>
		  <equal>
		    <var n="concTercero"/>
		    <lit v="true"/>
		  </equal>
		</and>
	      </test>
	      <let>
		<clip pos="4" side="tl" part="gen"/>
		<clip pos="1" side="tl" part="gen"/> 
	      </let> 
	    </when> 
	  </choose>
	</when>
      </choose>

      <choose>
	<when>
	  <test> 
	    <and>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="nbr"/>
		  <clip pos="1" side="sl" part="nbr"/>
		</equal>
	      </not>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="nbr"/>
		  <lit-tag v="sp"/>
		</equal>
	      </not>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="nbr"/>
		  <lit-tag v="ND"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <choose>
	    <when>
	      <test>
		<and>
		  <not>
		    <equal>
		      <clip pos="2" side="tl" part="nbr"/>
		      <lit-tag v="sp"/>
		    </equal>
		  </not>
		  <not>
		    <and>
		      <equal>
			<clip pos="2" side="sl" part="nbr"/>
			<lit-tag v="sp"/>
		      </equal>
		      <not>
			<equal>
			  <clip pos="2" side="tl" part="nbr"/>
			  <lit-tag v="ND"/>
			</equal>
		      </not>
		    </and>
		  </not>
		  <equal>
		    <var n="concPrimero"/>
		    <lit v="true"/>
		  </equal>
		</and>
	      </test>
	      <let>
		<clip pos="2" side="tl" part="nbr"/>
		<clip pos="1" side="tl" part="nbr"/> 
	      </let>
	    </when>
	  </choose>
	  <choose>
	    <when>
	      <test>
		<and>
		  <not>
		    <equal>
		      <clip pos="3" side="tl" part="nbr"/>
		      <lit-tag v="sp"/>
		    </equal>
		  </not>
		  <not>
		    <and>
		      <equal>
			<clip pos="3" side="sl" part="nbr"/>
			<lit-tag v="sp"/>
		      </equal>
		      <not>
			<equal>
			  <clip pos="3" side="tl" part="nbr"/>
			  <lit-tag v="ND"/>
			</equal>
		      </not>
		    </and>
		  </not>
		  <equal>
		    <var n="concSegundo"/>
		    <lit v="true"/>
		  </equal>
		</and>
	      </test>
	      <let>
		<clip pos="3" side="tl" part="nbr"/>
		<clip pos="1" side="tl" part="nbr"/> 
	      </let>
	    </when>
	  </choose>
	  <choose>
	    <when>
	      <test>
		<and>
		  <not>
		    <equal>
		      <clip pos="4" side="tl" part="nbr"/>
		      <lit-tag v="sp"/>
		    </equal>
		  </not>
		  <not>
		    <and>
		      <equal>
			<clip pos="4" side="sl" part="nbr"/>
			<lit-tag v="sp"/>
		      </equal>
		      <not>
			<equal>
			  <clip pos="4" side="tl" part="nbr"/>
			  <lit-tag v="ND"/>
			</equal>
		      </not>
		    </and>
		  </not>
		  <equal>
		    <var n="concTercero"/>
		    <lit v="true"/>
		  </equal>
		</and>
	      </test>
	      <let>
		<clip pos="4" side="tl" part="nbr"/>
		<clip pos="1" side="tl" part="nbr"/> 
	      </let>
	    </when>
	  </choose>
	</when>
      </choose>
      
      <choose>
	<when>
	  <test> 
	    <equal>
	      <clip pos="1" side="tl" part="gen"/>
	      <lit-tag v="m"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="m"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="gen"/>
	      <lit-tag v="f"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="f"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="gen"/>
	      <lit-tag v="m"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="m"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="gen"/>
	      <lit-tag v="f"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="f"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="3" side="tl" part="gen"/>
	      <lit-tag v="m"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="m"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="3" side="tl" part="gen"/>
	      <lit-tag v="f"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="f"/>
	  </let>
	</when> 
	<when>
	  <test>
	    <equal>
	      <clip pos="4" side="tl" part="gen"/>
	      <lit-tag v="m"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="m"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="4" side="tl" part="gen"/>
	      <lit-tag v="f"/>
	    </equal>
	  </test>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="f"/>
	  </let>
	</when>
	<otherwise>
	  <let>
	    <var n="genero"/>
	    <lit-tag v="m"/>
	  </let>
	</otherwise>

      </choose>
      
      <choose>
	<when>
	  <test> 
	    <equal>
	      <clip pos="1" side="tl" part="nbr"/>
	      <lit-tag v="sg"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="sg"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="nbr"/>
	      <lit-tag v="pl"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="pl"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="nbr"/>
	      <lit-tag v="sg"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="sg"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="nbr"/>
	      <lit-tag v="pl"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="pl"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="3" side="tl" part="nbr"/>
	      <lit-tag v="sg"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="sg"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="3" side="tl" part="nbr"/>
	      <lit-tag v="pl"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="pl"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="4" side="tl" part="nbr"/>
	      <lit-tag v="sg"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="sg"/>
	  </let>
	</when>
	<when>
	  <test>
	    <equal>
	      <clip pos="4" side="tl" part="nbr"/>
	      <lit-tag v="pl"/>
	    </equal>
	  </test>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="pl"/>
	  </let>
	</when> 
	<otherwise>
	  <let>
	    <var n="numero"/>
	    <lit-tag v="sg"/>
	  </let>
	</otherwise>
      </choose>

      <choose> 
	<when>
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="gen"/>
	      <lit-tag v="GD"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="1" side="tl" part="gen"/>
	    <var n="genero"/>
	  </let>
	</when>
      </choose>
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="gen"/>
	      <lit-tag v="GD"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="2" side="tl" part="gen"/>
	    <var n="genero"/>
	  </let>
	</when>
      </choose>
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="3" side="tl" part="gen"/>
	      <lit-tag v="GD"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="3" side="tl" part="gen"/>
	    <var n="genero"/>
	  </let>
	</when>
      </choose>
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="4" side="tl" part="gen"/>
	      <lit-tag v="GD"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="4" side="tl" part="gen"/>
	    <var n="genero"/>
	  </let>
	</when> 
      </choose>
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="1" side="tl" part="nbr"/>
	      <lit-tag v="ND"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="1" side="tl" part="nbr"/>
	    <var n="numero"/>
	  </let>
	</when>
      </choose>
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="2" side="tl" part="nbr"/>
	      <lit-tag v="ND"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="2" side="tl" part="nbr"/>
	    <var n="numero"/>
	  </let>
	</when>
      </choose>
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="3" side="tl" part="nbr"/>
	      <lit-tag v="ND"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="3" side="tl" part="nbr"/>
	    <var n="numero"/>
	  </let>
	</when>
      </choose>
      <choose>
	<when>
	  <test>
	    <equal>
	      <clip pos="4" side="tl" part="nbr"/>
	      <lit-tag v="ND"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="4" side="tl" part="nbr"/>
	    <var n="numero"/>
	  </let>
	</when>
      </choose>      
    </def-macro> 

    <def-macro n="f_lexicAdv" npar="1">
      <choose>
	<when>
	  <test>
	    <equal caseless="yes">
	      <clip pos="1" side="sl" part="lem"/>
	      <lit v="ben"/>
	    </equal>
	  </test>
	  <let>
	    <clip pos="1" side="tl" part="lem"/>
	    <lit v="muy"/>
	  </let>
	</when>
      </choose>
    </def-macro>

    <def-macro n="f_lexicAdj" npar="1"><!--para los adjetivos cuando van delante del nombre -->
      <choose>
	<when>
	  <test>
	    <and>
	      <equal caseless="yes">
		<clip pos="1" side="tl" part="lem"/>
		<lit v="bueno"/>
	      </equal>
	      <equal>
		<clip pos="1" side="tl" part="gen"/>
		<lit-tag v="m"/>
	      </equal>
	      <equal>
		<clip pos="1" side="tl" part="nbr"/>
		<lit-tag v="sg"/>
	      </equal>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="a_adj"/>
		  <lit-tag v="adj.sup"/>
		</equal>
	      </not>		
	    </and>
	  </test>
	  <let>
	    <clip pos="1" side="tl" part="lem"/>
	    <get-case-from pos="1">
	      <lit v="buen"/>
	    </get-case-from>
	  </let>
	</when>
	<when>
	  <test>
	    <and>
	      <equal caseless="yes">
		<clip pos="1" side="tl" part="lem"/>
		<lit v="grande"/>
	      </equal>
	      <equal>
		<clip pos="1" side="tl" part="gen"/>
		<lit-tag v="mf"/>
	      </equal>
	      <equal>
		<clip pos="1" side="tl" part="nbr"/>
		<lit-tag v="sg"/>
	      </equal>
	    </and>
	  </test>
	  <let>
	    <clip pos="1" side="tl" part="lem"/>
	    <get-case-from pos="1">
	      <lit v="gran"/>
	    </get-case-from>
	  </let>
	</when>
	<when>
	  <test>
	    <and>
	      <equal caseless="yes" >
		<clip pos="1" side="tl" part="lem"/>
		<lit v="primero"/>
	      </equal>
	      <equal>
		<clip pos="1" side="tl" part="gen"/>
		<lit-tag v="m"/>
	      </equal>
	      <equal>
		<clip pos="1" side="tl" part="nbr"/>
		<lit-tag v="sg"/>
	      </equal>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="a_adj"/>
		  <lit-tag v="adj.sup"/>
		</equal>
	      </not>	
	    </and>
	  </test>
	  <let>
	    <clip pos="1" side="tl" part="lem"/>
	    <get-case-from pos="1">
	      <lit v="primer"/>
	    </get-case-from>
	  </let>
	</when>
	<when>
	  <test>
	    <and>
	      <equal caseless="yes" >
		<clip pos="1" side="tl" part="lem"/>
		<lit v="tercero"/>
	      </equal>
	      <equal>
		<clip pos="1" side="tl" part="gen"/>
		<lit-tag v="m"/>
	      </equal>
	      <equal>
		<clip pos="1" side="tl" part="nbr"/>
		<lit-tag v="sg"/>
	      </equal>
	    </and>
	  </test>
	  <let>
	    <clip pos="1" side="tl" part="lem"/>
	    <get-case-from pos="1">
	      <lit v="tercer"/>
	    </get-case-from>
	  </let>
	</when>
	<when>
	  <test>
	    <and>
	      <equal caseless="yes" >
		<clip pos="1" side="tl" part="lem"/>
		<lit v="lleno"/>
	      </equal>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="a_adj"/>
		  <lit-tag v="adj.sup"/>
		</equal>
	      </not>
	    </and>
	  </test>
	  <let>
	    <clip pos="1" side="tl" part="lem"/>
	    <get-case-from pos="1">
	      <lit v="pleno"/>
	    </get-case-from>
	  </let>
	</when>
	<when>
	  <test>
	      <equal caseless="yes" >
		<clip pos="1" side="sl" part="lem"/>
		<lit v="proper"/>
	      </equal>
	  </test>
	  <let>
	    <clip pos="1" side="tl" part="lem"/>
	    <get-case-from pos="1">
	      <lit v="próximo"/>
	    </get-case-from>
	  </let>
	</when>
      </choose>
    </def-macro>


    
  </section-def-macros>

  <section-rules>


    <rule> <!--REGLA: HI HA + PP (para evitar traducciones de tipo "hi ha anat: hay habido"-->
      <pattern>
	<pattern-item n="multiHiha"/>
	<pattern-item n="pp"/>
      </pattern>
      <action>    
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<choose>
	  <when>
	    <test>
	      <equal>
		<clip pos="2" side="tl" part="nbr"/>
		<lit-tag v="sg"/>
	      </equal>
	    </test>		
	    <out>
	      <lu>
		<get-case-from pos="1"> 
		  <lit v="haber"/>
		</get-case-from>
		<lit-tag v="vbhaver.pri.p3.sg"/>
	      </lu>
	      <b pos="1"/>
	      <lu>
		<clip pos="2" side="tl" part="lemh"/>
		<clip pos="2" side="tl" part="a_verb"/>
		<clip pos="2" side="tl" part="temps"/>
		<clip pos="2" side="tl" part="gen"/>
		<clip pos="2" side="tl" part="nbr"/>
		<clip pos="2" side="tl" part="lemq"/>
	      </lu>
	    </out>
	  </when>
	  <otherwise><!--si el pp és plural (hi ha resoltes...), cal traduir per 'hay' -->
	    <out>
	      <lu>
		<clip pos="1" side="tl" part="whole"/>
	      </lu>
	      <b pos="1"/>
	      <lu>
		<clip pos="2" side="tl" part="lemh"/>
		<clip pos="2" side="tl" part="a_verb"/>
		<clip pos="2" side="tl" part="temps"/>
		<clip pos="2" side="tl" part="gen"/>
		<clip pos="2" side="tl" part="nbr"/>
		<clip pos="2" side="tl" part="lemq"/>
	      </lu>
	    </out>
	  </otherwise>
	</choose>		
      </action>
    </rule>



 

    <rule> <!-- REGLA: DETERMINANT -->
      <pattern>
	<pattern-item n="det"/>
      </pattern>
      <action>
	<call-macro n="f_concord1">
	  <with-param pos="1"/>
	</call-macro>     
	<out> 
	  <lu>    
	    <clip pos="1" side="tl" part="whole"/>
	  </lu> 
	</out>
      </action>
    </rule>

    <rule> <!-- REGLA: no -->
      <pattern>
	<pattern-item n="no"/>
      </pattern>
      <action>	
	<out>
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	</out>
	<let>
	  <var n="no"/>
	  <lit v="yes"/>
	</let>
      </action>
    </rule>


    <rule> <!-- REGLA: NOM -->
      <pattern>
	<pattern-item n="nom"/>
      </pattern>
      <action>
	<choose>
	  <when>
	    <test>
	      <not>
		<and>
		  <equal caseless="yes">
		    <clip pos="1" side="sl" part="lem"/>
		    <lit v="pas"/>
		  </equal>
		  <equal>
		    <clip pos="1" side="sl" part="nbr"/>
		    <lit-tag v="sg"/>
		  </equal>
		</and>
	      </not>
	    </test>
	    <call-macro n="f_concord1">
	      <with-param pos="1"/>
	    </call-macro>     
	    <call-macro n="f_enviaa">
	      <with-param pos="1"/>
	    </call-macro>
	    <out>  
	      <lu>
		<clip pos="1" side="tl" part="lemh"/>
		<clip pos="1" side="tl" part="a_nom"/>
		<clip pos="1" side="tl" part="gen"/>
		<clip pos="1" side="tl" part="nbr"/>
		<clip pos="1" side="tl" part="lemq"/> 
	      </lu>
	    </out>
	  </when>
	</choose>
	<let>
	  <var n="no"/>
	  <lit v=""/>
	</let>
      </action>
    </rule>

    <rule> <!-- REGLA: ADJECTIU -->
      <pattern>
	<pattern-item n="adj"/>
      </pattern>
      <action>	
	<call-macro n="f_concord1">
	  <with-param pos="1"/>
	</call-macro>     
	<out> 
	  <lu>
	    <clip pos="1" side="tl" part="lemh"/>
	    <clip pos="1" side="tl" part="a_adj"/>
	    <clip pos="1" side="tl" part="gen"/>
	    <clip pos="1" side="tl" part="nbr"/>
	    <clip pos="1" side="tl" part="lemq"/> 
	  </lu>
	</out>
      </action>
    </rule>

    <rule> <!-- REGLA: PRONOM --><!--Special case, macro f_concord1 
				     is not applicable because gender and number can not be taken from previous rules -->
      <pattern>
	<pattern-item n="prn"/>
      </pattern>
      <action>
	<choose>
	  <when>
	    <test> 
	      <equal>
		<clip pos="1" side="tl" part="gen"/>
		<lit-tag v="GD"/>
	      </equal>
	    </test>
	    <let>
	      <clip pos="1" side="tl" part="gen"/>
	      <lit-tag v="m"/>
	    </let>
	  </when>
	</choose>
	<choose>
	  <when>
	    <test> 
	      <equal>
		<clip pos="1" side="tl" part="nbr"/>
		<lit-tag v="ND"/>
	      </equal>
	    </test>
	    <let>
	      <clip pos="1" side="tl" part="nbr"/>
	      <lit-tag v="sg"/>
	    </let>
	  </when>
	</choose>	
	<out>   
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	</out>
      </action>
    </rule>



    <rule> <!-- REGLA: DETERMINANT NOM -->
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="2"/>
	</call-macro>     
	
	<call-macro n="f_concord2">
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	</call-macro>     
	<choose>
	  <when>
	    <test>	    
	      <in caseless="yes">
	        <clip pos="3" side="sl" part="lem"/>
	        <list n="mesos"/>
	      </in> 
	    </test>
	  <out>    <!-- excepció noms de mesos sense article , el març :
	    marzo-->
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>
	  </out>
	  </when>
	  <otherwise>     
	<out>     
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/> 
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/> 
	  </lu>  
	</out>
	</otherwise>
       </choose>
      </action>
    </rule>


    <rule> <!-- REGLA NOVA 4: NOM ADJECTIU(vinent) setmana vinent > próxima semana "mireiafarrus"-->
      <pattern>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="1"/>
	</call-macro>    
	<call-macro n="f_concord2">
	  <with-param pos="1"/>
	  <with-param pos="2"/>
	</call-macro>     
	<choose>
	  <when>
	    <test>
	      <equal caseless="yes">
		<clip pos="2" side="sl" part="lem"/>
		<lit v="vinent"/>
	      </equal>
	    </test>
	    <out>
	      <lu>
	      <clip pos="2" side="tl" part="lemh"/>
	      <clip pos="2" side="tl" part="a_adjec"/>
	      <clip pos="2" side="tl" part="gen"/>
	      <clip pos="2" side="tl" part="nbr"/>
	      <clip pos="2" side="tl" part="lemq"/>
              </lu>
              <b pos="1"/>
              <lu>    
	      <clip pos="1" side="tl" part="lemh"/>
	      <clip pos="1" side="tl" part="a_nom"/>
	      <clip pos="1" side="tl" part="gen"/>
	      <clip pos="1" side="tl" part="nbr"/>
	      <clip pos="1" side="tl" part="lemq"/>
              </lu>
            </out>
          </when>
          <otherwise>
            <out>
              <lu>	
	      <clip pos="1" side="tl" part="lemh"/>
	      <clip pos="1" side="tl" part="a_nom"/>
	      <clip pos="1" side="tl" part="gen"/>
	      <clip pos="1" side="tl" part="nbr"/>
	      <clip pos="1" side="tl" part="lemq"/>
	      </lu>
              <b pos="1"/>
              <lu>
	      <clip pos="2" side="tl" part="lemh"/>
	      <clip pos="2" side="tl" part="a_adjec"/>
	      <clip pos="2" side="tl" part="gen"/>
	      <clip pos="2" side="tl" part="nbr"/>
	      <clip pos="2" side="tl" part="lemq"/>
	      </lu>
	    </out>
          </otherwise>
        </choose>  
      </action>
    </rule>

    <rule> <!-- REGLA: NOM ADJECTIU-->
      <pattern>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="1"/>
	</call-macro>     
	<call-macro n="f_concord2">
	  <with-param pos="1"/>
	  <with-param pos="2"/>
	</call-macro> 
	    <out>   
	      <lu>
		<clip pos="1" side="tl" part="lemh"/>
		<clip pos="1" side="tl" part="a_nom"/>
		<clip pos="1" side="tl" part="gen"/>
		<clip pos="1" side="tl" part="nbr"/>
		<clip pos="1" side="tl" part="lemq"/> 
	      </lu>
	      <b pos="1"/>
	      <lu>
		<clip pos="2" side="tl" part="lemh"/>
		<clip pos="2" side="tl" part="a_adjec"/>
		<clip pos="2" side="tl" part="gen"/>
		<clip pos="2" side="tl" part="nbr"/>
		<clip pos="2" side="tl" part="lemq"/>
	      </lu>	    
	    </out>
      </action>
    </rule>

    <rule> <!-- REGLA: NOM ADJECTIU ADJECTIU -->
      <pattern>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="1"/>
	</call-macro>     
	
	<call-macro n="f_concord3">
	  <with-param pos="1"/>
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	</call-macro>     
	<out>   
	  <lu>
	    <clip pos="1" side="tl" part="lemh"/>
	    <clip pos="1" side="tl" part="a_nom"/>
	    <clip pos="1" side="tl" part="gen"/>
	    <clip pos="1" side="tl" part="nbr"/>
	    <clip pos="1" side="tl" part="lemq"/> 
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_adjec"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>	    
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>	    
	</out>
      </action>
    </rule>
    

    <rule> <!-- REGLA: ADJECTIU NOM -->
      <pattern>
	<pattern-item n="adj"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="2"/>
	</call-macro>     
	
	<call-macro n="f_concord2">
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	</call-macro> 
	<call-macro n="f_lexicAdj">
	  <with-param pos="1"/>
	</call-macro>
	<out>  
	  <lu>
	    <clip pos="1" side="tl" part="lemh"/>
	    <clip pos="1" side="tl" part="a_adj"/>
	    <clip pos="1" side="tl" part="gen"/>
	    <clip pos="1" side="tl" part="nbr"/>
	    <clip pos="1" side="tl" part="lemq"/>   
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>  
	  </lu>
	</out>
      </action>
    </rule>

<!--    <rule> REGLA: DET NOM ADJECTIU    comentada per "mireiafarrus"; amb la REGLA NOVA 5 aquesta ja hi queda inclosa
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="2"/>
	</call-macro>     

	<call-macro n="f_concord3">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	  <with-param pos="1"/>
	</call-macro>     
	<out>    
	  <lu>  
	    <clip pos="1" side="tl" part="whole"/>
	  </lu> 
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/> 
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule> -->


    <rule> <!-- REGLA NOVA 5: DET NOM ADJECTIU(vinent) La primavera vinent > La próxima primavera "mireiafarrus"-->
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="2"/>
	</call-macro>     
	<call-macro n="f_concord3">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	  <with-param pos="1"/>
	</call-macro>     
	<choose>
	  <when>
	    <test>
	      <equal caseless="yes">
		<clip pos="3" side="sl" part="lem"/>
		<lit v="vinent"/>
	      </equal>
	    </test>
            <out>
              <lu>
              <clip pos="1" side="tl" part="whole"/> 
              </lu>
              <b pos="1"/>
              <lu>
              <clip pos="3" side="tl" part="lemh"/> 
              <clip pos="3" side="tl" part="a_adjec"/> 
              <clip pos="3" side="tl" part="gen"/> 
              <clip pos="3" side="tl" part="nbr"/> 
              <clip pos="3" side="tl" part="lemq"/> 
              </lu>
              <b pos="2"/>
              <lu>
              <clip pos="2" side="tl" part="lemh"/> 
              <clip pos="2" side="tl" part="a_nom"/> 
              <clip pos="2" side="tl" part="gen"/> 
              <clip pos="2" side="tl" part="nbr"/> 
              <clip pos="2" side="tl" part="lemq"/> 
              </lu>
            </out>
          </when>
          <otherwise>
            <out>
              <lu>
              <clip pos="1" side="tl" part="whole"/> 
              </lu>
              <b pos="1"/>
              <lu>
              <clip pos="2" side="tl" part="lemh"/> 
              <clip pos="2" side="tl" part="a_nom"/> 
              <clip pos="2" side="tl" part="gen"/> 
              <clip pos="2" side="tl" part="nbr"/> 
              <clip pos="2" side="tl" part="lemq"/> 
              </lu>
              <b pos="2"/>
              <lu>
              <clip pos="3" side="tl" part="lemh"/> 
              <clip pos="3" side="tl" part="a_adjec"/> 
              <clip pos="3" side="tl" part="gen"/> 
              <clip pos="3" side="tl" part="nbr"/> 
              <clip pos="3" side="tl" part="lemq"/> 
              </lu>
            </out>
          </otherwise>
        </choose>
      </action>
    </rule>


    <rule> <!-- REGLA: DET NOM ADJECTIU ADJECTIU-->
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="2"/>
	</call-macro>     
	
	<call-macro n="f_concord4">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	  <with-param pos="1"/>
	</call-macro>     
	<out>    
	  <lu>  
	    <clip pos="1" side="tl" part="whole"/>
	  </lu> 
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/> 
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_adjec"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>

    <rule> <!-- REGLA NOVA 2: DET NOM VERB ADJECTIU: El núvol és vermell - La nube es roja (suposo que serveix per a qualsevol verb) "mireiafarrus"-->
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
	<pattern-item n="ser_estar"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="2"/>
	</call-macro>     
	
	<call-macro n="f_concord3">
	  <with-param pos="2"/>
	  <with-param pos="4"/>
	  <with-param pos="1"/>
	</call-macro>     
	<out>    
	  <lu>  
	    <clip pos="1" side="tl" part="whole"/>
	  </lu> 
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/> 
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_verb"/>
	    <clip pos="3" side="tl" part="temps"/>
	    <clip pos="3" side="tl" part="persona"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_adjec"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>
    
    
    <rule> <!-- REGLA NOVA 3: DET NOM VERB ADJECTIU: El núvol és vermell - La nube es roja (suposo que serveix per a qualsevol verb) "mireiafarrus"-->
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
	<pattern-item n="ser_estar"/>
	<pattern-item n="adv"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="2"/>
	</call-macro>     
	
	<call-macro n="f_concord3">
	  <with-param pos="2"/>
	  <with-param pos="5"/>
	  <with-param pos="1"/>
	</call-macro>     
	<out>    
	  <lu>  
	    <clip pos="1" side="tl" part="whole"/>
	  </lu> 
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/> 
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_verb"/>
	    <clip pos="3" side="tl" part="temps"/>
	    <clip pos="3" side="tl" part="persona"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="whole"/>
	  </lu>
	  <b pos="4"/>
	  <lu>
	    <clip pos="5" side="tl" part="lemh"/>
	    <clip pos="5" side="tl" part="a_adjec"/>
	    <clip pos="5" side="tl" part="gen"/>
	    <clip pos="5" side="tl" part="nbr"/>
	    <clip pos="5" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>
    
    

    <rule> <!-- REGLA NOVA 1: DETERMINANT NOM ADJECTIU cnjcoo ADJECTIU "mireiafarrus"-->
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
	<pattern-item n="i"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="2"/>
	</call-macro>     
	
	<call-macro n="f_concord4">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	  <with-param pos="5"/>
	  <with-param pos="1"/>
	</call-macro>     
	<out>    
	  <lu>  
	    <clip pos="1" side="tl" part="whole"/>
	  </lu> 
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/> 
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	  <b pos="3"/>
	  <lu>  
	    <clip pos="4" side="tl" part="whole"/>
	  </lu> 
	  <b pos="4"/>
	  <lu>
	    <clip pos="5" side="tl" part="lemh"/>
	    <clip pos="5" side="tl" part="a_adjec"/>
	    <clip pos="5" side="tl" part="gen"/>
	    <clip pos="5" side="tl" part="nbr"/>
	    <clip pos="5" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>

    <rule> <!-- REGLA: NOM ADJECTIU ADJECTIU-->
      <pattern>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="1"/>
	</call-macro>     

	<call-macro n="f_concord3">
	  <with-param pos="1"/>
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	</call-macro>     
	<out>    
	  <lu>
	    <clip pos="1" side="tl" part="lemh"/>
	    <clip pos="1" side="tl" part="a_nom"/>
	    <clip pos="1" side="tl" part="gen"/>
	    <clip pos="1" side="tl" part="nbr"/>
	    <clip pos="1" side="tl" part="lemq"/>   
	  </lu> 
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_adjec"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>


    <rule> <!-- REGLA: DET ADJECTIU NOM-->
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="adjec"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="3"/>
	</call-macro>     

	<call-macro n="f_concord3">
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	</call-macro>  
	<call-macro n="f_lexicAdj">
	  <with-param pos="2"/>
	</call-macro>
	<out>  
	  <lu>    
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_adjec"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/> 
	  </lu>
	</out>
      </action>
    </rule>


    <rule> <!-- REGLA: PREDET DET NOM-->
      <pattern>
	<pattern-item n="predet"/>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="3"/>
	</call-macro>     

	<call-macro n="f_concord3">
	  <with-param pos="3"/>           
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	</call-macro>     
	<out> 
	  <lu>    
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/> 
	  </lu>	    
	</out>
      </action>
    </rule>

    <rule> <!-- REGLA: PREDET DET NOM ADJECTIU-->
      <pattern>
	<pattern-item n="predet"/>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="3"/>
	</call-macro>     

	<call-macro n="f_concord4">
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	</call-macro>     
	<out> 
	  <lu>    
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/> 
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_adjec"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>



    <rule> <!-- REGLA: DETERMINANT ADJECTIU-->
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_concord2">
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	</call-macro>     
	<out>     
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_adjec"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>

    <rule> <!-- REGLA: ADJECTIU NOM ADJECTIU-->
      <pattern> 
	<pattern-item n="adj"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="2"/>
	</call-macro>     

	<call-macro n="f_concord3">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	  <with-param pos="1"/>
	</call-macro>  
	<call-macro n="f_lexicAdj">
	  <with-param pos="1"/>
	</call-macro>
	<out>  
	  <lu>
	    <clip pos="1" side="tl" part="lemh"/>
	    <clip pos="1" side="tl" part="a_adj"/>
	    <clip pos="1" side="tl" part="gen"/>
	    <clip pos="1" side="tl" part="nbr"/>
	    <clip pos="1" side="tl" part="lemq"/>     
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/> 
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>

    <rule> <!-- REGLA: DET ADJECTIU NOM ADJECTIU -->
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="adjec"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="3"/>
	</call-macro>     

	<call-macro n="f_concord4">
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	</call-macro>  
	<call-macro n="f_lexicAdj">
	  <with-param pos="2"/>
	</call-macro>
	<out> 
	  <lu>    
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_adjec"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/> 
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_adjec"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>


    <rule> <!-- REGLA: NOM ADVERBI ADJECTIU-->
      <pattern>
	<pattern-item n="nom"/>
	<pattern-item n="adv"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="1"/>
	</call-macro>     
	<call-macro n="f_lexicAdv">
	  <with-param pos="2"/>
	</call-macro>     
	<call-macro n="f_concord2">
	  <with-param pos="1"/>
	  <with-param pos="3"/>
	</call-macro>     
	<out>   
	  <lu>
	    <clip pos="1" side="tl" part="lemh"/>
	    <clip pos="1" side="tl" part="a_nom"/>
	    <clip pos="1" side="tl" part="gen"/>
	    <clip pos="1" side="tl" part="nbr"/>
	    <clip pos="1" side="tl" part="lemq"/> 
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>

    <rule> <!-- REGLA: DET NOM ADVERBI ADJECTIU -->
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
	<pattern-item n="adv"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="2"/>
	</call-macro>     
	<call-macro n="f_lexicAdv">
	  <with-param pos="3"/>
	</call-macro>     
	<call-macro n="f_concord3">
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	  <with-param pos="4"/>
	</call-macro>     
	<out>  
	  <lu>    
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>     
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="whole"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_adjec"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>


    <rule> <!-- REGLA: DET ADVERBI NOM-->
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="adv"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="3"/>
	</call-macro>     
	<call-macro n="f_lexicAdv">
	  <with-param pos="2"/>
	</call-macro>     
	<call-macro n="f_concord2">
	  <with-param pos="3"/>
	  <with-param pos="1"/>
	</call-macro>     
	<out>   
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/> 
	  </lu>  
	</out>
      </action>
    </rule>


    <rule> <!-- REGLA: NUMERAL NOM -->
      <pattern>
	<pattern-item n="num"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="2"/>
	</call-macro> 
	<choose><!-- arregla possible error del tagger, abans de la f_concord mireia-->
	  <when>
	    <test>
	      <and>
		<equal>
		  <clip pos="2" side="sl" part="nbr"/>
		  <lit-tag v="sg"/>
		</equal>
		<equal caseless="yes">
		  <clip pos="1" side="sl" part="lem"/>
		  <lit v="nou"/>
		</equal>
	      </and>
	    </test>
	    <let>
	      <clip pos="1" side="tl" part="lem"/>
	       <get-case-from pos="1">
		 <lit v="nuevo"/>
	       </get-case-from>
	    </let>
	    <let>
	      <clip pos="1" side="tl" part="tags"/>
	      <lit-tag v="adj.GD.ND"/>
	    </let>
	  </when>
	</choose>    
	<call-macro n="f_concord2">
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	</call-macro>   
	<out>     
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>	  
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/> 
	  </lu>  
	</out>
      </action>
    </rule>

    <rule> <!-- REGLA: NUMERAL ADJECTIU -->
      <pattern>
	<pattern-item n="num"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_concord2">
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	</call-macro>     
	<out>     
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_adjec"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>


    <rule> <!-- REGLA: NUMERAL NOM ADJECTIU -->
      <pattern>
	<pattern-item n="num"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="2"/>
	</call-macro>     

	<call-macro n="f_concord3">
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	  <with-param pos="3"/>
	</call-macro>     
	<out>     
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/> 
	  </lu>  
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>

    <rule> <!-- REGLA: NUMERAL ADJECTIU NOM -->
      <pattern>
	<pattern-item n="num"/>
	<pattern-item n="adjec"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="3"/>
	</call-macro>     
	<call-macro n="f_concord3">
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	</call-macro> 
	<call-macro n="f_lexicAdj">
	  <with-param pos="2"/>
	</call-macro>
	<out>     
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_adjec"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/> 
	  </lu>
	</out>
      </action>
    </rule>


    <rule> <!-- REGLA NOVA 3: DET NUMERAL "mireiafarrus"-->
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="num"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="2"/>
	</call-macro> 
	<call-macro n="f_concord2">
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	</call-macro>  
	<choose>
	  <when>
	    <test>
	      <equal caseless="yes">
		<clip pos="1" side="sl" part="lem"/>
		<lit v="tot"/>
	      </equal>
	    </test>
	    <let>
	      <clip pos="1" side="tl" part="lem"/>
	      <get-case-from pos="1">
		<lit v="el"/>
	      </get-case-from>
	    </let>
	    <let>
	      <clip pos="1" side="tl" part="a_det"/>
	      <lit-tag v="det.def"/>
	    </let>
	  </when>
	</choose>
	<out>     
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>  
	</out>
      </action>
    </rule>

    <rule> <!-- REGLA: DET NUMERAL NOM -->
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="num"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="3"/>
	</call-macro>     

	<call-macro n="f_concord3">
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	</call-macro>  
	<choose>
	  <when>
	    <test>
	      <equal caseless="yes">
		<clip pos="1" side="sl" part="lem"/>
		<lit v="tot"/>
	      </equal>
	    </test>
	    <let>
	      <clip pos="1" side="tl" part="lem"/>
	      <get-case-from pos="1">
		<lit v="el"/>
	      </get-case-from>
	    </let>
	    <let>
	      <clip pos="1" side="tl" part="a_det"/>
	      <lit-tag v="det.def"/>
	    </let>
	  </when>
	</choose>
	<out>     
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>  
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/> 
	  </lu>
	</out>
      </action>
    </rule>
    
    <rule> <!-- REGLA: DET NUMERAL ADJ -->
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="num"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_concord3">
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	</call-macro>  
	<choose>
	  <when>
	    <test>
	      <equal caseless="yes">
		<clip pos="1" side="sl" part="lem"/>
		<lit v="tot"/>
	      </equal>
	    </test>
	    <let>
	      <clip pos="1" side="tl" part="lem"/>
	      <get-case-from pos="1">
		<lit v="el"/>
	      </get-case-from>
	    </let>
	    <let>
	      <clip pos="1" side="tl" part="a_det"/>
	      <lit-tag v="det.def"/>
	    </let>
	  </when>
	</choose>
	<out>     
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>  
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/> 
	  </lu>
	</out>
      </action>
    </rule>
    
    
    <rule> <!-- REGLA: DET NOM NUMERAL-->
      <pattern>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
	<pattern-item n="num"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="2"/>
	</call-macro>     

	<call-macro n="f_concord3">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	  <with-param pos="1"/>
	</call-macro>  
	<choose>
	  <when>
	    <test>
	    <and>
	      <equal caseless="yes">
		<clip pos="2" side="sl" part="lem"/>
		<lit v="any"/>
	      </equal>
	      <equal>
		<clip pos="1" side="tl" part="lem"/>
		<lit v="el"/>
	      </equal>
	    </and>
	    </test>
 	  <out>     
	  <lu>
	    <lit v="en"/>
	    <lit-tag v="pr"/>
	  </lu>  
	  <b pos="1"/>
	  <lu>
	    <clip pos="3" side="tl" part="whole"/>
	  </lu>
	  </out>
	</when>
	<otherwise>
	  <out>     
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/> 
	  </lu> 
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="whole"/>
	  </lu>
	</out>
	</otherwise>
	</choose>
      </action>
    </rule>
    
    <rule> <!-- REGLA: PREP NOM-->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>	
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="2"/>
	</call-macro>
	<call-macro n="f_concord1">
	  <with-param pos="2"/>
	</call-macro>
	<out>   
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>
    
    <rule> <!-- REGLA: PREP ADJECTIU -->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="adj"/>
      </pattern>
      <action>	
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="2"/>
	</call-macro>
	<call-macro n="f_concord1">
	  <with-param pos="2"/>
	</call-macro>     
	<out>   
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_adj"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>
    
    
    <rule> <!-- REGLA: PREP PRONOM --><!--Special case, macro f_concord1 
					  is not applicable because gender and number cannot be taken from previous rules -->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="prn"/>
      </pattern>
      <action>	
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="2"/>
	</call-macro>
	<choose>
	  <when>
	    <test> 
	      <equal>
		<clip pos="2" side="tl" part="gen"/>
		<lit-tag v="GD"/>
	      </equal>
	    </test>
	    <let>
	      <clip pos="2" side="tl" part="gen"/>
	      <lit-tag v="m"/>
	    </let>
	  </when>
	</choose>
	<choose>
	  <when>
	    <test> 
	      <equal>
		<clip pos="2" side="tl" part="nbr"/>
		<lit-tag v="ND"/>
	      </equal>
	    </test>
	    <let>
	      <clip pos="2" side="tl" part="nbr"/>
	      <lit-tag v="sg"/>
	    </let>
	  </when>
	</choose>	
	<out>   
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	</out>
      </action>
    </rule>
    
    
    <rule> <!-- REGLA: PREP NUMERAL-->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="num"/>
      </pattern>
      <action>	
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="2"/>
	</call-macro>     
	<call-macro n="f_concord1">
	  <with-param pos="2"/>
	</call-macro>     
	<out>  
	  <lu> 
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	</out>
      </action>
    </rule>
    
    
    
    <rule> <!-- REGLA: PREP NOM ADJECTIU-->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>	
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="2"/>
	</call-macro>     
	<call-macro n="f_concord2">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	</call-macro>  
	<out>   
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>
	
      </action>
    </rule>
    
    
    <rule> <!-- REGLA: PREP ADJECTIU NOM -->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="adj"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>	
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="3"/>
	</call-macro>     
	<call-macro n="f_concord2">
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	</call-macro>
	<call-macro n="f_lexicAdj">
	  <with-param pos="2"/>
	</call-macro>
	<out>  
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_adj"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>  
	  </lu>
	  <b pos="2"/>
	  <lu> 
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>
	
      </action>
    </rule>
    
    <rule> <!-- REGLA: PREP DET NOM ADJECTIU-->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>		  
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="3"/>
	</call-macro>
	<call-macro n="f_concord3">
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	  <with-param pos="2"/>
	</call-macro>     
	<out>    
	  <lu>  
	    <clip pos="2" side="tl" part="whole"/>
	  </lu> 
	  <b pos="2"/>	   
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_adjec"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	</out>
	
      </action>
    </rule>
    <rule> <!-- REGLA: PREP DET NOM-->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>		  
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="3"/>
	</call-macro>
	<call-macro n="f_concord2">
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	</call-macro>     
	<choose>
	  <when>
	    <test>	    
	      <in caseless="yes">
	        <clip pos="3" side="sl" part="lem"/>
	        <list n="mesos"/>
	      </in> 
	    </test>
	  <out>    <!-- excepció noms de mesos sense article fins el març :
	    hasta marzo-->
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	  </out>
	  </when>
	  <otherwise>  
	  <out>    
	  <lu>  
	    <clip pos="2" side="tl" part="whole"/>
	  </lu> 
	  <b pos="2"/>	   
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>
	</otherwise>
        </choose>
      </action>
    </rule>
    
    
    <rule> <!-- REGLA: PREP DET NOM ADJECTIU ADJECTIU-->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>	
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="3"/>
	</call-macro>     
	
	<call-macro n="f_concord4">
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	  <with-param pos="5"/>
	  <with-param pos="2"/>
	</call-macro>     
	<out>    
	  <lu>  
	    <clip pos="2" side="tl" part="whole"/>
	  </lu> 
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_adjec"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	  <b pos="4"/>
	  <lu>
	    <clip pos="5" side="tl" part="lemh"/>
	    <clip pos="5" side="tl" part="a_adjec"/>
	    <clip pos="5" side="tl" part="gen"/>
	    <clip pos="5" side="tl" part="nbr"/>
	    <clip pos="5" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>
    
    <rule> <!-- REGLA: PREP NOM ADJECTIU ADJECTIU-->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>	
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="2"/>
	</call-macro>
	<call-macro n="f_concord3">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	</call-macro>     
	<out>    
	  <lu>  
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu> 
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_adjec"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>
    
    
    
    <rule> <!-- REGLA: PREP DET ADJECTIU NOM-->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="det"/>
	<pattern-item n="adjec"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>	
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="4"/>
	</call-macro>
	<call-macro n="f_concord3">
	  <with-param pos="4"/>
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	</call-macro>  
	<call-macro n="f_lexicAdj">
	  <with-param pos="3"/>
	</call-macro>
	<out>  
	  <lu>    
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_nom"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	</out>      
      </action>
    </rule>
    
    
    <rule> <!-- REGLA: PREP PREDET DET NOM-->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="predet"/>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>	
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="4"/>
	</call-macro>
	<call-macro n="f_concord3">
	  <with-param pos="4"/>           
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	</call-macro>     
	<out> 
	  <lu>    
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="whole"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_nom"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>	    
	</out>
	
      </action>
    </rule>
    
    <rule> <!-- REGLA: PREP PREDET DET NOM ADJECTIU-->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="predet"/>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>		   
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="4"/>
	</call-macro>     
	
	<call-macro n="f_concord4">
	  <with-param pos="4"/>
	  <with-param pos="5"/>
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	</call-macro>     
	<out> 
	  <lu>    
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="whole"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_nom"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	  <b pos="4"/>
	  <lu>
	    <clip pos="5" side="tl" part="lemh"/>
	    <clip pos="5" side="tl" part="a_adjec"/>
	    <clip pos="5" side="tl" part="gen"/>
	    <clip pos="5" side="tl" part="nbr"/>
	    <clip pos="5" side="tl" part="lemq"/>
	  </lu>
	</out>
	
      </action>
    </rule>
    
    
    
    <rule> <!-- REGLA: PREP DETERMINANT ADJECTIU-->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="det"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>		   
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="3"/>
	</call-macro>
	<call-macro n="f_concord2">
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	</call-macro>     
	<out>     
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>
	
      </action>
    </rule>
    
    <rule> <!-- REGLA: PREP ADJECTIU NOM ADJECTIU-->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="adj"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="3"/>
	</call-macro>     
	<call-macro n="f_concord3">
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	  <with-param pos="2"/>
	</call-macro> 
	<call-macro n="f_lexicAdj">
	  <with-param pos="2"/>
	</call-macro>
	<out>  
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_adj"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>    
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_adjec"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	</out>
	
      </action>
    </rule>
    
    <rule> <!-- REGLA: PREP DET ADJECTIU NOM ADJECTIU -->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="det"/>
	<pattern-item n="adjec"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>		   
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="4"/>
	</call-macro>
	<call-macro n="f_concord4">
	  <with-param pos="4"/>
	  <with-param pos="5"/>
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	</call-macro> 
	<call-macro n="f_lexicAdj">
	  <with-param pos="3"/>
	</call-macro>
	<out> 
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_nom"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	  <b pos="4"/>
	  <lu>
	    <clip pos="5" side="tl" part="lemh"/>
	    <clip pos="5" side="tl" part="a_adjec"/>
	    <clip pos="5" side="tl" part="gen"/>
	    <clip pos="5" side="tl" part="nbr"/>
	    <clip pos="5" side="tl" part="lemq"/>
	  </lu>
	</out>
	
      </action>
    </rule>
    
    
    <rule> <!-- REGLA: PREP NOM ADVERBI ADJECTIU-->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="nom"/>
	<pattern-item n="adv"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>	
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="2"/>
	</call-macro>     
	<call-macro n="f_lexicAdv">
	  <with-param pos="3"/>
	</call-macro>     
	<call-macro n="f_concord2">
	  <with-param pos="2"/>
	  <with-param pos="4"/>
	</call-macro>     
	<out>   
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_nom"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="whole"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_adjec"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	</out>
	
      </action>
    </rule>
    
    <rule> <!-- REGLA: PREP DET NOM ADVERBI ADJECTIU -->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
	<pattern-item n="adv"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>		   
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="3"/>
	</call-macro>
	<call-macro n="f_lexicAdv">
	  <with-param pos="4"/>
	</call-macro>     
	<call-macro n="f_concord3">
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	  <with-param pos="5"/>
	</call-macro>     
	<out>  
	  <lu>    
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>    
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="whole"/>
	  </lu>
	  <b pos="4"/>
	  <lu>
	    <clip pos="5" side="tl" part="lemh"/>
	    <clip pos="5" side="tl" part="a_adjec"/>
	    <clip pos="5" side="tl" part="gen"/>
	    <clip pos="5" side="tl" part="nbr"/>
	    <clip pos="5" side="tl" part="lemq"/>
	  </lu>
	</out>
	
      </action>
    </rule>
    
    
    <rule> <!-- REGLA: PREP DET ADVERBI NOM-->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="det"/>
	<pattern-item n="adv"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>		   
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="4"/>
	</call-macro>     
	<call-macro n="f_lexicAdv">
	  <with-param pos="3"/>
	</call-macro> 	
	<call-macro n="f_concord2">
	  <with-param pos="4"/>
	  <with-param pos="2"/>
	</call-macro>     
	<out>   
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="whole"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_nom"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>  
	</out>
	
      </action>
    </rule>
    
    
    <rule> <!-- REGLA: ADVERBI ADJECTIU-->
      <pattern>
	<pattern-item n="adv"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_lexicAdv">
	  <with-param pos="1"/>
	</call-macro>   
	<call-macro n="f_concord1">
	  <with-param pos="2"/>
	</call-macro>   
	<out>   
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="tags"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>
	</out>	
      </action>
    </rule>

    <rule> <!-- REGLA: PREP NUMERAL NOM -->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="num"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>		   
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="3"/>
	</call-macro>     
	
	<call-macro n="f_concord2">
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	</call-macro>     
	<out>     
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>	    
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>  
	</out>
	
      </action>
    </rule>
    
    <rule> <!-- REGLA: PREP NUMERAL ADJECTIU -->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="num"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>		  
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="3"/>
	</call-macro>     
	
	<call-macro n="f_concord2">
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	</call-macro>     
	<out>     
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>       
      </action>
    </rule>
    
    
    <rule> <!-- REGLA: PREP NUMERAL NOM ADJECTIU -->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="num"/>
	<pattern-item n="nom"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>		   
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="3"/>
	</call-macro>     
	
	<call-macro n="f_concord3">
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	  <with-param pos="4"/>
	</call-macro>     
	<out>     
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>	    
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>  
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_adjec"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	</out>
	
      </action>
    </rule>
    
    <rule> <!-- REGLA: PREP NUMERAL ADJECTIU NOM -->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="num"/>
	<pattern-item n="adjec"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>	
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="4"/>
	</call-macro>     
	
	<call-macro n="f_concord3">
	  <with-param pos="4"/>
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	</call-macro> 
	<call-macro n="f_lexicAdj">
	  <with-param pos="3"/>
	</call-macro>
	<out>     
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_nom"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	</out>
	
      </action>
    </rule>
    
    
    
    <rule> <!-- REGLA: PREP DET NUMERAL NOM -->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="det"/>
	<pattern-item n="num"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>		   
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="4"/>
	</call-macro>
	<call-macro n="f_concord3">
	  <with-param pos="4"/>
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	</call-macro>
	<choose>
	  <when>
	    <test>
	      <equal caseless="yes">
		<clip pos="2" side="sl" part="lem"/>
		<lit v="tot"/>
	      </equal>
	    </test>
	    <let>
	      <clip pos="2" side="tl" part="lem"/>
	      <get-case-from pos="1">
		<lit v="el"/>
	      </get-case-from>
	    </let>
	    <let>
	      <clip pos="2" side="tl" part="a_det"/>
	      <lit-tag v="det.def"/>
	    </let>
	  </when>
	</choose>    
	<out>     
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>	    
	  <lu>
	    <clip pos="3" side="tl" part="whole"/>
	  </lu>  
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_nom"/>
	    <clip pos="4" side="tl" part="gen"/>
	    <clip pos="4" side="tl" part="nbr"/>
	    <clip pos="4" side="tl" part="lemq"/>
	  </lu>
	</out>
	
      </action>
    </rule>

    
    <rule> <!-- REGLA: PREP DET NOM NUMERAL-->
      <pattern>
	<pattern-item n="prep"/>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
	<pattern-item n="num"/>
      </pattern>
      <action>		   
	<call-macro n="f_concord3">
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	  <with-param pos="2"/>
	</call-macro>
	<choose>
	  <when>
	    <test>
	    <and>
	      <equal caseless="yes">
		<clip pos="3" side="sl" part="lem"/>
		<lit v="any"/>
	      </equal>
	      <equal>
		<clip pos="1" side="sl" part="lem"/>
		<lit v="a"/>
	      </equal>		
	      <equal>
		<clip pos="2" side="sl" part="lem"/>
		<lit v="el"/>
	      </equal>
	    </and>
	    </test>
 	  <out>     
	  <lu>
	    <lit v="en"/>
	    <lit-tag v="pr"/>
	  </lu>  
	  <b pos="1"/>
	  <lu>
	    <clip pos="4" side="tl" part="whole"/>
	  </lu>
	  </out>
	</when>
	<otherwise>	
	<call-macro n="f_preps">
	  <with-param pos="1"/>
	  <with-param pos="3"/>
	</call-macro>
	<choose>
	  <when>
	    <test>
	      <equal caseless="yes">
		<clip pos="2" side="sl" part="lem"/>
		<lit v="tot"/>
	      </equal>
	    </test>
	    <let>
	      <clip pos="2" side="tl" part="lem"/>
	      <get-case-from pos="1">
		<lit v="el"/>
	      </get-case-from>
	    </let>
	    <let>
	      <clip pos="2" side="tl" part="a_det"/>
	      <lit-tag v="det.def"/>
	    </let>
	<out>     
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>	    
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="whole"/>
	  </lu>
	</out>	
	</when>
	<otherwise>
	<out>        
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>	    
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="whole"/>
	  </lu>
	</out>	
	</otherwise>
	</choose>
	</otherwise>
	</choose>
      </action>
    </rule>
    


    <rule> <!--REGLA: PRONOM DETERMINANT NOM: "Nosaltres les dones : Nosotras las mujeres" -->
      <pattern>
	<pattern-item n="nosaltres"/>
	<pattern-item n="det"/>
	<pattern-item n="nom"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="1"/>
	</call-macro>     
	<call-macro n="f_concord3">
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	</call-macro>     
	<out>  
	  <lu>  
	    <clip pos="1" side="tl" part="lem"/>
	    <clip pos="1" side="tl" part="a_prn"/>
	    <clip pos="1" side="tl" part="gen"/>
	    <clip pos="1" side="tl" part="nbr"/>
	  </lu> 
	  <b pos="1"/>
	  
	  <lu>
	    <clip pos="2" side="tl" part="lem"/>
	    <clip pos="2" side="tl" part="a_det"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_nom"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/> 
	  </lu>
	</out>
      </action>
    </rule>

    <rule> <!--REGLA: PRONOM DETERMINANT ADJECTIU-->
      <pattern>
	<pattern-item n="nosaltres"/>
	<pattern-item n="det"/>
	<pattern-item n="adjec"/>
      </pattern>
      <action>
	<call-macro n="f_enviaa">
	  <with-param pos="1"/>
	</call-macro>     

	<call-macro n="f_concord3">
	  <with-param pos="3"/>
	  <with-param pos="2"/>
	  <with-param pos="1"/>
	</call-macro>     
	<out>  
	  <lu>  
	    <clip pos="1" side="tl" part="lem"/>
	    <clip pos="1" side="tl" part="a_prn"/>
	    <clip pos="1" side="tl" part="gen"/>
	    <clip pos="1" side="tl" part="nbr"/>
	  </lu> 
	  <b pos="1"/>
	  
	  <lu>
	    <clip pos="2" side="tl" part="lem"/>
	    <clip pos="2" side="tl" part="a_det"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_adjec"/>
	    <clip pos="3" side="tl" part="gen"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>


   <rule> <!--REGLA: DETDEF + NOM PROPI (antropònim)-->
      <pattern>
	<pattern-item n="detdef"/>
	<pattern-item n="npant"/>
      </pattern>
      <action>
	<call-macro n="f_bcond">
	  <with-param pos="1"/>
	</call-macro>
	<call-macro n="f_enviaa">
	  <with-param pos="2"/>
	</call-macro>     

	<out>
	  <lu>
	    <clip pos="2" side="tl" part="lem"/>
	    <clip pos="2" side="tl" part="a_npant"/>
	  </lu>
	</out>
      </action>
    </rule>

    <rule> <!-- REGLA: RELAT --> <!-- revisar què fa aquesta regla!!!! : qui <ND>?-->
      <pattern>
	<pattern-item n="relat"/>
      </pattern>
      <action>
	<call-macro n="f_concord1">
	  <with-param pos="1"/>
	</call-macro>     
	<out>  
	  <lu> 
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	</out>
      </action>
    </rule>

    
    
    <rule> <!-- prnrpo -->
      <pattern>
	<pattern-item n="prnpro"/>
      </pattern>
      <action>
	<call-macro n="f_concord1">
	  <with-param pos="1"/>
	</call-macro>
	<choose>
	  <when>
	    <test>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="lem"/>
		  <lit v=""/>
		</equal>
	      </not>
	    </test>
	    <out>  
	      <lu> 
		<clip pos="1" side="tl" part="whole"/>
	      </lu>
	    </out>
	  </when>
	  <otherwise>
	    <call-macro n="f_hi">
	      <with-param pos="1"/>
	    </call-macro>
	    <!--<call-macro n="f_bcond">
		<with-param pos="1"/>
		</call-macro>-->
	  </otherwise>
	</choose>
      </action>
    </rule>



    <rule> <!-- REGLA: PRETÈRIT INDEFINIT --><!-- Para traducir "vaig fer" por "hice" -->
      <pattern>
	<pattern-item n="anar"/>
	<pattern-item n="inf"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1">            
	      <clip pos="2" side="tl" part="lemh"/>
	    </get-case-from>
	    <clip pos="2" side="tl" part="a_verb"/>
	    <lit-tag v="ifi"/>
	    <clip pos="1" side="tl" part="persona"/>
	    <clip pos="1" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>    
	  </lu>  
	</out>  
	<call-macro n="f_bcond">
	  <with-param pos="1"/>
	</call-macro>
      </action>
    </rule>



    <rule> <!-- REGLA: PRETÈRIT INDEFINIT + ENCLÍTIC --><!-- Para traducir "van acabar-se" por "se acabaron" -->
      <pattern>
	<pattern-item n="anar"/>
	<pattern-item n="inf"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<choose>
	  <when>
	    <test>
	      <not>
		<equal>
		  <clip pos="3" side="tl" part="whole"/><!--Comprueba que el pronombre no se traduzca por nada (pronombres "hi" y "en" -->
		  <lit v=""/>
		</equal>
	      </not>
	    </test>
	    <out>
	      <lu>
		<get-case-from pos="1">
		  <clip pos="3" side="tl" part="lem"/>
		</get-case-from> 
		<lit-tag v="prn.pro"/>
		<clip pos="3" side="sl" part="tipoenc_pro"/>
	      </lu>
	      <b pos="1"/>
	      <lu>
		<clip pos="2" side="tl" part="lemh"/>
		<clip pos="2" side="tl" part="a_verb"/>
		<lit-tag v="ifi"/>
		<clip pos="1" side="tl" part="persona"/>
		<clip pos="1" side="tl" part="nbr"/>
		<clip pos="2" side="tl" part="lemq"/>                  
	      </lu> 
	    </out>
	  </when>
	  <otherwise><!--En caso de que el pronombre no se traduzca, envía sólo el verbo -->
	    <out>
	      <lu>
		<get-case-from pos="1">            
		  <clip pos="2" side="tl" part="lemh"/>
		</get-case-from>
		<clip pos="2" side="tl" part="a_verb"/>
		<lit-tag v="ifi"/>
		<clip pos="1" side="tl" part="persona"/>
		<clip pos="1" side="tl" part="nbr"/>
		<clip pos="2" side="tl" part="lemq"/>                  
	      </lu>
	    </out> 
	    <call-macro n="f_bcond">
	      <with-param pos="1"/>
	    </call-macro>
	  </otherwise>
	</choose>
      </action>
    </rule>


    <rule> <!-- REGLA: PRETÈRIT INDEFINIT + ENCLÍTIC + ENCLÍTIC --><!-- Para traducir "van acabar-se'ls" por "se los acabaron" -->
      <pattern>
	<pattern-item n="anar"/>
	<pattern-item n="inf"/>
	<pattern-item n="prnenc"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<choose>
	  <when>
	    <test> <!--si el primer pronom no desapareix (traducció buida, p. ex: "hi", "en"), envia'l i assigna-li les majúscules -->
	      <not>
		<equal>
		  <clip pos="3" side="tl" part="whole"/>
		  <lit v=""/>
		</equal>
	      </not>
	    </test>
	    <out>
	      <lu>
		<get-case-from pos="1">
		  <clip pos="3" side="tl" part="lem"/>
		</get-case-from> 
		<lit-tag v="prn.pro"/>
		<clip pos="3" side="sl" part="tipoenc_pro"/>
	      </lu>
	      <b pos="1"/>
	    </out>
	    <choose>
	      <when>
		<test><!-- Si el segon pronom no desapareix, envia'l també (si desapareix el 2n, ja no s'envia) -->
		  <not>
		    <equal>
		      <clip pos="4" side="tl" part="whole"/> 
		      <lit v=""/>
		    </equal>
		  </not>
		</test>
		<out>
		  <lu>		
		    <clip pos="4" side="tl" part="lem"/>                
		    <lit-tag v="prn.pro"/>
		    <clip pos="4" side="sl" part="tipoenc_pro"/>
		  </lu>
		  <b/>			
		</out>
	      </when>
	    </choose>
	    <out>
	      <lu>
		<clip pos="2" side="tl" part="lemh"/>
		<clip pos="2" side="tl" part="a_verb"/>
		<lit-tag v="ifi"/>
		<clip pos="1" side="tl" part="persona"/>
		<clip pos="1" side="tl" part="nbr"/>
		<clip pos="2" side="tl" part="lemq"/>                  
	      </lu> 
	    </out>
	  </when>
	  <when> <!--Si el primer pronom desapareix...el segon també... (mai no es dóna el cas que desapareix el primer i el segon no) -->
	    <test>
	      <equal>
		<clip pos="3" side="tl" part="whole"/>
		<lit v=""/>
	      </equal>
	    </test>
	    <out>
	      <lu>
		<get-case-from pos="1">            
		  <clip pos="2" side="tl" part="lemh"/>
		</get-case-from>
		<clip pos="2" side="tl" part="a_verb"/>
		<lit-tag v="ifi"/>
		<clip pos="1" side="tl" part="persona"/>
		<clip pos="1" side="tl" part="nbr"/>
		<clip pos="2" side="tl" part="lemq"/>                  
	      </lu>
	    </out>
	    <call-macro n="f_bcond">
	      <with-param pos="1"/>
	    </call-macro>
	  </when>
	</choose>
      </action>
    </rule>

    <rule> <!--REGLA: VERB (per a multiparaules sense enclítics)-->
      <pattern>
	<pattern-item n="verb"/>
      </pattern>
      <action>	
	<call-macro n="f_tipusverb">
	  <with-param pos="1"/>
	</call-macro>
	<out>        
	  <lu>
	    <clip pos="1" side="tl" part="lemh"/>
	    <clip pos="1" side="tl" part="a_verb"/>
	    <clip pos="1" side="tl" part="temps"/>
	    <clip pos="1" side="tl" part="persona"/>
	    <clip pos="1" side="tl" part="gen"/>
	    <clip pos="1" side="tl" part="nbr"/>
	    <clip pos="1" side="tl" part="lemq"/>
	  </lu>		
	</out>
      </action>
    </rule>

    <rule> <!--REGLA: tot + VERB (tot cantant -> cantando)-->
      <pattern>
	<pattern-item n="tot"/>
	<pattern-item n="verb"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<choose>
	  <when>
	    <test>
	      <not>
		<equal>
		  <clip pos="2" side="sl" part="temps"/>
		  <lit-tag v="ger"/>
		</equal>
	      </not>
	    </test>
	    <out>
	      <lu>
		<clip pos="1" side="tl" part="whole"/>
	      </lu>
	      <b pos="1"/>
	    </out>
	  </when>
	  <otherwise>
	    <call-macro n="f_bcond">
	      <with-param pos="1"/>
	    </call-macro>
	  </otherwise>
	</choose>

	<out>                
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_verb"/>
	    <clip pos="2" side="tl" part="temps"/>
	    <clip pos="2" side="tl" part="persona"/>
	    <clip pos="2" side="tl" part="gen"/>
	    <clip pos="2" side="tl" part="nbr"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>		
	</out>
      </action>
    </rule>


    <rule> <!--REGLA: VERB + ENCLÍTIC-->
      <pattern>
	<pattern-item n="verb"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="1"/>
	</call-macro>
	<call-macro n="f_outverb2">
	  <with-param pos="1"/>
	  <with-param pos="2"/>
	</call-macro>      
      </action>
    </rule>

    <rule> <!--REGLA: tot + VERB + ENCLÍTIC-->
      <pattern>
	<pattern-item n="tot"/>
	<pattern-item n="verb"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<choose>
	  <when>
	    <test>
	      <not>
		<equal>
		  <clip pos="2" side="sl" part="temps"/>
		  <lit-tag v="ger"/>
		</equal>
	      </not>
	    </test>
	    <out>
	      <lu>
		<clip pos="1" side="tl" part="whole"/>
	      </lu>
	      <b pos="1"/>
	    </out>
	  </when>
	  <otherwise>
	    <call-macro n="f_bcond">
	      <with-param pos="1"/>
	    </call-macro>
	  </otherwise>
	</choose>
	<call-macro n="f_outverb2">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	</call-macro>      
      </action>
    </rule>


    <rule> <!--REGLA: VERB + ENCLÍTIC + ENCLÍTIC-->
      <pattern>
	<pattern-item n="verb"/>
	<pattern-item n="prnenc"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="1"/>
	</call-macro>
	<call-macro n="f_outverb3">
	  <with-param pos="1"/>
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	</call-macro>       
      </action>
    </rule>

    <rule> <!--REGLA: tot + VERB + ENCLÍTIC + ENCLÍTIC-->
      <pattern>
	<pattern-item n="tot"/>
	<pattern-item n="verb"/>
	<pattern-item n="prnenc"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<choose>
	  <when>
	    <test>
	      <not>
		<equal>
		  <clip pos="2" side="sl" part="temps"/>
		  <lit-tag v="ger"/>
		</equal>
	      </not>
	    </test>
	    <out>
	      <lu>
		<clip pos="1" side="tl" part="whole"/>
	      </lu>
	      <b pos="1"/>
	    </out>
	  </when>
	  <otherwise>
	    <call-macro n="f_bcond">
	      <with-param pos="1"/>
	    </call-macro>
	  </otherwise>
	</choose>
	<call-macro n="f_outverb3">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	</call-macro>       
      </action>
    </rule>



    <rule> <!--REGLA: EN + INF-->
      <pattern>
	<pattern-item n="en"/>
	<pattern-item n="infnm"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1">            
	      <lit v="a"/>
	    </get-case-from>
	    <lit-tag v="pr"/>
	  </lu>
	  <b/>
	  <lu>
	    <lit v="el"/>
	    <lit-tag v="det.def.m.sg"/>              
	  </lu>                 
	  <b pos="1"/>	   
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_infnm"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>

    <rule> <!--REGLA: EN + INF + ENCLÍTIC-->
      <pattern>
	<pattern-item n="en"/>
	<pattern-item n="infnm"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1">            
	      <lit v="a"/>
	    </get-case-from>
	    <lit-tag v="pr"/>
	  </lu>
	  <b/>
	  <lu>
	    <lit v="el"/>
	    <lit-tag v="det.def.m.sg"/>              
	  </lu>                 
	  <b pos="1"/>
	</out>
	<call-macro n="f_outverb2">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	</call-macro>
      </action>
    </rule>

    <rule> <!--REGLA: EN + INF + ENCLÍTIC + ENCLÍTIC-->
      <pattern>
	<pattern-item n="en"/>
	<pattern-item n="infnm"/>
	<pattern-item n="prnenc"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1">            
	      <lit v="a"/>
	    </get-case-from>
	    <lit-tag v="pr"/>
	  </lu>
	  <b/>
	  <lu>
	    <lit v="el"/>
	    <lit-tag v="det.def.m.sg"/>              
	  </lu>                 
	  <b pos="1"/>
	</out>
	<call-macro n="f_outverb3">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	</call-macro>	
      </action>
    </rule>


  <rule> <!--REGLA: caldre + INF -> haber que + INF -->
      <pattern>
	<pattern-item n="caldre"/>
	<pattern-item n="inf"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<let>
	  <clip pos="1" side="tl" part="lem"/>
	  <get-case-from pos="1">
	    <lit v="haber que"/>
	  </get-case-from>
	</let>
	<out> 
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>   
	  </lu>
	  <b pos="1"/>	   
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
            <clip pos="2" side="tl" part="a_verb"/>            
            <clip pos="2" side="tl" part="temps"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>


    <rule> <!--REGLA: caldre + INF + ENCLÍTIC -> haber que + INF + ENCLÍTIC-->
      <pattern>
	<pattern-item n="caldre"/>
	<pattern-item n="inf"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<let>
	  <clip pos="1" side="tl" part="lem"/>
	  <get-case-from pos="1">
	    <lit v="haber que"/>
	  </get-case-from>
	</let>	
	<out> 
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>   
	  </lu>
	  <b pos="1"/>	
	</out>
	<call-macro n="f_outverb2">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	</call-macro>
      </action>
    </rule>

    <rule> <!--REGLA: caldre + INF + ENCLÍTIC + ENCLÍTIC  -> haber que + INF + ENCLÍTIC + ENCLÍTIC-->
      <pattern>
	<pattern-item n="caldre"/>
	<pattern-item n="inf"/>
	<pattern-item n="prnenc"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<let>
	  <clip pos="1" side="tl" part="lem"/>
	  <get-case-from pos="1">
	    <lit v="haber que"/>
	  </get-case-from>
	</let>	
	<out> 
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>   
	  </lu>
	  <b pos="1"/>	
	</out>
	<call-macro n="f_outverb3">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	</call-macro>	
      </action>
    </rule>

 



    <rule> <!--REGLA: PER + infinitiu = per trobar -> para encontrar-->
      <pattern>
	<pattern-item n="per"/>
	<pattern-item n="infnh"/>
      </pattern>
      <action>	             
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1">
	      <lit v="para"/>
	    </get-case-from>
	    <clip pos="1" side="tl" part="a_prep"/>
	  </lu> 
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lemh"/>
	    <clip pos="2" side="tl" part="a_infnh"/>
	    <clip pos="2" side="tl" part="lemq"/>
	  </lu>
	</out>   
      </action>
    </rule> 


    <rule> <!--REGLA: PER + infinitiu + enclític= per trobar-se -> para encontrarse-->
      <pattern>
	<pattern-item n="per"/>
	<pattern-item n="infnh"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1">
	      <lit v="para"/>
	    </get-case-from>
	    <clip pos="1" side="tl" part="a_prep"/>
	  </lu> 
	  <b pos="1"/>
	</out>
	<call-macro n="f_outverb2">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	</call-macro>	 
      </action>
    </rule>

    <rule> <!--REGLA: PER + infinitiu + enclític + enclític = per explicar-los-ho -> para explicárselo-->
      <pattern>
	<pattern-item n="per"/>
	<pattern-item n="infnh"/>
	<pattern-item n="prnenc"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="2"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1">
	      <lit v="para"/>
	    </get-case-from>
	    <clip pos="1" side="tl" part="a_prep"/>
	  </lu> 
	  <b pos="1"/>
	</out>
	<call-macro n="f_outverb3">
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	</call-macro>	 
      </action>
    </rule>

    <rule> <!--REGLA: PER + adv + infinitiu = per no trobar -> para no encontrar-->
      <pattern>
	<pattern-item n="per"/>
	<pattern-item n="adv"/>
	<pattern-item n="infnh"/>
      </pattern>
      <action>	             
	<call-macro n="f_tipusverb">
	  <with-param pos="3"/>
	</call-macro>
	<call-macro n="marca_no">
	  <with-param pos="2"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1">
	      <lit v="para"/>
	    </get-case-from>
	    <clip pos="1" side="tl" part="a_prep"/>
	  </lu> 
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_infnh"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>   
      </action>
    </rule> 


    <rule> <!--REGLA: PER + adv + infinitiu + enclític= per no trobar-se -> para no encontrarse-->
      <pattern>
	<pattern-item n="per"/>
	<pattern-item n="adv"/>
	<pattern-item n="infnh"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="3"/>
	</call-macro>
	<call-macro n="marca_no">
	  <with-param pos="2"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1">
	      <lit v="para"/>
	    </get-case-from>
	    <clip pos="1" side="tl" part="a_prep"/>
	  </lu> 
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	</out>
	<call-macro n="f_outverb2">
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	</call-macro>	 
      </action>
    </rule>

    <rule> <!--REGLA: PER + adv + infinitiu + enclític + enclític = per no explicar-los-ho -> para no explicárselo-->
      <pattern>
	<pattern-item n="per"/>
	<pattern-item n="adv"/>
	<pattern-item n="infnh"/>
	<pattern-item n="prnenc"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="3"/>
	</call-macro>
	<call-macro n="marca_no">
	  <with-param pos="2"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1">
	      <lit v="para"/>
	    </get-case-from>
	    <clip pos="1" side="tl" part="a_prep"/>
	  </lu> 
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	</out>
	<call-macro n="f_outverb3">
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	  <with-param pos="5"/>
	</call-macro>	 
      </action>
    </rule>



    <rule> <!--REGLA: a + nploc = a Barcelona -> en Barcelona-->
      <pattern>
	<pattern-item n="a"/>
	<pattern-item n="nploc"/>
      </pattern>
      <action>	             
	<out>
	  <lu>
	    <get-case-from pos="1">
	      <lit v="en"/>
	    </get-case-from>
	    <clip pos="1" side="tl" part="a_prep"/>
	  </lu> 
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="lem"/>
	    <clip pos="2" side="tl" part="a_nploc"/> 
	  </lu>
	</out>   
      </action>
    </rule> 


    <rule> <!--REGLA NOVA 6: a + DET + nploc = al Segrià -> en el Segrià "mireiafarrus"-->
      <pattern>
	<pattern-item n="a"/>
	<pattern-item n="det"/>
	<pattern-item n="nploc"/>
      </pattern>
      <action>	
	<choose>
	  <when>
	    <test>
	      <equal>
		<clip pos="2" side="tl" part="gen"/>
		<lit-tag v="GD"/>
	      </equal>
	    </test>
	    <let><!--hauríem de mirar d'assignar gènere d'una altra manera (l'Amèrica llatina / l'Europa Occiental / l'Amazones) -->
		<clip pos="2" side="tl" part="gen"/>
		<lit-tag v="f"/>
	    </let>
	  </when>
	</choose>		
	<out>
	  <lu>
	    <get-case-from pos="1">
	      <lit v="en"/>
	    </get-case-from>
	    <clip pos="1" side="tl" part="a_prep"/>
	  </lu> 
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="whole"/> 
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lem"/>
	    <clip pos="3" side="tl" part="a_nploc"/> 
	  </lu>
	</out>   
      </action>
    </rule> 


    <!--
	<rule> <!-#- REGLA: verb + prep: Viure a la ciutat - Vivir en la ciudad-#->
	<pattern>
	<pattern-item n="verb"/>
	<pattern-item n="a"/>
	</pattern>
	<action>
	<choose>
	<when>
	<test>
	<in caseless="yes">
	<clip pos="1" side="sl" part="lem"/>
	<list n="verbs_estat"/>
	</in>  
	</test>
	<let>
	<clip pos="2" side="tl" part="lem"/>
	<get-case-from pos="2"> <!-#-Atenció: mai no traduirà EN sinó només En o en !!  -#->
	<lit v="en"/>
	</get-case-from>
	</let>
	</when>
	</choose>
	<out>
	<lu>
	<clip pos="1" side="tl" part="lemh"/>
	<clip pos="1" side="tl" part="a_verb"/>
	<clip pos="1" side="tl" part="temps"/>
	<clip pos="1" side="tl" part="persona"/>
	<clip pos="1" side="tl" part="gen"/>
	<clip pos="1" side="tl" part="nbr"/>
	<clip pos="1" side="tl" part="lemq"/>
	</lu>
	<b pos="1"/>
	<lu>
	<clip pos="2" side="tl" part="whole"/>
	</lu>
	</out>
	</action>
	</rule> 

<rule> <!-#- REGLA: "anar" + inf + prep: Vaig viure a la ciutat - Viví en la ciudad (igual que l'anterior però amb forma perifràstica)-#->
<pattern>
<pattern-item n="anar"/>
<pattern-item n="inf"/>
<pattern-item n="a"/>
</pattern>
<action>
<choose>
<when>
<test>
<in caseless="yes">
<clip pos="2" side="sl" part="lem"/>
<list n="verbs_estat"/>
</in>  
</test>
<let>
<clip pos="3" side="tl" part="lem"/>
<get-case-from pos="3"> <!-#-Atenció: mai no traduirà EN sinó només En o en !!  -#->
<lit v="en"/>
</get-case-from>
</let>
</when>
</choose>
<out>
<lu>
<get-case-from pos="1">            
<clip pos="2" side="tl" part="lemh"/>
</get-case-from>
<clip pos="2" side="tl" part="a_verb"/>
<lit-tag v="ifi"/>
<clip pos="1" side="tl" part="persona"/>
<clip pos="1" side="tl" part="nbr"/>
<clip pos="2" side="tl" part="lemq"/>                  
</lu>  
</out>  
<call-macro n="f_bcond">
<with-param pos="1"/>
</call-macro>
<out>
<b pos="2"/>
<lu>
<clip pos="3" side="tl" part="whole"/>
</lu>
</out>
</action>
</rule> -->



    <rule> <!--REGLA: verb + prep + nploc/noms_locatius: Estudio a Madrid  - Estudio en Madrid. Sóc a Sabadell - Estoy en Sabadell. Sóc a casa - Estoy en casa (modificada 3-09-2008 MG: de "nploc" ha passat a detectar tots els "nom", per poder mirar si és un nom de la llista "locatiu". Molts canvis de prep ja es tracten amb la macro f_preps, però no permet fer el canvi de 'ser' a 'estar', cosa que sí que es fa amb aquesta regla i les 3 posteriors) -->
      <pattern>
	<pattern-item n="verb"/>
	<pattern-item n="a"/>
	<pattern-item n="nom_loc"/>
      </pattern>
      <action>
	<choose>
	  <when>
	    <test>
	      <or>
		<in caseless="yes">
		  <clip pos="3" side="sl" part="lem"/>
		  <list n="locatiu"/>
		</in>
		<equal>
		  <clip pos="3" side="sl" part="a_nploc"/>
		  <lit-tag v="np.loc"/>
		</equal>
	      </or>
	    </test>
	    <choose>
	      <when>
		<test>
		  <and>
		    <not>
		      <in caseless="yes">
			<clip pos="1" side="sl" part="lem"/>
			<list n="verbs_moviment"/>
		      </in>
		    </not>
		    <or>
		      <equal>  
			<clip pos="1" side="tl" part="a_verb"/>
			<lit-tag v="vblex"/>
		      </equal>
		      <equal>  
			<clip pos="1" side="tl" part="a_verb"/>
			<lit-tag v="vblex.v2"/>
		      </equal>  
		      <equal>  
			<clip pos="1" side="tl" part="a_verb"/>
			<lit-tag v="vbmod"/>  
		      </equal>
		    </or>
		  </and>
		</test>    
		<out>
		  <lu>
		    <clip pos="1" side="tl" part="lemh"/>
		    <clip pos="1" side="tl" part="a_verb"/>
		    <clip pos="1" side="tl" part="temps"/>
		    <clip pos="1" side="tl" part="persona"/>
		    <clip pos="1" side="tl" part="gen"/>
		    <clip pos="1" side="tl" part="nbr"/>
		    <clip pos="1" side="tl" part="lemq"/>
		  </lu>
		  <b pos="1"/>
		  <lu>
		    <get-case-from pos="2">
		      <lit v="en"/>
		    </get-case-from>
		    <clip pos="2" side="tl" part="a_prep"/> 
		  </lu>
		  <b pos="2"/>
		  <lu>
		    <clip pos="3" side="tl" part="lemh"/>
		    <clip pos="3" side="tl" part="a_nom"/>
		    <clip pos="3" side="tl" part="gen"/>
		    <clip pos="3" side="tl" part="nbr"/>
		    <clip pos="3" side="tl" part="lemq"/> 
		  </lu> 
		</out> 
	      </when> 
	      <when>
		<test>
		  <equal>  
		    <clip pos="1" side="tl" part="a_verb"/>
		    <lit-tag v="vbser"/>
		  </equal>  
		</test>  
		<out>
		  <lu>    
		    <get-case-from pos="1">
		      <lit v="estar"/>
		    </get-case-from>
		    <lit-tag v="vblex"/> 
		    <clip pos="1" side="tl" part="temps"/>
		    <clip pos="1" side="tl" part="persona"/>
		    <clip pos="1" side="tl" part="gen"/>
		    <clip pos="1" side="tl" part="nbr"/>
		  </lu> 
		  <b pos="1"/>
		  <lu>
		    <get-case-from pos="2">
		      <lit v="en"/>
		    </get-case-from>
		    <clip pos="2" side="tl" part="a_prep"/> 
		  </lu>
		  <b pos="2"/>
		  <lu>
		    <clip pos="3" side="tl" part="lemh"/>
		    <clip pos="3" side="tl" part="a_nom"/>
		    <clip pos="3" side="tl" part="gen"/>
		    <clip pos="3" side="tl" part="nbr"/>
		    <clip pos="3" side="tl" part="lemq"/> 
		  </lu> 
		</out> 
	      </when>
	      <otherwise>
		<out>
		  <lu>
		    <clip pos="1" side="tl" part="lemh"/>
		    <clip pos="1" side="tl" part="a_verb"/>
		    <clip pos="1" side="tl" part="temps"/>
		    <clip pos="1" side="tl" part="persona"/>
		    <clip pos="1" side="tl" part="gen"/>
		    <clip pos="1" side="tl" part="nbr"/>
		    <clip pos="1" side="tl" part="lemq"/>
		  </lu> 
		  <b pos="1"/>
		  <lu>
		    <clip pos="2" side="tl" part="whole"/>
		  </lu>
		  <b pos="2"/>
		  <lu>
		    <clip pos="3" side="tl" part="lemh"/>
		    <clip pos="3" side="tl" part="a_nom"/>
		    <clip pos="3" side="tl" part="gen"/>
		    <clip pos="3" side="tl" part="nbr"/>
		    <clip pos="3" side="tl" part="lemq"/> 
		  </lu> 
		</out> 
	      </otherwise>
	    </choose>
	  </when>
	  <otherwise>
	    <out>
	      <lu>
		<clip pos="1" side="tl" part="lemh"/>
		<clip pos="1" side="tl" part="a_verb"/>
		<clip pos="1" side="tl" part="temps"/>
		<clip pos="1" side="tl" part="persona"/>
		<clip pos="1" side="tl" part="gen"/>
		<clip pos="1" side="tl" part="nbr"/>
		<clip pos="1" side="tl" part="lemq"/>
	      </lu> 
	      <b pos="1"/>
	      <lu>
		<clip pos="2" side="tl" part="whole"/>
	      </lu>
	      <b pos="2"/>
	      <lu>
		<clip pos="3" side="tl" part="lemh"/>
		<clip pos="3" side="tl" part="a_nom"/>
		<clip pos="3" side="tl" part="gen"/>
		<clip pos="3" side="tl" part="nbr"/>
		<clip pos="3" side="tl" part="lemq"/> 
	      </lu> 
	    </out> 
	  </otherwise>
	</choose>
      </action>
    </rule>   


    <rule> <!--REGLA: "anar" + inf + prep + nploc: Estudio a Madrid - Estudio en Madrid. Sóc a Sabadell - Estoy en Sabadell (igual que l'anterior però amb verb en forma perifràstica (modificada 3-09-2008 MG: de "nploc" ha passat a detectar tots els "nom", per poder mirar si és un nom de la llista "locatiu")-->
      <pattern>
	<pattern-item n="anar"/>
	<pattern-item n="inf"/>
	<pattern-item n="a"/>
	<pattern-item n="nom_loc"/>
      </pattern>
      <action>  
	<choose>
	  <when>
	    <test>
	      <or>
		<in caseless="yes">
		  <clip pos="4" side="sl" part="lem"/>
		  <list n="locatiu"/>
		</in>
		<equal>
		  <clip pos="4" side="sl" part="a_nploc"/>
		  <lit-tag v="np.loc"/>
		</equal>
	      </or>
	    </test>
	    <choose>
	      <when>
		<test>
		  <and>
		    <not>
		      <in caseless="yes">
			<clip pos="2" side="sl" part="lem"/>
			<list n="verbs_moviment"/>
		      </in>
		    </not>
		    <or>
		      <equal>  
			<clip pos="2" side="tl" part="a_verb"/>
			<lit-tag v="vblex"/>
		      </equal> 
		      <equal>  
			<clip pos="2" side="tl" part="a_verb"/>
			<lit-tag v="vblex.v2"/>
		      </equal> 
		      <equal>  
			<clip pos="2" side="tl" part="a_verb"/>
			<lit-tag v="vbmod"/>  
		      </equal>
		    </or>
		  </and>
		</test>    
		<out>
		  <lu>
		    <get-case-from pos="1">            
		      <clip pos="2" side="tl" part="lemh"/>
		    </get-case-from>
		    <clip pos="2" side="tl" part="a_verb"/>
		    <lit-tag v="ifi"/>
		    <clip pos="1" side="tl" part="persona"/>
		    <clip pos="1" side="tl" part="nbr"/>
		    <clip pos="2" side="tl" part="lemq"/>                  
		  </lu>  
		</out>  
		<call-macro n="f_bcond">
		  <with-param pos="1"/>
		</call-macro>
		<out>
		  <b pos="2"/>
		  <lu>
		    <get-case-from pos="3">
		      <lit v="en"/>
		    </get-case-from>
		    <clip pos="3" side="tl" part="a_prep"/> 
		  </lu>
		  <b pos="3"/>
		  <lu>
		    <clip pos="4" side="tl" part="lemh"/>
		    <clip pos="4" side="tl" part="a_nom"/>
		    <clip pos="4" side="tl" part="gen"/>
		    <clip pos="4" side="tl" part="nbr"/>
		    <clip pos="4" side="tl" part="lemq"/> 
		  </lu>
		</out> 
	      </when> 
	      <when>
		<test>
		  <equal>  
		    <clip pos="2" side="tl" part="a_verb"/>
		    <lit-tag v="vbser"/>
		  </equal>  
		</test>  
		<out>
		  <lu>    
		    <get-case-from pos="2">
		      <lit v="estar"/>
		    </get-case-from>
		    <lit-tag v="vblex.ifi"/> 
		    <clip pos="1" side="tl" part="persona"/>
		    <clip pos="1" side="tl" part="nbr"/>
		  </lu> 
		</out>  
		<call-macro n="f_bcond">
		  <with-param pos="1"/>
		</call-macro>
		<out>
		  <b pos="2"/>
		  <lu>
		    <get-case-from pos="3">
		      <lit v="en"/>
		    </get-case-from>
		    <clip pos="3" side="tl" part="a_prep"/> 
		  </lu>
		  <b pos="3"/>
		  <lu>
		    <clip pos="4" side="tl" part="lemh"/>
		    <clip pos="4" side="tl" part="a_nom"/>
		    <clip pos="4" side="tl" part="gen"/>
		    <clip pos="4" side="tl" part="nbr"/>
		    <clip pos="4" side="tl" part="lemq"/> 
		  </lu>
		</out> 
	      </when>
	      <otherwise>
		<out>
		  <lu>
		    <get-case-from pos="1">            
		      <clip pos="2" side="tl" part="lemh"/>
		    </get-case-from>
		    <clip pos="2" side="tl" part="a_verb"/>
		    <lit-tag v="ifi"/>
		    <clip pos="1" side="tl" part="persona"/>
		    <clip pos="1" side="tl" part="nbr"/>
		    <clip pos="2" side="tl" part="lemq"/>                  
		  </lu>  
		</out>  
		<call-macro n="f_bcond">
		  <with-param pos="1"/>
		</call-macro>
		<out>
		  <b pos="2"/>
		  <lu>
		    <clip pos="3" side="tl" part="whole"/>
		  </lu>
		  <b pos="3"/>
		  <lu>
		    <clip pos="4" side="tl" part="lemh"/>
		    <clip pos="4" side="tl" part="a_nom"/>
		    <clip pos="4" side="tl" part="gen"/>
		    <clip pos="4" side="tl" part="nbr"/>
		    <clip pos="4" side="tl" part="lemq"/> 
		  </lu>
		</out> 
	      </otherwise>
	    </choose>
	  </when>	  
	  <otherwise>
	    <out>
	      <lu>
		<get-case-from pos="1">            
		  <clip pos="2" side="tl" part="lemh"/>
		</get-case-from>
		<clip pos="2" side="tl" part="a_verb"/>
		<lit-tag v="ifi"/>
		<clip pos="1" side="tl" part="persona"/>
		<clip pos="1" side="tl" part="nbr"/>
		<clip pos="2" side="tl" part="lemq"/>                  
	      </lu>  
	    </out>  
	    <call-macro n="f_bcond">
	      <with-param pos="1"/>
	    </call-macro>
	    <out>
	      <b pos="2"/>
	      <lu>
		<clip pos="3" side="tl" part="whole"/>
	      </lu>
	      <b pos="3"/>
	      <lu>
		<clip pos="4" side="tl" part="lemh"/>
		<clip pos="4" side="tl" part="a_nom"/>
		<clip pos="4" side="tl" part="gen"/>
		<clip pos="4" side="tl" part="nbr"/>
		<clip pos="4" side="tl" part="lemq"/> 
	      </lu>
	    </out> 
	  </otherwise>
	</choose>
      </action>
    </rule>


   <rule> <!--REGLA: verb + prep + det + nploc/noms_locatius: era al domicili - estaba en el domicilio -->
      <pattern>
	<pattern-item n="verb"/>
	<pattern-item n="a"/>
	<pattern-item n="det"/>
	<pattern-item n="nom_loc"/>
      </pattern>
      <action>
	<call-macro n="f_concord2">
	  <with-param pos="4"/>
	  <with-param pos="3"/>
	</call-macro>   
	<choose>
	  <when>
	    <test>
	      <or>
		<in caseless="yes">
		  <clip pos="4" side="sl" part="lem"/>
		  <list n="locatiu"/>
		</in>
		<equal>
		  <clip pos="4" side="sl" part="a_nploc"/>
		  <lit-tag v="np.loc"/>
		</equal>
	      </or>
	    </test>
	    <choose>
	      <when>
		<test>
		  <and>
		    <not>
		      <in caseless="yes">
			<clip pos="1" side="sl" part="lem"/>
			<list n="verbs_moviment"/>
		      </in>
		    </not>
		    <or>
		      <equal>  
			<clip pos="1" side="tl" part="a_verb"/>
			<lit-tag v="vblex"/>
		      </equal>  
		      <equal>  
			<clip pos="1" side="tl" part="a_verb"/>
			<lit-tag v="vblex.v2"/>
		      </equal>  
		      <equal>  
			<clip pos="1" side="tl" part="a_verb"/>
			<lit-tag v="vbmod"/>  
		      </equal>
		    </or>
		  </and>
		</test>    
		<out>
		  <lu>
		    <clip pos="1" side="tl" part="lemh"/>
		    <clip pos="1" side="tl" part="a_verb"/>
		    <clip pos="1" side="tl" part="temps"/>
		    <clip pos="1" side="tl" part="persona"/>
		    <clip pos="1" side="tl" part="gen"/>
		    <clip pos="1" side="tl" part="nbr"/>
		    <clip pos="1" side="tl" part="lemq"/>
		  </lu>
		  <b pos="1"/>
		  <lu>
		    <get-case-from pos="2">
		      <lit v="en"/>
		    </get-case-from>
		    <clip pos="2" side="tl" part="a_prep"/> 
		  </lu>
		  <b pos="2"/>
		  <lu>
		    <clip pos="3" side="tl" part="whole"/>
		  </lu>
		  <b pos="3"/>
		  <lu>
		    <clip pos="4" side="tl" part="lemh"/>
		    <clip pos="4" side="tl" part="a_nom"/>
		    <clip pos="4" side="tl" part="gen"/>
		    <clip pos="4" side="tl" part="nbr"/>
		    <clip pos="4" side="tl" part="lemq"/> 
		  </lu>
		</out> 
	      </when> 
	      <when>
		<test>
		  <equal>  
		    <clip pos="1" side="tl" part="a_verb"/>
		    <lit-tag v="vbser"/>
		  </equal>  
		</test>  
		<out>
		  <lu>    
		    <get-case-from pos="1">
		      <lit v="estar"/>
		    </get-case-from>
		    <lit-tag v="vblex"/> 
		    <clip pos="1" side="tl" part="temps"/>
		    <clip pos="1" side="tl" part="persona"/>
		    <clip pos="1" side="tl" part="gen"/>
		    <clip pos="1" side="tl" part="nbr"/>
		  </lu> 
		  <b pos="1"/>
		  <lu>
		    <get-case-from pos="2">
		      <lit v="en"/>
		    </get-case-from>
		    <clip pos="2" side="tl" part="a_prep"/> 
		  </lu>
		  <b pos="2"/>
		  <lu>
		    <clip pos="3" side="tl" part="whole"/>
		  </lu>
		  <b pos="3"/>
		  <lu>
		    <clip pos="4" side="tl" part="lemh"/>
		    <clip pos="4" side="tl" part="a_nom"/>
		    <clip pos="4" side="tl" part="gen"/>
		    <clip pos="4" side="tl" part="nbr"/>
		    <clip pos="4" side="tl" part="lemq"/> 
		  </lu>
		</out> 
	      </when>
	      <otherwise>
		<out>
		  <lu>
		    <clip pos="1" side="tl" part="lemh"/>
		    <clip pos="1" side="tl" part="a_verb"/>
		    <clip pos="1" side="tl" part="temps"/>
		    <clip pos="1" side="tl" part="persona"/>
		    <clip pos="1" side="tl" part="gen"/>
		    <clip pos="1" side="tl" part="nbr"/>
		    <clip pos="1" side="tl" part="lemq"/>
		  </lu> 
		  <b pos="1"/>
		  <lu>
		    <clip pos="2" side="tl" part="whole"/>
		  </lu>
		  <b pos="2"/>
		  <lu>
		    <clip pos="3" side="tl" part="whole"/>
		  </lu>
		  <b pos="3"/>
		  <lu>
		    <clip pos="4" side="tl" part="lemh"/>
		    <clip pos="4" side="tl" part="a_nom"/>
		    <clip pos="4" side="tl" part="gen"/>
		    <clip pos="4" side="tl" part="nbr"/>
		    <clip pos="4" side="tl" part="lemq"/> 
		  </lu>
		</out> 
	      </otherwise>
	    </choose>
	  </when>
	  <otherwise>
	    <out>
	      <lu>
		<clip pos="1" side="tl" part="lemh"/>
		<clip pos="1" side="tl" part="a_verb"/>
		<clip pos="1" side="tl" part="temps"/>
		<clip pos="1" side="tl" part="persona"/>
		<clip pos="1" side="tl" part="gen"/>
		<clip pos="1" side="tl" part="nbr"/>
		<clip pos="1" side="tl" part="lemq"/>
	      </lu> 
	      <b pos="1"/>
	      <lu>
		<clip pos="2" side="tl" part="whole"/>
	      </lu>
	      <b pos="2"/>
	      <lu>
		<clip pos="3" side="tl" part="whole"/>
	      </lu>
	      <b pos="3"/>
	      <lu>
		<clip pos="4" side="tl" part="lemh"/>
		<clip pos="4" side="tl" part="a_nom"/>
		<clip pos="4" side="tl" part="gen"/>
		<clip pos="4" side="tl" part="nbr"/>
		<clip pos="4" side="tl" part="lemq"/> 
	      </lu>
	    </out> 
	  </otherwise>
	</choose>
      </action>
    </rule>   


    <rule> <!--REGLA: "anar" + inf + prep + nploc: va treballar al poble - trabajó en el pueblo (igual que l'anterior però amb verb en forma perifràstica) -->
      <pattern>
	<pattern-item n="anar"/>
	<pattern-item n="inf"/>
	<pattern-item n="a"/>
	<pattern-item n="det"/>
	<pattern-item n="nom_loc"/>
      </pattern>
      <action> 
	<call-macro n="f_concord2">
	  <with-param pos="5"/>
	  <with-param pos="4"/>
	</call-macro>  
	<choose>
	  <when>
	    <test>
	      <or>
		<in caseless="yes">
		  <clip pos="5" side="sl" part="lem"/>
		  <list n="locatiu"/>
		</in>
		<equal>
		  <clip pos="5" side="sl" part="a_nploc"/>
		  <lit-tag v="np.loc"/>
		</equal>
	      </or>
	    </test>
	    <choose>
	      <when>
		<test>
		  <and>
		    <not>
		      <in caseless="yes">
			<clip pos="2" side="sl" part="lem"/>
			<list n="verbs_moviment"/>
		      </in>
		    </not>
		    <or>
		      <equal>  
			<clip pos="2" side="tl" part="a_verb"/>
			<lit-tag v="vblex"/>
		      </equal>  
		      <equal>  
			<clip pos="2" side="tl" part="a_verb"/>
			<lit-tag v="vblex.v2"/>
		      </equal>  
		      <equal>  
			<clip pos="2" side="tl" part="a_verb"/>
			<lit-tag v="vbmod"/>  
		      </equal>
		    </or>
		  </and>
		</test>    
		<out>
		  <lu>
		    <get-case-from pos="1">            
		      <clip pos="2" side="tl" part="lemh"/>
		    </get-case-from>
		    <clip pos="2" side="tl" part="a_verb"/>
		    <lit-tag v="ifi"/>
		    <clip pos="1" side="tl" part="persona"/>
		    <clip pos="1" side="tl" part="nbr"/>
		    <clip pos="2" side="tl" part="lemq"/>                  
		  </lu>  
		</out>  
		<call-macro n="f_bcond">
		  <with-param pos="1"/>
		</call-macro>
		<out>
		  <b pos="2"/>
		  <lu>
		    <get-case-from pos="3">
		      <lit v="en"/>
		    </get-case-from>
		    <clip pos="3" side="tl" part="a_prep"/> 
		  </lu>
		  <b pos="3"/>
		  <lu>
		    <clip pos="4" side="tl" part="whole"/>
		  </lu>
		  <b pos="4"/>
		  <lu>
		    <clip pos="5" side="tl" part="lemh"/>
		    <clip pos="5" side="tl" part="a_nom"/>
		    <clip pos="5" side="tl" part="gen"/>
		    <clip pos="5" side="tl" part="nbr"/>
		    <clip pos="5" side="tl" part="lemq"/> 
		  </lu>
		</out> 
	      </when> 
	      <when>
		<test>
		  <equal>  
		    <clip pos="2" side="tl" part="a_verb"/>
		    <lit-tag v="vbser"/>
		  </equal>  
		</test>  
		<out>
		  <lu>    
		    <get-case-from pos="2">
		      <lit v="estar"/>
		    </get-case-from>
		    <lit-tag v="vblex.ifi"/> 
		    <clip pos="1" side="tl" part="persona"/>
		    <clip pos="1" side="tl" part="nbr"/>
		  </lu> 
		</out>  
		<call-macro n="f_bcond">
		  <with-param pos="1"/>
		</call-macro>
		<out>
		  <b pos="2"/>
		  <lu>
		    <get-case-from pos="3">
		      <lit v="en"/>
		    </get-case-from>
		    <clip pos="3" side="tl" part="a_prep"/> 
		  </lu>
		  <b pos="3"/>
		  <lu>
		    <clip pos="4" side="tl" part="whole"/>
		  </lu>
		  <b pos="4"/>
		  <lu>
		    <clip pos="5" side="tl" part="lemh"/>
		    <clip pos="5" side="tl" part="a_nom"/>
		    <clip pos="5" side="tl" part="gen"/>
		    <clip pos="5" side="tl" part="nbr"/>
		    <clip pos="5" side="tl" part="lemq"/> 
		  </lu>
		</out> 
	      </when>
	      <otherwise>
		<out>
		  <lu>
		    <get-case-from pos="1">            
		      <clip pos="2" side="tl" part="lemh"/>
		    </get-case-from>
		    <clip pos="2" side="tl" part="a_verb"/>
		    <lit-tag v="ifi"/>
		    <clip pos="1" side="tl" part="persona"/>
		    <clip pos="1" side="tl" part="nbr"/>
		    <clip pos="2" side="tl" part="lemq"/>                  
		  </lu>  
		</out>  
		<call-macro n="f_bcond">
		  <with-param pos="1"/>
		</call-macro>
		<out>
		  <b pos="2"/>
		  <lu>
		    <clip pos="3" side="tl" part="whole"/>
		  </lu>
		  <b pos="3"/>
		  <lu>
		    <clip pos="4" side="tl" part="whole"/>
		  </lu>
		  <b pos="4"/>
		  <lu>
		    <clip pos="5" side="tl" part="lemh"/>
		    <clip pos="5" side="tl" part="a_nom"/>
		    <clip pos="5" side="tl" part="gen"/>
		    <clip pos="5" side="tl" part="nbr"/>
		    <clip pos="5" side="tl" part="lemq"/> 
		  </lu>
		</out> 
	      </otherwise>
	    </choose>
	  </when>
	  
	  <otherwise>
	    <out>
	      <lu>
		<get-case-from pos="1">            
		  <clip pos="2" side="tl" part="lemh"/>
		</get-case-from>
		<clip pos="2" side="tl" part="a_verb"/>
		<lit-tag v="ifi"/>
		<clip pos="1" side="tl" part="persona"/>
		<clip pos="1" side="tl" part="nbr"/>
		<clip pos="2" side="tl" part="lemq"/>                  
	      </lu>  
	    </out>  
	    <call-macro n="f_bcond">
	      <with-param pos="1"/>
	    </call-macro>
	    <out>
	      <b pos="2"/>
	      <lu>
		<clip pos="3" side="tl" part="whole"/>
	      </lu>
	      <b pos="3"/>
	      <lu>
		<clip pos="4" side="tl" part="whole"/>
	      </lu>
	      <b pos="4"/>
	      <lu>
		<clip pos="5" side="tl" part="lemh"/>
		<clip pos="5" side="tl" part="a_nom"/>
		<clip pos="5" side="tl" part="gen"/>
		<clip pos="5" side="tl" part="nbr"/>
		<clip pos="5" side="tl" part="lemq"/> 
	      </lu>
	    </out> 
	  </otherwise>
	</choose>
      </action>
    </rule> 


     


    <rule> <!-- dir-se -> llamarse -->
      <pattern>
	<pattern-item n="prnproref"/>
	<pattern-item n="dir"/>
      </pattern>
      <action>
	<choose>
	  <when>
	    <test>
	      <equal>
		<clip pos="1" side="sl" part="persona"/>
		<clip pos="2" side="sl" part="persona"/>
	      </equal>
	    </test>
	    <let>
	      <clip pos="2" side="tl" part="lem"/>
	      <lit v="llamar"/>
	    </let>
	  </when>
	</choose>
	<out>
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	</out>
      </action>

    </rule> 

    <rule> <!-- l'he trobada -> la he encontrado -->
      <pattern>
	<pattern-item n="lopronom"/>
	<pattern-item n="haver"/>
	<pattern-item n="ppf"/>
      </pattern>
      <action>      
	<out>
	  <lu>
	    <clip pos="1" side="tl" part="lem"/>
	    <lit-tag v="prn.pro.p3.f.sg"/>
	  </lu>
	  <b pos="1"/>
	  <lu>
	    <clip pos="2" side="tl" part="whole"/>
	  </lu>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_verb"/>
	    <clip pos="3" side="tl" part="temps"/>
	    <lit-tag v="m"/>
	    <clip pos="3" side="tl" part="nbr"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>

    <!--REGLA: prnpro haver partipi -> prnpro haver participi-masc-sg-->
    <rule> 
      <pattern>
	<pattern-item n="prnpro3"/>
	<pattern-item n="haver"/>
	<pattern-item n="ppfmpl"/>
      </pattern>
      <action>
	<choose>
	  <when>
	    <test>
	      <not>
		<equal>
		  <clip pos="1" side="tl" part="whole"/><!--Comprueba que el pronombre no tenga traducción vacía (pronombres "hi" y "en" -->
		  <lit v=""/>
		</equal>
	      </not>
	    </test>
	    <out>
	      <lu>
		<clip pos="1" side="tl" part="lem"/>
		<clip pos="1" side="tl" part="a_prnpro"/>
		<clip pos="1" side="tl" part="persona"/>
		<clip pos="1" side="tl" part="gen"/>
		<clip pos="1" side="tl" part="nbr"/>
	      </lu>
	      <b pos="1"/>
	      <lu>
		<clip pos="2" side="tl" part="whole"/>
	      </lu>
	    </out>
	  </when>
	  <otherwise><!--En caso de que el pronombre no se traduzca, envía sólo el verbo -->
	    <out>
	      <lu>
		<get-case-from pos="1">            
		  <clip pos="2" side="tl" part="lem"/>
		</get-case-from>
		<clip pos="2" side="tl" part="a_verb"/>
		<clip pos="2" side="tl" part="temps"/>
		<clip pos="2" side="tl" part="persona"/>
		<clip pos="2" side="tl" part="nbr"/>                
	      </lu>
	    </out>
	    <call-macro n="f_bcond">
	      <with-param pos="1"/>
	    </call-macro>
	  </otherwise>
	</choose>
	<out>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_verb"/>
	    <clip pos="3" side="tl" part="temps"/>
	    <lit-tag v="m"/>
	    <lit-tag v="sg"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule> 


    <rule> <!--REGLA: haver-enc participi (femení sg i pl, masculí pl) -> haver-enc participi-masc-sg-->
      <pattern>
	<pattern-item n="haver"/>
	<pattern-item n="prnenc"/>
	<pattern-item n="ppfmpl"/>
      </pattern>
      <action>
	<call-macro n="f_outverb2">
	  <with-param pos="1"/>
	  <with-param pos="2"/>
	</call-macro>
	<out>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="a_verb"/>
	    <clip pos="3" side="tl" part="temps"/>
	    <lit-tag v="m"/>
	    <lit-tag v="sg"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>

    <rule> <!--REGLA: haver-enc-enc participi (femení sg i pl, masculí pl) -> haver-enc-enc participi-masc-sg-->
      <pattern>
	<pattern-item n="haver"/>
	<pattern-item n="prnenc"/>
	<pattern-item n="prnenc"/>
	<pattern-item n="ppfmpl"/>
      </pattern>
      <action>
	<call-macro n="f_outverb3">
	  <with-param pos="1"/>
	  <with-param pos="2"/>
	  <with-param pos="3"/>
	</call-macro>
	<out>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="lemh"/>
	    <clip pos="4" side="tl" part="a_verb"/>
	    <clip pos="4" side="tl" part="temps"/>
	    <lit-tag v="m"/>
	    <lit-tag v="sg"/>
	    <clip pos="4" side="tl" part="lemh"/>
	  </lu>
	</out>
      </action>
    </rule>

    <rule> <!--REGLA: tot i + inf (tot i sortir) -> a pesar de + inf -->
      <pattern>
	<pattern-item n="tot"/>
	<pattern-item n="i"/>
	<pattern-item n="inf"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="3"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1"> 
	      <lit v="a pesar de"/>
	    </get-case-from>
	    <lit-tag v="pr"/>
	  </lu>
	</out>
	<call-macro n="f_bcond">
	  <with-param pos="1"/>
	</call-macro>
	<out>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="lemh"/>
	    <clip pos="3" side="tl" part="tags"/>
	    <clip pos="3" side="tl" part="lemq"/>
	  </lu>
	</out>
      </action>
    </rule>

    <rule> <!--REGLA: tot i + inf + enclític (tot i veure'l) -> a pesar de + inf + enclític -->
      <pattern>
	<pattern-item n="tot"/>
	<pattern-item n="i"/>
	<pattern-item n="inf"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="3"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1"> 
	      <lit v="a pesar de"/>
	    </get-case-from>
	    <lit-tag v="pr"/>
	  </lu>
	  <b pos="1"/>
	</out>
	<call-macro n="f_bcond">
	  <with-param pos="2"/>
	</call-macro>
	<call-macro n="f_outverb2">
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	</call-macro>
      </action>
    </rule>

    <rule> <!--REGLA: tot i + inf + enclític + enclític (tot i veure-l'hi) -> a pesar de + inf + enclític + enclític-->
      <pattern>
	<pattern-item n="tot"/>
	<pattern-item n="i"/>
	<pattern-item n="inf"/>
	<pattern-item n="prnenc"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="3"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1"> 
	      <lit v="a pesar de"/>
	    </get-case-from>
	    <lit-tag v="pr"/>
	  </lu>
	  <b pos="1"/>
	</out>
	<call-macro n="f_bcond">
	  <with-param pos="2"/>
	</call-macro>
	<call-macro n="f_outverb3">
	  <with-param pos="3"/>
	  <with-param pos="4"/>
	  <with-param pos="5"/>
	</call-macro>
      </action>
    </rule>

    <rule> <!--REGLA: tot i + no + inf (tot i sortir) -> a pesar de + no + inf -->
      <pattern>
	<pattern-item n="tot"/>
	<pattern-item n="i"/>
	<pattern-item n="no"/>
	<pattern-item n="inf"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="4"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1"> 
	      <lit v="a pesar de"/>
	    </get-case-from>
	    <lit-tag v="pr"/>
	  </lu>
	</out>
	<call-macro n="f_bcond">
	  <with-param pos="1"/>
	</call-macro>
	<out>
	  <b pos="2"/>
	  <lu>
	    <clip pos="3" side="tl" part="whole"/>
	  </lu>
	  <b pos="3"/>
	  <lu>
	    <clip pos="4" side="tl" part="whole"/>
	  </lu>
	</out>
	<let>
	  <var n="no"/>
	  <lit v="yes"/>
	</let>
      </action>
    </rule>

    <rule> <!--REGLA: tot i + inf + enclític (tot i veure'l) -> a pesar de + inf + enclític -->
      <pattern>
	<pattern-item n="tot"/>
	<pattern-item n="i"/>
	<pattern-item n="no"/>
	<pattern-item n="inf"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="4"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1"> 
	      <lit v="a pesar de"/>
	    </get-case-from>
	    <lit-tag v="pr"/>
	  </lu>
	  <b pos="1"/>
	</out>
	<call-macro n="f_bcond">
	  <with-param pos="2"/>
	</call-macro>
	<out>
	  <lu>
	    <clip pos="3" side="tl" part="whole"/>
	  </lu>
	  <b pos="3"/>
	</out>
	<call-macro n="f_outverb2">
	  <with-param pos="4"/>
	  <with-param pos="5"/>
	</call-macro>
	<let>
	  <var n="no"/>
	  <lit v="yes"/>
	</let>
      </action>
    </rule>

    <rule> <!--REGLA: tot i + inf + enclític + enclític (tot i veure-l'hi) -> a pesar de + inf + enclític + enclític-->
      <pattern>
	<pattern-item n="tot"/>
	<pattern-item n="i"/>
	<pattern-item n="no"/>
	<pattern-item n="inf"/>
	<pattern-item n="prnenc"/>
	<pattern-item n="prnenc"/>
      </pattern>
      <action>
	<call-macro n="f_tipusverb">
	  <with-param pos="4"/>
	</call-macro>
	<out>
	  <lu>
	    <get-case-from pos="1"> 
	      <lit v="a pesar de"/>
	    </get-case-from>
	    <lit-tag v="pr"/>
	  </lu>
	  <b pos="1"/>
	</out>
	<call-macro n="f_bcond">
	  <with-param pos="2"/>
	</call-macro>
	<out>
	  <lu>
	    <clip pos="3" side="tl" part="whole"/>
	  </lu>
	  <b pos="3"/>
	</out>
	<call-macro n="f_outverb3">
	  <with-param pos="4"/>
	  <with-param pos="5"/>
	  <with-param pos="6"/>
	</call-macro>
	<let>
	  <var n="no"/>
	  <lit v="yes"/>
	</let>
      </action>
    </rule>



    <rule> <!-- REGLA: reset variables-->
      <pattern>
	<pattern-item n="sent"/>
      </pattern>
      <action>
	<let>
	  <var n="numero"/>
	  <lit-tag v="sg"/>
	</let>
	<let>
	  <var n="genero"/>
	  <lit-tag v="m"/>
	</let>
	<let>
	  <var n="hi"/>
	  <lit v=""/>
	</let>
	<let>
	  <var n="prepo"/>
	  <lit v=""/>
	</let>
	<let>
	  <var n="no"/>
	  <lit v=""/>
	</let>
	<let>
	  <var n="tipusverb"/>
	  <lit v=""/>
	</let>
	<out>
	  <lu>
	    <clip pos="1" side="tl" part="whole"/>
	  </lu>
	</out>
      </action>
    </rule>
    


  </section-rules>

</transfer>
