<!-- Revised: March 21 2000, Irene Schena -->
<!--***********************************************************************-->
+<!-- NOTE: the namespace declaration has to be done in the stylesheets
+which generates the toplevel element (see for instance xlink) -->
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
xmlns:m="http://www.w3.org/1998/Math/MathML"
- xmlns:helm="http://www.cs.unibo.it/helm">
+ xmlns:helm="http://www.cs.unibo.it/helm"
+ xmlns:xlink="http://www.w3.org/1999/xlink">
-<xsl:import href="mml2mmlv1_0.xsl"/>
+<!-- OLD: <xsl:import href="mml2mmlv1_0.xsl"/> -->
+<xsl:import href="mmlctop.xsl-0.14"/>
+
+<xsl:import href="mmltheoryextension.xsl"/>
+
+<xsl:param name="explodeall" select="false()"/>
<!--***********************************************************************-->
<!-- Parameter affecting line-breaking -->
<!-- OBJECTS -->
<!--**********************-->
+<xsl:param name="type" select="'standalone'"/>
+
<xsl:template match="/">
- <xsl:processing-instruction name="cocoon-format">type="text/xhtml"</xsl:processing-instruction>
- <xsl:apply-templates select="*"/>
+ <xsl:choose>
+ <xsl:when test="$type = 'standalone'">
+ <xsl:apply-templates select="*"/>
+ </xsl:when>
+ <xsl:otherwise>
+ <to_be_embedded>
+ <xsl:apply-templates select="*"/>
+ </to_be_embedded>
+ </xsl:otherwise>
+ </xsl:choose>
</xsl:template>
<!-- DEFINITION -->
<m:mtable align="baseline 1" equalrows="false" columnalign="left">
<m:mtr>
<m:mtd>
- <xsl:apply-templates select="m:ci"/>
- <m:mo>:</m:mo>
+ <m:mrow>
+ <xsl:apply-templates select="m:ci"/>
+ <m:mo>:</m:mo>
+ </m:mrow>
</m:mtd>
</m:mtr>
<m:mtr>
<m:mtd>
+ <m:mrow>
<xsl:apply-templates select="m:type"/>
+ </m:mrow>
</m:mtd>
</m:mtr>
</m:mtable>
</xsl:when>
<xsl:otherwise>
- <xsl:apply-templates select="m:ci"/>
- <m:mo>:</m:mo>
- <xsl:apply-templates select="m:type"/>
+ <m:mrow>
+ <xsl:apply-templates select="m:ci"/>
+ <m:mo>:</m:mo>
+ <xsl:apply-templates select="m:type"/>
+ </m:mrow>
</xsl:otherwise>
</xsl:choose>
</xsl:when>
<!-- CSYMBOL -->
<xsl:template match="m:apply[m:csymbol]">
+<xsl:param name="nopar" select="0"/>
<xsl:variable name="name"><xsl:value-of select="m:csymbol"/></xsl:variable>
<xsl:variable name="charlength"><xsl:apply-templates select="m:csymbol" mode="charcount"/></xsl:variable>
<m:mrow>
- <xsl:if test="@helm:xref">
- <xsl:attribute name="helm:xref"><xsl:value-of select="@helm:xref"/></xsl:attribute>
+ <xsl:if test="@id">
+ <xsl:attribute name="m:xref"><xsl:value-of select="@id"/></xsl:attribute>
</xsl:if>
<xsl:choose>
+ <!-- FORALL -->
<xsl:when test="$name='forall'">
<xsl:choose>
<xsl:when test="$charlength >= $framewidth">
<m:mtable align="baseline 1" equalrows="false" columnalign="left">
<m:mtr>
<m:mtd>
- <m:mo mathcolor="Blue"><m:mchar name="ForAll"/></m:mo>
+ <m:mrow>
+ <m:mo mathcolor="Blue">∀</m:mo>
<xsl:apply-templates select="m:bvar"/>
+ </m:mrow>
</m:mtd>
</m:mtr>
<m:mtr>
</m:mtable>
</xsl:when>
<xsl:otherwise>
- <m:mo mathcolor="Blue"><m:mchar name="ForAll"/></m:mo>
+ <m:mo mathcolor="Blue">∀</m:mo>
<xsl:apply-templates select="m:bvar/m:ci"/>
<m:mo>:</m:mo>
<xsl:apply-templates select="m:bvar/m:type"/>
</xsl:otherwise>
</xsl:choose>
</xsl:when>
+ <!-- LET-IN -->
<xsl:when test="$name='let_in'">
<xsl:choose>
<xsl:when test="$charlength >= $framewidth">
<m:mtable align="baseline 1" equalrows="false" columnalign="left">
<m:mtr>
<m:mtd>
+ <m:mrow>
<m:mo>LET</m:mo>
<m:mphantom><m:mtext>_</m:mtext></m:mphantom>
<xsl:apply-templates select="m:bvar"/>
+ </m:mrow>
</m:mtd>
</m:mtr>
<m:mtr>
</xsl:otherwise>
</xsl:choose>
</xsl:when>
+ <!-- PROD -->
<xsl:when test="$name='prod'">
<xsl:choose>
<xsl:when test="$charlength >= $framewidth">
<m:mtable align="baseline 1" equalrows="false" columnalign="left">
<m:mtr>
<m:mtd>
+ <m:mrow>
<m:mo mathcolor="Blue">Π</m:mo>
<xsl:apply-templates select="m:bvar"/>
+ </m:mrow>
</m:mtd>
</m:mtr>
<m:mtr>
</xsl:otherwise>
</xsl:choose>
</xsl:when>
+ <!-- ARROW -->
<xsl:when test="$name='arrow'">
<xsl:choose>
<xsl:when test="$charlength >= $framewidth">
<m:mtr>
<m:mtd>
<m:mrow>
- <m:mo stretchy="false">(</m:mo>
+ <xsl:if test="$nopar=0">
+ <m:mo stretchy="false">(</m:mo>
+ </xsl:if>
<xsl:apply-templates select="*[position()=2]"/>
</m:mrow>
</m:mtd>
<m:mtd>
<m:mrow>
<m:mo mathmathcolor="Blue">→</m:mo>
- <xsl:apply-templates select="*[position()=3]"/>
+ <xsl:choose>
+ <xsl:when test="*[position()=3]/m:csymbol">
+ <xsl:variable name="nextp"><xsl:value-of select="*[position()=3]/m:csymbol"/></xsl:variable>
+ <xsl:choose>
+ <xsl:when test="$nextp='arrow'">
+ <xsl:apply-templates select="*[position()=3]"><xsl:with-param name="nopar" select="1"/></xsl:apply-templates>
+ </xsl:when>
+ <xsl:otherwise>
+ <xsl:apply-templates select="*[position()=3]"/>
+ </xsl:otherwise>
+ </xsl:choose>
+ </xsl:when>
+ <xsl:otherwise>
+ <xsl:apply-templates select="*[position()=3]"/>
+ </xsl:otherwise>
+ </xsl:choose>
</m:mrow>
</m:mtd>
</m:mtr>
+ <xsl:if test="$nopar=0">
<m:mtr>
<m:mtd>
<m:mrow>
</m:mrow>
</m:mtd>
</m:mtr>
+ </xsl:if>
</m:mtable>
</xsl:when>
<xsl:otherwise>
- <m:mo stretchy="false">(</m:mo>
+ <xsl:if test="$nopar=0">
+ <m:mo stretchy="false">(</m:mo>
+ </xsl:if>
<xsl:apply-templates select="*[position()=2]"/>
<m:mo mathcolor="Blue">→</m:mo>
- <xsl:apply-templates select="*[position()=3]"/>
- <m:mo stretchy="false">)</m:mo>
+ <xsl:choose>
+ <xsl:when test="*[position()=3]/m:csymbol">
+ <xsl:variable name="nextp"><xsl:value-of select="*[position()=3]/m:csymbol"/></xsl:variable>
+ <xsl:choose>
+ <xsl:when test="$nextp='arrow'">
+ <xsl:apply-templates select="*[position()=3]"><xsl:with-param name="nopar" select="1"/></xsl:apply-templates>
+ </xsl:when>
+ <xsl:otherwise>
+ <xsl:apply-templates select="*[position()=3]"/>
+ </xsl:otherwise>
+ </xsl:choose>
+ </xsl:when>
+ <xsl:otherwise>
+ <xsl:apply-templates select="*[position()=3]"/>
+ </xsl:otherwise>
+ </xsl:choose>
+ <xsl:if test="$nopar=0">
+ <m:mo stretchy="false">)</m:mo>
+ </xsl:if>
</xsl:otherwise>
</xsl:choose>
</xsl:when>
+ <!-- APP -->
<xsl:when test="$name='app'">
<xsl:choose>
<xsl:when test="$charlength >= $framewidth">
</xsl:otherwise>
</xsl:choose>
</xsl:when>
+ <!-- CAST -->
<xsl:when test="$name='cast'">
<xsl:choose>
<xsl:when test="$charlength >= $framewidth">
</xsl:otherwise>
</xsl:choose>
</xsl:when>
+ <!-- PROP -->
<xsl:when test="$name='Prop'">
<m:mo>Prop</m:mo>
</xsl:when>
+ <!-- SET -->
<xsl:when test="$name='Set'">
<m:mo>Set</m:mo>
</xsl:when>
+ <!-- TYPE -->
<xsl:when test="$name='Type'">
<m:mo>Type</m:mo>
</xsl:when>
+ <!-- MUTCASE -->
<xsl:when test="$name='mutcase'">
<xsl:choose>
<xsl:when test="$charlength >= $framewidth">
</m:mrow>
</m:mtd>
</m:mtr>
- <xsl:for-each select="*[position() mod 2 = 0 and position()>3]">
- <xsl:variable name="charlength"><xsl:apply-templates select="." mode="charcount"><xsl:with-param name="nosibling" select="1"/></xsl:apply-templates></xsl:variable>
+ <xsl:for-each select="piecewise/piece">
+ <xsl:variable name="charlength"><xsl:apply-templates select="./*[2]" mode="charcount"><xsl:with-param name="nosibling" select="1"/></xsl:apply-templates></xsl:variable>
<m:mtr>
<m:mtd>
<m:mrow>
</xsl:otherwise>
</xsl:choose>
<m:mphantom><m:mtext>_</m:mtext></m:mphantom>
- <xsl:apply-templates select="."/>
+ <xsl:apply-templates select="./*[2]"/>
<xsl:if test="$framewidth > $charlength">
<m:mo mathcolor="Green">⇒</m:mo>
- <xsl:apply-templates select="following-sibling::*[position()= 1]"/>
+ <xsl:apply-templates select="./*[1]"/>
</xsl:if>
</m:mrow>
</m:mtd>
<m:mrow>
<m:mphantom><m:mtext>|_</m:mtext></m:mphantom>
<m:mo mathcolor="Green">⇒</m:mo>
- <xsl:apply-templates select="following-sibling::*[position()= 1]"/>
+ <xsl:apply-templates select="./*[1]"/>
</m:mrow>
</m:mtd>
</m:mtr>
<xsl:apply-templates select="*[position()=3]"/>
<m:mphantom><m:mtext>_</m:mtext></m:mphantom>
<m:mo>OF</m:mo>
- <xsl:for-each select="*[position() mod 2 = 0 and position()>3]">
+ <xsl:for-each select="piecewise/piece">
<xsl:choose>
<xsl:when test="position() != 1">
<m:mo stretchy="false">|</m:mo>
</xsl:when>
</xsl:choose>
- <xsl:apply-templates select="."/>
+ <xsl:apply-templates select="./*[2]"/>
<m:mo mathcolor="Green">⇒</m:mo>
- <xsl:apply-templates select="following-sibling::*[position()= 1]"/>
+ <xsl:apply-templates select="./*[1]"/>
</xsl:for-each>
<m:mphantom><m:mtext>_</m:mtext></m:mphantom>
<m:mo>END</m:mo>
</xsl:otherwise>
</xsl:choose>
</xsl:when>
+ <!-- FIX -->
<xsl:when test="$name='fix'">
<xsl:choose>
<xsl:when test="$charlength >= $framewidth">
</xsl:otherwise>
</xsl:choose>
</xsl:when>
+ <!-- COFIX -->
<xsl:when test="$name='cofix'">
<xsl:choose>
<xsl:when test="$charlength >= $framewidth">
<!-- ***************************************** -->
<!-- *********** PROOF ELEMENTS ************** -->
<!-- ***************************************** -->
+ <!-- PROOF -->
<xsl:when test="$name='proof'">
+ <m:maction actiontype="toggle">
+ <!-- CSC: $explodeall until the annotationHelper can handle mactions -->
+ <xsl:variable name="test" select="(not($explodeall)) and
+ (not(preceding-sibling::*[1]/text()='letin1')) and
+ (not(preceding-sibling::*[1]/text()='rw_step')) and
+ (not(name(..)='m:lambda'))"/>
+ <xsl:if test="$test">
+ <!-- Details hided (default) -->
+ <m:mtable align="baseline 1" equalrows="false" columnalign="left">
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <m:mtext mathcolor="Maroon">We can prove</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates select="*[position()=3]"/>
+ <m:mrow>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <m:mtext mathcolor="Green">(explain)</m:mtext>
+ </m:mrow>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ </m:mtable>
+ </xsl:if>
+ <!-- Show details -->
<m:mtable align="baseline 1" equalrows="false" columnalign="left">
<m:mtr>
<m:mtd>
<m:mtr>
<m:mtd>
<m:mrow>
- <m:mtext mathcolor="Maroon">we proved </m:mtext>
+ <m:mtext mathcolor="Maroon">we proved</m:mtext>
<m:mphantom><m:mtext>_</m:mtext></m:mphantom>
<xsl:apply-templates select="*[position()=3]"/>
+ <m:mrow>
+ <m:mphantom>
+ <m:mtext>_</m:mtext>
+ </m:mphantom>
+ <xsl:if test="$test">
+ <m:mtext mathcolor="Green">(hide details)</m:mtext>
+ </xsl:if>
+ </m:mrow>
</m:mrow>
</m:mtd>
</m:mtr>
</m:mtable>
+ </m:maction>
+ </xsl:when>
+ <!-- LETIN1 -->
+ <xsl:when test="$name='letin1'">
+ <m:mtable align="baseline 1" equalrows="false" columnalign="left">
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <xsl:apply-templates select="*[2]"/>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <xsl:apply-templates select="*[3]"/>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ </m:mtable>
+ </xsl:when>
+ <xsl:when test="$name='by_induction'">
+ <m:mtable align="baseline 1" equalrows="false" columnalign="left">
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <m:mtext mathcolor="red">We prove</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates select="../*[3]"/>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <m:mtext mathcolor="red">by induction on</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates
+ select="*[position()=last()]/*[position()=last()]"/>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <m:mtable align="baseline 1" equalrows="false" columnalign="left">
+ <xsl:for-each select="*[position()>3 and not(position()=last())]">
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <xsl:apply-templates select="."/>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ </xsl:for-each>
+ </m:mtable>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ </m:mtable>
+ </xsl:when>
+ <!-- inductive_case -->
+ <xsl:when test="$name='inductive_case'">
+ <m:mtable align="baseline 1" equalrows="false" columnalign="left">
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <m:mtext mathcolor="red">Case</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates select="*[2]"/>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <m:mtable align="baseline 1" equalrows="false" columnalign="left">
+ <xsl:if test="*[3]/*[position()>1]">
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <m:mtext mathcolor="red">By induction hypothesis, we have:</m:mtext>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:for-each select="*[3]/*[position()>1]">
+ <m:mo stretchy="false">(</m:mo>
+ <xsl:apply-templates select="m:ci"/>
+ <m:mo stretchy="false">) </m:mo>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates select="m:type"/>
+ </xsl:for-each>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ </xsl:if>
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <xsl:apply-templates select="*[4]"/>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ </m:mtable>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ </m:mtable>
</xsl:when>
+ <!-- case_lhs -->
+ <xsl:when test="$name='case_lhs'">
+ <m:mrow>
+ <xsl:choose>
+ <xsl:when test="count(*)=2">
+ <xsl:apply-templates select="*[2]"/>
+ </xsl:when>
+ <xsl:otherwise>
+ <m:mo stretchy="false">(</m:mo>
+ <xsl:apply-templates select="*[2]"/>
+ <xsl:for-each select="m:bvar">
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates select="*[1]"/>
+ <m:mtext>:</m:mtext>
+ <xsl:apply-templates select="m:type/*[1]"/>
+ </xsl:for-each>
+ <m:mo stretchy="false">)</m:mo>
+ </xsl:otherwise>
+ </xsl:choose>
+ </m:mrow>
+ </xsl:when>
+ <!-- false_ind -->
+ <xsl:when test="$name='false_ind'">
+ <m:mtable align="baseline 1" equalrows="false" columnalign="left">
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <xsl:apply-templates select="*[3]"/>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <m:mtext mathcolor="Red">Contradiction.</m:mtext>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ </m:mtable>
+ </xsl:when>
+ <!-- LET-IN -->
<xsl:when test="$name='letin'">
<m:mtable align="baseline 1" equalrows="false" columnalign="left">
<!-- <xsl:for-each select="APPLY[m:csymbol and (string(m:csymbol)='let')]"> -->
</m:mtr>
</m:mtable>
</xsl:when>
+ <!-- LET -->
<xsl:when test="$name='let'">
<m:mtext>(</m:mtext>
<xsl:apply-templates select="m:ci"/>
<m:mtext>) </m:mtext>
<xsl:apply-templates select="*[3]"/>
</xsl:when>
- <xsl:when test="$name='thread'">
+ <!-- RW_STEP -->
+ <xsl:when test="$name='rw_step'">
<m:mtable align="baseline 1" equalrows="false" columnalign="left">
<m:mtr>
<m:mtd>
<m:mrow>
<xsl:choose>
- <xsl:when test="name(*[last()])='m:apply'">
- <xsl:apply-templates select="*[last()]"/>
+ <xsl:when test="name(*[2])='m:apply'">
+ <xsl:apply-templates select="*[2]"/>
</xsl:when>
<xsl:otherwise>
- <m:mtext>Consider </m:mtext>
- <xsl:apply-templates select="*[last()]"/>
+ <m:mtext>Consider</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates select="*[2]"/>
</xsl:otherwise>
</xsl:choose>
</m:mrow>
</m:mtd>
</m:mtr>
- <xsl:apply-templates mode="thread" select="*[(last()-2)]"/>
- </m:mtable>
- </xsl:when>
- <xsl:when test="$name='rewrite_and_apply'">
- <m:mtable>
<m:mtr>
<m:mtd>
<m:mrow>
<m:mtext>Rewrite</m:mtext>
<m:mphantom><m:mtext>_</m:mtext></m:mphantom>
- <xsl:apply-templates select="*[2]/*[2]"/>
+ <xsl:apply-templates select="*[3]"/>
<m:mphantom><m:mtext>_</m:mtext></m:mphantom>
<m:mtext>with</m:mtext>
<m:mphantom><m:mtext>_</m:mtext></m:mphantom>
- <xsl:apply-templates select="*[2]/*[3]"/>
+ <xsl:apply-templates select="*[4]"/>
<m:mphantom><m:mtext>_</m:mtext></m:mphantom>
<m:mtext>by</m:mtext>
<m:mphantom><m:mtext>_</m:mtext></m:mphantom>
- <xsl:apply-templates select="*[2]/*[4]"/>
- <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
- <m:mtext>in</m:mtext>
- <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
- <xsl:apply-templates select="*[3]"/>
- <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
- <m:mtext>and apply to</m:mtext>
+ <xsl:apply-templates select="*[5]"/>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ </m:mtable>
+ </xsl:when>
+ <!-- not existing any more
+ <xsl:when test="$name='thread'">
+ <m:mtable align="baseline 1" equalrows="false" columnalign="left">
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <xsl:choose>
+ <xsl:when test="name(*[last()])='m:apply'">
+ <xsl:apply-templates select="*[last()]"/>
+ </xsl:when>
+ <xsl:otherwise>
+ <m:mtext>Consider</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates select="*[last()]"/>
+ </xsl:otherwise>
+ </xsl:choose>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ <xsl:apply-templates mode="thread" select="*[(last()-2)]"/>
+ </m:mtable>
+ </xsl:when>
+ -->
+ <!-- REWRITE_AND_APPLY -->
+ <xsl:when test="$name='rewrite_and_apply'">
+ <m:mtable align="baseline 1" equalrows="false" columnalign="left">
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <xsl:apply-templates select="*[2]"/>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <m:mtext>Then apply it to</m:mtext>
<m:mphantom><m:mtext>_</m:mtext></m:mphantom>
- <xsl:apply-templates select="*[position()>3]"/>
+ <xsl:apply-templates select="*[position()>2]"/>
</m:mrow>
</m:mtd>
</m:mtr>
</m:mtable>
- </xsl:when>
+ </xsl:when>
+ <!-- AND_IND -->
<xsl:when test="$name='and_ind'">
<m:mtable align="baseline 1" equalrows="false" columnalign="left">
<m:mtr>
<xsl:apply-templates select="*[2]"/>
</xsl:when>
<xsl:otherwise>
- <m:mtext>Consider </m:mtext>
+ <m:mtext>Consider</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
<xsl:apply-templates select="*[2]"/>
</xsl:otherwise>
</xsl:choose>
</m:mtr>
<m:mtr>
<m:mtd>
- <m:mtext>In particular, we have</m:mtext>
+ <m:mrow>
+ <m:mtext>In particular, we have</m:mtext>
+ </m:mrow>
</m:mtd>
</m:mtr>
<m:mtr>
</m:mtr>
</m:mtable>
</xsl:when>
+ <!-- full_or_ind -->
+ <xsl:when test="$name='full_or_ind'">
+ <m:mtable align="baseline 1" equalrows="false" columnalign="left">
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <xsl:choose>
+ <xsl:when test="name(*[2])='m:apply'">
+ <xsl:apply-templates select="*[2]"/>
+ </xsl:when>
+ <xsl:otherwise>
+ <m:mtext>Consider</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates select="*[2]"/>
+ </xsl:otherwise>
+ </xsl:choose>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <m:mtext>We proceed by cases to prove</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates select="*[3]"/>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <m:mtext>Left: suppose</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <m:mo stretchy="false">(</m:mo>
+ <xsl:apply-templates select="*[4]/m:bvar/m:ci"/>
+ <m:mo stretchy="false">)</m:mo>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates select="*[4]/m:bvar/m:type/*[1]"/>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates select="*[4]/*[3]"/>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <m:mtext>Right: suppose</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <m:mo stretchy="false">(</m:mo>
+ <xsl:apply-templates select="*[5]/m:bvar/m:ci"/>
+ <m:mo stretchy="false">)</m:mo>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates select="*[5]/m:bvar/m:type/*[1]"/>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ <m:mtr>
+ <m:mtd>
+ <m:mrow>
+ <xsl:apply-templates select="*[5]/*[3]"/>
+ </m:mrow>
+ </m:mtd>
+ </m:mtr>
+ </m:mtable>
+ </xsl:when>
+ <!-- OR_IND -->
<xsl:when test="$name='or_ind'">
<m:mtable align="baseline 1" equalrows="false" columnalign="left">
<m:mtr>
</m:mtr>
<m:mtr>
<m:mtd>
- <m:mtext>We prove</m:mtext>
- <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
- <xsl:apply-templates select="*[3]"/>
- <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
- <m:mtext>by cases:</m:mtext>
+ <m:mrow>
+ <m:mtext>We prove</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates select="*[3]"/>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <m:mtext>by cases:</m:mtext>
+ </m:mrow>
</m:mtd>
</m:mtr>
<m:mtr>
<m:mtd>
<m:mrow>
- <m:mtext>*</m:mtext>
+ <m:mtext>Left</m:mtext>
<xsl:apply-templates select="*[4]"/>
</m:mrow>
</m:mtd>
<m:mtr>
<m:mtd>
<m:mrow>
- <m:mtext>*</m:mtext>
+ <m:mtext>Right</m:mtext>
<xsl:apply-templates select="*[5]"/>
</m:mrow>
</m:mtd>
</m:mtr>
</m:mtable>
</xsl:when>
+ <!-- EX_IND -->
<xsl:when test="$name='ex_ind'">
<m:mtable align="baseline 1" equalrows="false" columnalign="left">
<m:mtr>
<xsl:apply-templates select="*[2]"/>
</xsl:when>
<xsl:otherwise>
- <m:mtext>Consider </m:mtext>
+ <m:mtext>Consider</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
<xsl:apply-templates select="*[2]"/>
</xsl:otherwise>
</xsl:choose>
</m:mtr>
<m:mtr>
<m:mtd>
- <m:mtext>Let</m:mtext>
- <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
- <xsl:apply-templates select="*[3]"/>
- <m:mtext>:</m:mtext>
- <xsl:apply-templates select="*[4]"/>
- <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
- <m:mtext>such that</m:mtext>
- <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
- <m:mtext>(</m:mtext>
- <xsl:apply-templates select="*[5]"/>
- <m:mtext>)</m:mtext>
- <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
- <xsl:apply-templates select="*[6]"/>
+ <m:mrow>
+ <m:mtext>Let</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates select="*[3]"/>
+ <m:mtext>:</m:mtext>
+ <xsl:apply-templates select="*[4]"/>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <m:mtext>such that</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <m:mtext>(</m:mtext>
+ <xsl:apply-templates select="*[5]"/>
+ <m:mtext>)</m:mtext>
+ <m:mphantom><m:mtext>_</m:mtext></m:mphantom>
+ <xsl:apply-templates select="*[6]"/>
+ </m:mrow>
</m:mtd>
</m:mtr>
<m:mtr>
</m:mtr>
</m:mtable>
</xsl:when>
+ <!-- ***************************************** -->
+ <!-- *********** NOTATIONS ******************* -->
+ <!-- ***************************************** -->
+ <!-- subst -->
+ <xsl:when test="$name='subst'">
+ <xsl:apply-templates select="*[3]"/>
+<!-- no font for ApplyFunction: <m:mo></m:mo> -->
+ <m:mo stretchy="false">[</m:mo>
+ <xsl:apply-templates select="*[4]"/>
+ <m:mo mathcolor="green">
+ <xsl:if test="@id != ''">
+ <xsl:attribute name="m:xref"><xsl:value-of select="@id"/></xsl:attribute>
+ </xsl:if>←</m:mo>
+ <xsl:apply-templates select="*[2]"/>
+ <m:mo stretchy="false">]</m:mo>
+ </xsl:when>
+ <!-- lift -->
+ <xsl:when test="$name='lift'">
+ <m:msup>
+ <m:mo mathcolor="green">
+ <xsl:if test="@id != ''">
+ <xsl:attribute name="m:xref"><xsl:value-of select="@id"/></xsl:attribute>
+ </xsl:if>↑</m:mo>
+ <xsl:apply-templates select="*[2]"/>
+ </m:msup>
+ <m:mrow>
+ <m:mo stretchy="false">(</m:mo>
+ <xsl:apply-templates select="*[3]"/>
+ <m:mo stretchy="false">)</m:mo>
+ </m:mrow>
+ </xsl:when>
+ <!-- lift_with_base -->
+ <xsl:when test="$name='lift_with_base'">
+ <m:msubsup>
+ <m:mo mathcolor="green">
+ <xsl:if test="@id != ''">
+ <xsl:attribute name="m:xref"><xsl:value-of select="@id"/></xsl:attribute>
+ </xsl:if>↑</m:mo>
+ <xsl:apply-templates select="*[3]"/>
+ <xsl:apply-templates select="*[4]"/>
+ </m:msubsup>
+ <m:mrow>
+ <m:mo stretchy="false">(</m:mo>
+ <xsl:apply-templates select="*[2]"/>
+ <m:mo stretchy="false">)</m:mo>
+ </m:mrow>
+ </xsl:when>
+ <!-- beta_red1 -->
+ <xsl:when test="$name='beta_red1'">
+ <xsl:apply-templates select="*[2]"/>
+ <m:munder>
+ <m:mo mathcolor="green">
+ <xsl:if test="@id != ''">
+ <xsl:attribute name="m:xref"><xsl:value-of select="@id"/></xsl:attribute>
+ </xsl:if>→</m:mo>
+ <m:mi mathcolor="green">β</m:mi>
+ </m:munder>
+ <xsl:apply-templates select="*[3]"/>
+ </xsl:when>
+ <!-- beta_red -->
+ <xsl:when test="$name='beta_red'">
+ <xsl:apply-templates select="*[2]"/>
+ <m:munderover>
+ <m:mo mathcolor="green">
+ <xsl:if test="@id != ''">
+ <xsl:attribute name="m:xref"><xsl:value-of select="@id"/></xsl:attribute>
+ </xsl:if>→</m:mo>
+ <m:mi mathcolor="green">β</m:mi>
+ <m:mi mathcolor="green">*</m:mi>
+ </m:munderover>
+ <xsl:apply-templates select="*[3]"/>
+ </xsl:when>
+ <!-- par_beta_red1 -->
+ <xsl:when test="$name='par_beta_red1'">
+ <xsl:apply-templates select="*[2]"/>
+ <m:munder>
+ <m:mo mathcolor="green">
+ <xsl:if test="@id != ''">
+ <xsl:attribute name="m:xref"><xsl:value-of select="@id"/></xsl:attribute>
+ </xsl:if>⇒</m:mo>
+ <m:mi mathcolor="green">β</m:mi>
+ </m:munder>
+ <xsl:apply-templates select="*[3]"/>
+ </xsl:when>
+ <!-- par_beta_red -->
+ <xsl:when test="$name='par_beta_red'">
+ <xsl:apply-templates select="*[2]"/>
+ <m:munderover>
+ <m:mo mathcolor="green">
+ <xsl:if test="@id != ''">
+ <xsl:attribute name="m:xref"><xsl:value-of select="@id"/></xsl:attribute>
+ </xsl:if>⇒</m:mo>
+ <m:mi mathcolor="green">β</m:mi>
+ <m:mi mathcolor="green">*</m:mi>
+ </m:munderover>
+ <xsl:apply-templates select="*[3]"/>
+ </xsl:when>
+ <!-- forgetful -->
+ <xsl:when test="$name='forgetful'">
+ <m:mfenced open="|" close="|">
+ <xsl:if test="@id != ''">
+ <xsl:attribute name="m:xref"><xsl:value-of select="@id"/></xsl:attribute>
+ </xsl:if>
+ <xsl:apply-templates select="*[2]"/>
+ </m:mfenced>
+ </xsl:when>
+ <!-- isomorphic -->
+ <xsl:when test="$name='isomorphic'">
+ <xsl:apply-templates select="*[2]"/>
+ <m:mo mathcolor="green">
+ <xsl:if test="@id != ''">
+ <xsl:attribute name="m:xref"><xsl:value-of select="@id"/></xsl:attribute>
+ </xsl:if>≅</m:mo>
+ <xsl:apply-templates select="*[3]"/>
+ </xsl:when>
+ <!-- interp -->
+ <xsl:when test="$name='forgetful'">
+ <m:mfenced open="[" close="]">
+ <xsl:if test="@id != ''">
+ <xsl:attribute name="m:xref"><xsl:value-of select="@id"/></xsl:attribute>
+ </xsl:if>
+ <xsl:apply-templates select="*[2]"/>
+ </m:mfenced>
+ </xsl:when>
+
+ <!-- ERROR -->
<xsl:otherwise>
- <m:ci>ERROR</m:ci>
+ <m:mi>ERROR</m:mi>
</xsl:otherwise>
</xsl:choose>
</m:mrow>
</xsl:template>
+<!-- Il modo Thread non esiste piu'
<xsl:template match="*" mode="thread">
<xsl:variable name="name"><xsl:value-of select="following-sibling::*[position()=1]/m:csymbol"/></xsl:variable>
<xsl:choose>
<m:mtr>
<m:mtd>
<m:mrow>
- <m:mtext mathcolor="Maroon">we get</m:mtext>
+ <m:mtext mathcolor="Maroon">we get</m:mtext>
<m:mphantom><m:mtext>_</m:mtext></m:mphantom>
<xsl:apply-templates select="."/>
</m:mrow>
<m:mtr>
<m:mtd>
<m:mrow>
- <m:mtext mathcolor="Maroon">we get</m:mtext>
+ <m:mtext mathcolor="Maroon">we get</m:mtext>
<m:mphantom><m:mtext>_</m:mtext></m:mphantom>
<xsl:apply-templates select="."/>
</m:mrow>
</xsl:choose>
<xsl:apply-templates mode="thread" select="preceding-sibling::*[position()=2]"/>
</xsl:template>
-
+-->
<!-- LAMBDA -->
<xsl:template match="m:lambda">
<xsl:variable name="charlength"><xsl:apply-templates select="*[position()=1]" mode="charcount"/></xsl:variable>
- <m:mrow helm:xref="{@helm:xref}">
+ <m:mrow>
+ <xsl:if test="@id">
+ <xsl:attribute name="m:xref">
+ <xsl:value-of select="@id"/>
+ </xsl:attribute>
+ </xsl:if>
<xsl:choose>
<xsl:when test="$charlength >= $framewidth">
<m:mtable align="baseline 1" equalrows="false" columnalign="left">
<m:mtr>
<m:mtd>
+ <m:mrow>
<m:mo mathcolor="Red">λ</m:mo>
<xsl:apply-templates select="m:bvar"/>
+ </m:mrow>
</m:mtd>
</m:mtr>
<m:mtr>
<xsl:choose>
<xsl:when test="$charlength >= $framewidth">
<m:mtable align="baseline 1" equalrows="false" columnalign="left">
- <xsl:if test="@helm:xref">
- <xsl:attribute name="helm:xref">
- <xsl:value-of select="@helm:xref"/>
+ <xsl:if test="@id">
+ <xsl:attribute name="m:xref">
+ <xsl:value-of select="@id"/>
</xsl:attribute>
</xsl:if>
<m:mtr>
<m:mtd>
- <m:mo stretchy="false">(</m:mo>
- <xsl:apply-templates select="*[position()=2]"/>
+ <m:mrow>
+ <m:mo stretchy="false">(</m:mo>
+ <xsl:apply-templates select="*[position()=2]"/>
+ </m:mrow>
</m:mtd>
</m:mtr>
<xsl:for-each select = "*[position()>2]">
<m:mtr>
<m:mtd>
- <m:mphantom><m:mtext>__</m:mtext></m:mphantom>
- <m:mo helm:xref="{m:in/@helm:xref}">=</m:mo>
- <xsl:apply-templates select="."/>
+ <m:mrow>
+ <m:mphantom><m:mtext>__</m:mtext></m:mphantom>
+ <m:mo>
+ <xsl:if test="m:in/@id">
+ <xsl:attribute name="m:xref">
+ <xsl:value-of select="m:in/@id"/>
+ </xsl:attribute>
+ </xsl:if>=</m:mo>
+ <xsl:apply-templates select="."/>
+ </m:mrow>
</m:mtd>
</m:mtr>
</xsl:for-each>
<m:mtr>
<m:mtd>
- <m:mo stretchy="false">)</m:mo>
+ <m:mrow>
+ <m:mo stretchy="false">)</m:mo>
+ </m:mrow>
</m:mtd>
</m:mtr>
</m:mtable>
<xsl:variable name="symbol">
<xsl:choose>
<xsl:when test="m:and[1]">
- <xsl:value-of select="'wedge'"/>
+ <xsl:value-of select="'∧'"/>
</xsl:when>
<xsl:when test="m:or[1]">
- <xsl:value-of select="'vee'"/>
+ <xsl:value-of select="'∨'"/>
</xsl:when>
<xsl:when test="m:geq[1]">
- <xsl:value-of select="'geq'"/>
+ <xsl:value-of select="'≥'"/>
</xsl:when>
<xsl:when test="m:leq[1]">
- <xsl:value-of select="'leq'"/>
+ <xsl:value-of select="'≤'"/>
</xsl:when>
<xsl:when test="m:gt[1]">
- <xsl:value-of select="'gt'"/>
+ <xsl:value-of select="'>'"/>
</xsl:when>
<xsl:when test="m:lt[1]">
- <xsl:value-of select="'lt'"/>
+ <xsl:value-of select="'< '"/>
</xsl:when>
<xsl:when test="m:eq[1]">
- <xsl:value-of select="'Equal'"/>
+ <xsl:value-of select="'='"/>
</xsl:when>
<xsl:when test="m:in[1]">
- <xsl:value-of select="'Element'"/>
+ <xsl:value-of select="'∈'"/>
</xsl:when>
<xsl:when test="m:subset[1]">
- <xsl:value-of select="'SubsetEqual'"/>
+ <xsl:value-of select="'⊆'"/>
</xsl:when>
<xsl:when test="m:prsubset[1]">
- <xsl:value-of select="'subset'"/>
+ <xsl:value-of select="'⊂'"/>
</xsl:when>
<xsl:when test="m:intersect[1]">
- <xsl:value-of select="'Intersection'"/>
+ <xsl:value-of select="'⋂'"/>
</xsl:when>
<xsl:when test="m:union[1]">
- <xsl:value-of select="'Union'"/>
+ <xsl:value-of select="'⋃'"/>
</xsl:when>
<xsl:when test="m:setdiff[1]">
- <xsl:value-of select="'Backslash'"/>
+ <xsl:value-of select="'∖'"/>
</xsl:when>
</xsl:choose>
</xsl:variable>
<xsl:choose>
<xsl:when test="$charlength >= $framewidth">
<m:mtable align="baseline 1" equalrows="false" columnalign="left">
- <xsl:if test="@helm:xref">
- <xsl:attribute name="helm:xref">
- <xsl:value-of select="@helm:xref"/>
+ <xsl:if test="@id">
+ <xsl:attribute name="m:xref">
+ <xsl:value-of select="@id"/>
</xsl:attribute>
</xsl:if>
<m:mtr>
<m:mtd>
- <m:mo stretchy="false">(</m:mo>
- <xsl:apply-templates select="*[position()=2]"/>
+ <m:mrow>
+ <m:mo stretchy="false">(</m:mo>
+ <xsl:apply-templates select="*[position()=2]"/>
+ </m:mrow>
</m:mtd>
</m:mtr>
<xsl:for-each select = "*[position()>2]">
<m:mtr>
<m:mtd>
- <m:mphantom><m:mtext>__</m:mtext></m:mphantom>
- <m:mo helm:xref="{*[1]/@helm:xref}">
- <m:mchar name="{$symbol}"/>
- </m:mo>
- <xsl:apply-templates select="."/>
+ <m:mrow>
+ <m:mphantom><m:mtext>__</m:mtext></m:mphantom>
+ <m:mo>
+ <xsl:if test="*[1]/@id">
+ <xsl:attribute name="m:xref">
+ <xsl:value-of select="*[1]/@id"/>
+ </xsl:attribute>
+ </xsl:if><xsl:value-of select="$symbol"/></m:mo>
+ <xsl:apply-templates select="."/>
+ </m:mrow>
</m:mtd>
</m:mtr>
</xsl:for-each>
<m:mtr>
<m:mtd>
- <m:mo stretchy="false">)</m:mo>
+ <m:mrow>
+ <m:mo stretchy="false">)</m:mo>
+ </m:mrow>
</m:mtd>
</m:mtr>
</m:mtable>
<xsl:template match = "m:set">
<xsl:choose>
<xsl:when test="count(child::*) = 0">
- <m:mi>
- <m:mchar name="emptyset"/>
- </m:mi>
+ <m:mi>
+ <xsl:if test="@id">
+ <xsl:attribute name="m:xref">
+ <xsl:value-of select="@id"/>
+ </xsl:attribute>
+ </xsl:if>∅</m:mi>
</xsl:when>
<xsl:otherwise>
<xsl:variable name="charlength">
<m:mtable align="baseline 1" equalrows="false" columnalign="left">
<m:mtr>
<m:mtd>
- <m:mo stretchy="false">{</m:mo>
- <xsl:apply-templates select="*[position()=1]"/>
+ <m:mrow>
+ <m:mo stretchy="false">
+ <xsl:if test="@id">
+ <xsl:attribute name="m:xref">
+ <xsl:value-of select="@id"/>
+ </xsl:attribute>
+ </xsl:if>{</m:mo>
+ <xsl:apply-templates select="*[position()=1]"/>
+ </m:mrow>
</m:mtd>
</m:mtr>
<m:mtr>
<m:mtd>
- <m:mphantom><m:mtext>{</m:mtext></m:mphantom>
- <m:mo stretchy="false">|</m:mo>
- <xsl:apply-templates select="m:condition/*[1]"/>
+ <m:mrow>
+ <m:mphantom><m:mtext>{</m:mtext></m:mphantom>
+ <m:mo stretchy="false">|</m:mo>
+ <xsl:apply-templates select="m:condition/*[1]"/>
+ </m:mrow>
</m:mtd>
</m:mtr>
<m:mtr>
<m:mtd>
- <m:mo stretchy="false">}</m:mo>
+ <m:mrow>
+ <m:mo stretchy="false">
+ <xsl:if test="@id">
+ <xsl:attribute name="m:xref">
+ <xsl:value-of select="@id"/>
+ </xsl:attribute>
+ </xsl:if>}</m:mo>
+ </m:mrow>
</m:mtd>
</m:mtr>
</m:mtable>
<m:mtable align="baseline 1" equalrows="false" columnalign="left">
<m:mtr>
<m:mtd>
- <m:mo stretchy="false">{</m:mo>
- <xsl:apply-templates select="*[position()=1]"/>
- <xsl:if test="position() != last()">
- <mo>,</mo>
- </xsl:if>
+ <m:mrow>
+ <m:mo stretchy="false">
+ <xsl:if test="@id">
+ <xsl:attribute name="m:xref">
+ <xsl:value-of select="@id"/>
+ </xsl:attribute>
+ </xsl:if>{</m:mo>
+ <xsl:apply-templates select="*[position()=1]"/>
+ <xsl:if test="position() != last()">
+ <mo>,</mo>
+ </xsl:if>
+ </m:mrow>
</m:mtd>
</m:mtr>
<xsl:for-each select = "*[position()>2]">
<m:mtr>
<m:mtd>
- <m:mphantom><m:mtext>{</m:mtext></m:mphantom>
- <xsl:apply-templates select="."/>
- <xsl:if test="position() != last()">
- <mo>,</mo>
- </xsl:if>
+ <m:mrow>
+ <m:mphantom><m:mtext>{</m:mtext></m:mphantom>
+ <xsl:apply-templates select="."/>
+ <xsl:if test="position() != last()">
+ <mo>,</mo>
+ </xsl:if>
+ </m:mrow>
</m:mtd>
</m:mtr>
</xsl:for-each>
<m:mtr>
<m:mtd>
- <m:mo stretchy="false">}</m:mo>
+ <m:mrow>
+ <m:mo stretchy="false">
+ <xsl:if test="@id">
+ <xsl:attribute name="m:xref">
+ <xsl:value-of select="@id"/>
+ </xsl:attribute>
+ </xsl:if>}</m:mo>
+ </m:mrow>
</m:mtd>
</m:mtr>
</m:mtable>
</xsl:template>
<xsl:template match = "m:apply[m:card[1]]">
- <m:mo stretchy="false">|</m:mo>
+ <m:mfenced open="|" close="|" stretchy="false">
+ <xsl:if test="($SEM_SW=$SEM_XREF or $SEM_SW=$SEM_XREF_EXT) and @id">
+ <xsl:attribute name="m:xref">
+ <xsl:value-of select="@id"/>
+ </xsl:attribute>
+ </xsl:if>
<xsl:apply-templates select="*[2]"/>
- <m:mo stretchy="false">|</m:mo>
+ </m:mfenced>
</xsl:template>
-<!-- *********************************** -->
-<!-- PROOF ELEMENTS -->
-<!-- *********************************** -->
-
-
<!--**********************-->
<!-- COUNTING -->
</xsl:template>
</xsl:stylesheet>
-
-