X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fstyle%2Fproofs.xsl;h=c40a42ce865ac34e19b3b9af7daf04975fb72835;hb=e1d232bab1b061d9098fd666ca24bed84b38f99e;hp=96d1ee7de532142ee3ce9ac18f7e4c6644950351;hpb=0e9cfa8af4ac6569e350dac51b8f8482d124f71a;p=helm.git

diff --git a/helm/style/proofs.xsl b/helm/style/proofs.xsl
index 96d1ee7de..c40a42ce8 100644
--- a/helm/style/proofs.xsl
+++ b/helm/style/proofs.xsl
@@ -124,6 +124,7 @@
     </xsl:when>
     <!-- EQUALITY with extra-parameters -->
     <xsl:when test="name()= 'APPLY' and CONST[
+ attribute::uri='cic:/Coq/Init/Logic/Equality/eq_ind.con' or
  attribute::uri='cic:/Coq/Init/Logic_Type/eqT_ind.con' or
  attribute::uri='cic:/Coq/Zarith/auxiliary/eqT_ind_r.con'] and count(child::*) > 7">
       <xsl:variable name="no_extraproofs" select="count(*[position()>7 and @sort='Prop' and (name(.)='LAMBDA' or name(.)='LETIN' or name(.)='APPLY' or name(.)='MUTCASE' or name(.)='FIX' or name(.)='COFIX')])"/>