Logarithms

<..msub of log ..>

<xsl:template match="
 msub [
 normalize-space(child::*[1]) = ’log’
 or
 normalize-space(child::*[1]) = ’ln’
]" >
 <xsl:copy>
 <xsl:apply-templates select="@*" />
 <xsl:apply-templates select="child::*[1]" />
 <xsl:apply-templates select="child::*[2]"
 mode="log" />
 </xsl:copy>
</xsl:template>

-_-_-

<..msub of log ..>+

<xsl:template match="*" mode="log" >
 <xsl:copy>
 <xsl:apply-templates select="@*" />
 <xsl:choose>
 <xsl:when test="parent::mrow[ @class = ’mrow-sub’ ]" >
 <BREAK SIZE="small"/>
 <xsl:apply-templates select="*" />
 <BREAK SIZE="small"/>
 
 <xsl:text>of</xsl:text>
 
 <BREAK SIZE="small"/>
 </xsl:when>
 <xsl:otherwise>
 <xsl:apply-templates
 select="*[ not(@title = ’speech-extra’) ]"
 mode="log" />
 </xsl:otherwise>
 </xsl:choose>
 </xsl:copy>
</xsl:template>

-_-_-

7.5 Logarithms