<xsl:apply-templates select="patternsType/*[1]" mode="noannot"/>
<xsl:apply-templates select="inductiveTerm/*[1]" mode="noannot"/>
<xsl:variable name="nop"><xsl:value-of select="$InductiveTypeDoc/InductiveDefinition/@noParams"/></xsl:variable>
-<piecewise>
- <xsl:for-each select="pattern">
- <xsl:variable name="pos" select="position()"/>
- <xsl:variable name="nopar"><xsl:apply-templates select="$InductiveTypeDoc/InductiveDefinition/InductiveType[position()=number($Tindex)+1]/Constructor[position()=number($pos)]/*[1]" mode="counting"><xsl:with-param name="noparams" select="$nop"/></xsl:apply-templates></xsl:variable>
-<piece>
- <xsl:apply-templates select="./*[1]" mode="abstparams"><xsl:with-param name="noparams" select="$nopar"/><xsl:with-param name="target" select="1"/><xsl:with-param name="binder">LAMBDA</xsl:with-param></xsl:apply-templates>
-
- <xsl:choose>
- <xsl:when test="$nopar = 0">
- <m:ci>
- <xsl:call-template name="insert_subscript"><xsl:with-param name="node_value"><xsl:value-of select="$InductiveTypeDoc/InductiveDefinition/InductiveType[position()=number($Tindex)+1]/Constructor[position()=number($pos)]/@name"/></xsl:with-param></xsl:call-template>
- </m:ci>
- </xsl:when>
- <xsl:otherwise>
- <m:apply>
- <m:csymbol>app</m:csymbol>
- <m:ci>
- <xsl:call-template name="insert_subscript"><xsl:with-param name="node_value"><xsl:value-of select="$InductiveTypeDoc/InductiveDefinition/InductiveType[position()=number($Tindex)+1]/Constructor[position()=number($pos)]/@name"/></xsl:with-param></xsl:call-template>
- </m:ci>
- <xsl:apply-templates select="./*[1]" mode="abstparams"><xsl:with-param name="noparams" select="$nopar"/><xsl:with-param name="binder">LAMBDA</xsl:with-param></xsl:apply-templates>
- </m:apply>
- </xsl:otherwise>
- </xsl:choose>
-</piece>
- </xsl:for-each>
-</piecewise>
+ <m:piecewise>
+ <xsl:for-each select="pattern">
+ <xsl:variable name="pos" select="position()"/>
+ <xsl:variable name="nopar"><xsl:apply-templates select="$InductiveTypeDoc/InductiveDefinition/InductiveType[position()=number($Tindex)+1]/Constructor[position()=number($pos)]/*[1]" mode="counting"><xsl:with-param name="noparams" select="$nop"/></xsl:apply-templates></xsl:variable>
+ <m:piece>
+ <xsl:apply-templates select="./*[1]" mode="abstparams"><xsl:with-param name="noparams" select="$nopar"/><xsl:with-param name="target" select="1"/><xsl:with-param name="binder">LAMBDA</xsl:with-param></xsl:apply-templates>
+ <xsl:choose>
+ <xsl:when test="$nopar = 0">
+ <m:ci>
+ <xsl:call-template name="insert_subscript"><xsl:with-param name="node_value"><xsl:value-of select="$InductiveTypeDoc/InductiveDefinition/InductiveType[position()=number($Tindex)+1]/Constructor[position()=number($pos)]/@name"/></xsl:with-param></xsl:call-template>
+ </m:ci>
+ </xsl:when>
+ <xsl:otherwise>
+ <m:apply>
+ <m:csymbol>app</m:csymbol>
+ <m:ci>
+ <xsl:call-template name="insert_subscript"><xsl:with-param name="node_value"><xsl:value-of select="$InductiveTypeDoc/InductiveDefinition/InductiveType[position()=number($Tindex)+1]/Constructor[position()=number($pos)]/@name"/></xsl:with-param></xsl:call-template>
+ </m:ci>
+ <xsl:apply-templates select="./*[1]" mode="abstparams"><xsl:with-param name="noparams" select="$nopar"/><xsl:with-param name="binder">LAMBDA</xsl:with-param></xsl:apply-templates>
+ </m:apply>
+ </xsl:otherwise>
+ </xsl:choose>
+ </m:piece>
+ </xsl:for-each>
+ </m:piecewise>
</m:apply>
</xsl:template>
<FONT color="red">CASE </FONT>
<xsl:apply-templates mode="inline" select="*[position()=3]"/>
<FONT color="red"> OF </FONT>
-<xsl:for-each select="piecewise/piece">
+ <xsl:for-each select="m:piecewise/m:piece">
<!--<xsl:for-each select="*[position() mod 2 = 0 and position()>3]">-->
<xsl:choose>
<xsl:when test="not(position() = 1)">
<xsl:text> | </xsl:text>
</xsl:when>
</xsl:choose>
-<xsl:apply-templates mode="inline" select="./*[2]"/>
+ <xsl:apply-templates mode="inline" select="./*[2]"/>
<xsl:call-template name="mksymbol-1">
<xsl:with-param name="symbol" select="'RightArrow'"/>
<xsl:with-param name="color" select="'green'"/>
<xsl:with-param name="current_indent" select="$current_indent + 8"/>
</xsl:apply-templates>
<xsl:text> OF </xsl:text>
- <xsl:for-each select="piecewise/piece">
+ <xsl:for-each select="m:piecewise/m:piece">
<!-- <xsl:for-each select="*[position() mod 2 = 0 and position()>3]">-->
<br/>
<xsl:call-template name="make_indent">
</m:mrow>
</m:mtd>
</m:mtr>
- <xsl:for-each select="piecewise/piece">
+ <xsl:for-each select="m:piecewise/m: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>
<xsl:apply-templates select="*[position()=3]"/>
<m:mphantom><m:mtext>_</m:mtext></m:mphantom>
<m:mo>OF</m:mo>
- <xsl:for-each select="piecewise/piece">
+ <xsl:for-each select="m:piecewise/m:piece">
<xsl:choose>
<xsl:when test="position() != 1">
<m:mo stretchy="false">|</m:mo>