Degree

<..remove scrip indicators from degree ..>

<xsl:template match="mrow[
    (@class = ’mrow-super’)
   and
     parent::msup
   and
     (count( <.math content element .> ) = 1)
   and
     <.math content element .> [1][
        normalize-space(.)
        =
        normalize-space(
           descendant::span[@class = ’ch 2218’]
        )
     ]
]" >
   <xsl:copy>
     <xsl:apply-templates select="@*" />
     <xsl:apply-templates
           select="*[not(@title = ’speech-extra’)
                     and
                     not(self::BREAK)
                    ]"
                            mode="degree" />
     <BREAK SIZE="small"/>
   </xsl:copy>
</xsl:template>

-_-_-

<..remove scrip indicators from degree ..>+

<xsl:template match="*" mode="degree" >
   <xsl:copy>
     <xsl:apply-templates select="@*" />
     <xsl:choose>
        <xsl:when test="self::span[ @class=’ch 2218’ ]" >
          <xsl:text>degree</xsl:text>
        </xsl:when>
        <xsl:otherwise>
          <xsl:apply-templates
                 select="*[not(self::BREAK)]|text()"
                 mode="degree"/>
        </xsl:otherwise>
     </xsl:choose>
    </xsl:copy>
</xsl:template>

-_-_-

7.4 Degree