+++ /dev/null
-<?xml version="1.0"?>
-
-<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">
-
-<xsl:template match="APPLY[CONST/@uri='cic:/Coq/ring/Ring_abstract/abstract_rings/apolynomial_normalize_ok.con']" mode="pure">
- <xsl:choose>
- <xsl:when test="count(child::*) > 1">
- <m:apply helm:xref="{@id}">
- <m:csymbol>app</m:csymbol>
- <xsl:apply-templates mode="noannot" select="*[1]"/>
- <m:ci>...</m:ci>
- </m:apply>
- </xsl:when>
- <xsl:otherwise>
- <xsl:apply-imports/>
- </xsl:otherwise>
- </xsl:choose>
-</xsl:template>
-
-<xsl:template match="APPLY[CONST/@uri='cic:/Coq/ring/Ring_abstract/abstract_rings/interp_ap.con']" mode="pure">
- <xsl:choose>
- <xsl:when test="count(child::*) = 9">
- <xsl:call-template name="start-interp">
- <xsl:with-param name="rtree" select="*[9]"/>
- <xsl:with-param name="atree" select="*[8]"/>
- </xsl:call-template>
- </xsl:when>
- <xsl:otherwise>
- <xsl:apply-imports/>
- </xsl:otherwise>
- </xsl:choose>
-</xsl:template>
-
-<xsl:template match="APPLY[CONST/@uri='cic:/Coq/ring/Ring_abstract/abstract_rings/interp_sacs.con']" mode="pure">
- <xsl:choose>
- <xsl:when test="count(child::*) = 9 and *[APPLY and position()=9]
- [CONST/@uri='cic:/Coq/ring/Ring_abstract/abstract_rings/apolynomial_normalize.con']">
- <m:apply helm:xref="{@id}">
- <m:csymbol>app</m:csymbol>
- <xsl:apply-templates mode="noannot" select="*[9]/*[1]"/>
- <xsl:call-template name="start-interp">
- <xsl:with-param name="rtree" select="*[9]/*[2]"/>
- <xsl:with-param name="atree" select="*[8]"/>
- </xsl:call-template>
- </m:apply>
- </xsl:when>
- <xsl:otherwise>
- <xsl:apply-imports/>
- </xsl:otherwise>
- </xsl:choose>
-</xsl:template>
-
-<!-- ************************** abstract polinomials rendering ************************ -->
-
-<xsl:template match="APPLY[MUTCONSTRUCT[@uri='cic:/Coq/ring/Ring_abstract/abstract_rings/apolynomial.ind'
- and @noConstr='1']]" mode="interp">
- <xsl:param name="atree"/>
- <xsl:apply-templates select="*[2]" mode="interp">
- <xsl:with-param name="atree" select="$atree"/>
- </xsl:apply-templates>
-</xsl:template>
-
-<xsl:template match="APPLY[MUTCONSTRUCT[@uri='cic:/Coq/ring/Ring_abstract/abstract_rings/apolynomial.ind'
- and @noConstr='2']]" mode="interp">
- <xsl:param name="atree"/>
- <xsl:apply-templates mode="noannot" select="."/>
-</xsl:template>
-
-<xsl:template match="APPLY[MUTCONSTRUCT[@uri='cic:/Coq/ring/Ring_abstract/abstract_rings/apolynomial.ind'
- and @noConstr='3']]" mode="interp">
- <xsl:param name="atree"/>
- <xsl:apply-templates mode="noannot" select="."/>
-</xsl:template>
-
-<xsl:template match="APPLY[MUTCONSTRUCT[@uri='cic:/Coq/ring/Ring_abstract/abstract_rings/apolynomial.ind'
- and @noConstr='4']]" mode="interp">
- <xsl:param name="atree"/>
- <xsl:call-template name="mk-mml-op-interp">
- <xsl:with-param name="arity" select="2"/>
- <xsl:with-param name="c-tag" select="MUTCONSTRUCT"/>
- <xsl:with-param name="m-tag" select="'plus'"/>
- <xsl:with-param name="atree" select="$atree"/>
- </xsl:call-template>
-</xsl:template>
-
-<xsl:template match="APPLY[MUTCONSTRUCT[@uri='cic:/Coq/ring/Ring_abstract/abstract_rings/apolynomial.ind'
- and @noConstr='5']]" mode="interp">
- <xsl:param name="atree"/>
- <xsl:call-template name="mk-mml-op-interp">
- <xsl:with-param name="arity" select="2"/>
- <xsl:with-param name="c-tag" select="MUTCONSTRUCT"/>
- <xsl:with-param name="m-tag" select="'times'"/>
- <xsl:with-param name="atree" select="$atree"/>
- </xsl:call-template>
-</xsl:template>
-
-<xsl:template match="APPLY[MUTCONSTRUCT[@uri='cic:/Coq/ring/Ring_abstract/abstract_rings/apolynomial.ind'
- and @noConstr='6']]" mode="interp">
- <xsl:param name="atree"/>
- <xsl:call-template name="mk-mml-op-interp">
- <xsl:with-param name="arity" select="1"/>
- <xsl:with-param name="c-tag" select="MUTCONSTRUCT"/>
- <xsl:with-param name="m-tag" select="'minus'"/>
- <xsl:with-param name="atree" select="$atree"/>
- </xsl:call-template>
-</xsl:template>
-
-<xsl:template match="APPLY[MUTCONSTRUCT[@uri='cic:/Coq/ring/Quote/variables_map/index.ind'
- and @noConstr='1']]" mode="interp">
- <xsl:param name="atree"/>
- <xsl:apply-templates select="*[2]" mode="interp">
- <xsl:with-param name="atree" select="$atree/*[4]"/>
- </xsl:apply-templates>
-</xsl:template>
-
-<xsl:template match="APPLY[MUTCONSTRUCT[@uri='cic:/Coq/ring/Quote/variables_map/index.ind'
- and @noConstr='2']]" mode="interp">
- <xsl:param name="atree"/>
- <xsl:apply-templates select="*[2]" mode="interp">
- <xsl:with-param name="atree" select="$atree/*[5]"/>
- </xsl:apply-templates>
-</xsl:template>
-
-<xsl:template match="MUTCONSTRUCT[@uri='cic:/Coq/ring/Quote/variables_map/index.ind'
- and @noConstr='3']" mode="interp">
- <xsl:param name="atree"/>
- <xsl:apply-templates select="$atree/*[3]" mode="noannot"/>
-</xsl:template>
-
-</xsl:stylesheet>