<!-- HELM Group: Asperti, Padovani, Sacerdoti, Schena -->
<!--***********************************************************************-->
+<xsl:template name="mksymbol-reals">
+ <xsl:param name="symbol" select="''"/>
+ <xsl:choose>
+ <xsl:when test="$UNICODEvsSYMBOL = 'symbol'">
+ <xsl:variable name="fontsymbol">
+ <xsl:choose>
+ <xsl:when test="$symbol = 'leadsto'">
+ <xsl:value-of select="'®'"/>
+ </xsl:when>
+ <xsl:otherwise>
+ <xsl:text>???</xsl:text>
+ </xsl:otherwise>
+ </xsl:choose>
+ </xsl:variable>
+ <FONT FACE="symbol" color="'blue'">
+ <xsl:value-of select="$fontsymbol"/>
+ </FONT>
+ </xsl:when>
+ <xsl:otherwise>
+ <xsl:variable name="unicodesymbol">
+ <xsl:choose>
+ <xsl:when test="$symbol = 'leadsto'">
+ <xsl:value-of select="'→'"/>
+ </xsl:when>
+ <xsl:otherwise>
+ <xsl:text>???</xsl:text>
+ </xsl:otherwise>
+ </xsl:choose>
+ </xsl:variable>
+ <FONT color="'blue'">
+ <xsl:value-of select="$unicodesymbol"/>
+ </FONT>
+ </xsl:otherwise>
+ </xsl:choose>
+</xsl:template>
+
<!-- **************************************************************** -->
<!-- INLINE MODE -->
<!-- **************************************************************** -->
</a>
<SUB>
<xsl:apply-templates select="m:bvar/m:ci"/>
- <FONT FACE="symbol" mathcolor="blue">®</FONT>
+ <xsl:call-template name="mksymbol-reals">
+ <xsl:with-param name="symbol" select="'leadsto'"/>
+ </xsl:call-template>
<xsl:apply-templates mode="inline" select="m:lowlimit"/>
</SUB>
<xsl:apply-templates mode="inline" select="*[4]"/>
</a>
<SUB>
<xsl:apply-templates select="m:bvar/m:ci"/>
- <FONT FACE="symbol" mathcolor="blue">®</FONT>
+ <xsl:call-template name="mksymbol-reals">
+ <xsl:with-param name="symbol" select="'leadsto'"/>
+ </xsl:call-template>
<xsl:apply-templates select="m:lowlimit"/>
</SUB>
<BR/>