X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Fstyle%2Fmml2mmlv1_0.xsl;h=c4210dd3cafca81099317ab9e65a6d75f2fbf5af;hb=d7f8a683aebae3ec4932296659185f97b5882c23;hp=67e1accfbe2189c9776317d4566a483c1c3a6311;hpb=aa87f28d3a96456e7cec9493c6533e5c146812e8;p=helm.git

diff --git a/helm/style/mml2mmlv1_0.xsl b/helm/style/mml2mmlv1_0.xsl
index 67e1accfb..c4210dd3c 100644
--- a/helm/style/mml2mmlv1_0.xsl
+++ b/helm/style/mml2mmlv1_0.xsl
@@ -20,6 +20,17 @@
 <!--  Added the declaration of the xlink namespace          --> 
 <!-- ====================================================== -->
 
+<!-- ====================================================== -->
+<!--  June, 2000 - HELM group:                              -->
+<!--  Added auxiliary function to insert:                    -->
+<!--  1) backwards pointers: helm:xref                      -->
+<!--  2) references to definitions: xlink:href              -->
+<!--  Added call-templates to the functions:                -->
+<!--  insert_xref, insert, insert1, insert2                 -->
+<!-- ====================================================== -->
+
+
+<!-- HELM: namespace helm added -->
 <xsl:stylesheet id="mml2mml"
                 version="1.0"
                 xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
@@ -67,7 +78,7 @@
 <xsl:variable name="NEG_PREC" select="13"/>
 <xsl:variable name="FUNCTION_PREC" select="99"/>
 
-<!-- AUXILIARY FUNCTIONS FOR BACKWARD POINTERS AND REFS (by andrea) -->
+<!-- HELM: auxiliary functions for backwards pointers and refs -->
 
 <xsl:template name = "insert_xref">
  <xsl:if test="@helm:xref">
@@ -90,7 +101,7 @@
  </xsl:if>
 </xsl:template>
 
-<!-- for use inside m:apply -->
+<!-- HELM: for use inside m:apply -->
 <xsl:template name = "insert1">
  <xsl:if test="*[1]/@definitionURL">
   <xsl:attribute name="xlink:href">
@@ -104,7 +115,7 @@
  </xsl:if>
 </xsl:template>
 
-<!-- For use inside "for-each" -->
+<!-- HELM: for use inside "for-each" -->
 <xsl:template name = "insert2">
  <xsl:if test="../*[1]/@definitionURL">
   <xsl:attribute name="xlink:href">
@@ -222,10 +233,15 @@
 
 <!-- BASIC ELEMENTS -->
 
+<!-- HELM: cn could not contain MAthMl presentation -->
 <xsl:template match = "m:cn">
   <xsl:param name="IN_PREC" select="$NO_PREC"/>
   <xsl:param name="PAREN" select="$PAR_NO"/>
   <xsl:param name="PAR_NO_IGNORE" select="$YES"/>
+<!-- HELM: added -->
+<xsl:choose>
+  <xsl:when test="child::text()">
+<!-- HELM -->
   <xsl:choose>
     <xsl:when test=". &lt; 0 and $IN_PREC &gt; 0 and $PAREN=$PAR_NO and $PAR_NO_IGNORE=$NO">
       <m:mfenced separators="">
@@ -236,6 +252,13 @@
       <xsl:apply-templates select="." mode="cn"/>
     </xsl:otherwise>
   </xsl:choose>
+<!-- HELM: added -->
+</xsl:when>
+  <xsl:otherwise>
+   <xsl:copy-of select="*"/> 
+  </xsl:otherwise>
+ </xsl:choose>
+<!-- HELM -->
 </xsl:template>
 
 <xsl:template match = "m:cn" mode="cn">
@@ -332,22 +355,40 @@
       <m:mi fontweight="bold"> <xsl:apply-templates mode = "semantics"/> </m:mi>
     </xsl:when>
     <xsl:otherwise>
+<!-- HELM: ci could not contain MathML presentation 
      <m:mi> 
       <xsl:call-template name="insert"/>
       <xsl:apply-templates mode = "semantics"/> 
      </m:mi>
+-->
+ <xsl:choose>
+  <!-- HELM: or the opposite test <xsl:when test="*[1]"> -->
+  <xsl:when test="child::text()">
+   <m:mi> 
+    <xsl:call-template name="insert"/>
+    <xsl:apply-templates mode = "semantics"/> 
+   </m:mi>
+  </xsl:when>
+  <xsl:otherwise>
+   <m:mrow>
+    <xsl:call-template name="insert"/>
+    <xsl:copy-of select="*"/>
+   </m:mrow>
+  </xsl:otherwise>
+ </xsl:choose>
     </xsl:otherwise>
   </xsl:choose>
 </xsl:template>
 
+
 <xsl:template match = "m:csymbol">
-  <xsl:choose>
+   <xsl:choose>
     <xsl:when test="*[1]">
-      <xsl:copy-of select = "*"/>
+     <xsl:copy-of select = "*"/>
     </xsl:when>
-    <xsl:otherwise>
-      <m:mo> <xsl:apply-templates mode = "semantics"/> </m:mo>
-    </xsl:otherwise>
+   <xsl:otherwise>
+    <m:mo> <xsl:apply-templates mode = "semantics"/> </m:mo>
+   </xsl:otherwise>
   </xsl:choose>
 </xsl:template>
 
@@ -408,7 +449,7 @@
  </m:mrow>
 </xsl:template>
 
-<!-- These "semantical" Transformations are REALLY questionable.
+<!-- HELM: these "semantical" Transformations are REALLY questionable.
      Andrea -->
 
 <xsl:template match = "m:apply[*[1][self::m:inverse]]">
@@ -903,7 +944,7 @@
   </xsl:apply-templates>
   <xsl:if test="*[3]">
     <xsl:for-each select = "*[position()>2]">
-<!-- MODIFICA PROVVISORIA -->
+<!-- HELM: to distinguish between * and the application -->
 <!--      <m:mo><xsl:call-template name="insert2"/>
                 <mchar name="InvisibleTimes"/> </m:mo> -->
       <m:mo><xsl:call-template name="insert2"/>*</m:mo>
@@ -916,10 +957,10 @@
   </xsl:if>
 </xsl:template>
 
-<!-- COMMENTO : dove metto la uri della definizione di radice ???? -->
 
 <xsl:template match = "m:apply[m:root[1]]">
   <m:msqrt>
+    <xsl:call-template name="insert1"/>
     <xsl:call-template name="insert_xref"/>
     <xsl:if test="*[2]=m:degree">
       <xsl:apply-templates select="*[3]" mode = "semantics"/>
@@ -1117,7 +1158,10 @@
 <xsl:template match = "m:apply[m:not[1]]">
   <m:mrow>
     <xsl:call-template name="insert_xref"/>
+<!-- CSC, per estetica!
     <m:mo><xsl:call-template name="insert1"/>not</m:mo>
+-->
+    <m:mo><xsl:call-template name="insert1"/><m:mchar name="not"/></m:mo>
     <xsl:apply-templates select = "*[2]" mode = "semantics">
       <xsl:with-param name="IN_PREC" select="$FUNCTION_PREC"/>
     </xsl:apply-templates>
@@ -1955,3 +1999,19 @@
 </xsl:template>
 
 </xsl:stylesheet>
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+