]> matita.cs.unibo.it Git - helm.git/blob - helm/style/contentlib.xsl
basic notations for arithmetics
[helm.git] / helm / style / contentlib.xsl
1 <?xml version="1.0"?>
2
3 <!-- Copyright (C) 2000, HELM Team                                     -->
4 <!--                                                                   -->
5 <!-- This file is part of HELM, an Hypertextual, Electronic            -->
6 <!-- Library of Mathematics, developed at the Computer Science         -->
7 <!-- Department, University of Bologna, Italy.                         -->
8 <!--                                                                   -->
9 <!-- HELM is free software; you can redistribute it and/or             -->
10 <!-- modify it under the terms of the GNU General Public License       -->
11 <!-- as published by the Free Software Foundation; either version 2    -->
12 <!-- of the License, or (at your option) any later version.            -->
13 <!--                                                                   -->
14 <!-- HELM is distributed in the hope that it will be useful,           -->
15 <!-- but WITHOUT ANY WARRANTY; without even the implied warranty of    -->
16 <!-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the     -->
17 <!-- GNU General Public License for more details.                      -->
18 <!--                                                                   -->
19 <!-- You should have received a copy of the GNU General Public License -->
20 <!-- along with HELM; if not, write to the Free Software               -->
21 <!-- Foundation, Inc., 59 Temple Place - Suite 330, Boston,            -->
22 <!-- MA  02111-1307, USA.                                              -->
23 <!--                                                                   -->
24 <!-- For details, see the HELM World-Wide-Web page,                    -->
25 <!-- http://cs.unibo.it/helm/.                                         -->
26
27 <!--******************************************************************--> 
28 <!-- Library for MML Content                                          -->
29 <!-- First draft: March 20 2001, Ferruccio Guidi                      -->
30 <!--******************************************************************-->
31
32 <xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
33                               xmlns:m="http://www.w3.org/1998/Math/MathML"
34                               xmlns:helm="http://www.cs.unibo.it/helm"
35                               xmlns:xlink="http://www.w3.org/1999/xlink">
36
37 <xsl:template name="mk-mml-infix"> <!-- make MML node for infix operator --> 
38    <xsl:param name="c-tag"/>       <!-- CIC    tag -->
39    <xsl:param name="m-tag"/>       <!-- MathML tag -->
40    <xsl:choose>
41       <xsl:when test="count(child::*) = 3">
42          <m:apply helm:xref="{@id}">
43             <xsl:element name="{concat('m:',$m-tag)}">
44                <xsl:attribute name="definitionURL">
45                   <xsl:value-of select="$c-tag/@uri"/> 
46                </xsl:attribute>
47                <xsl:attribute name="helm:xref">
48                   <xsl:value-of select="$c-tag/@id"/>
49                </xsl:attribute>
50             </xsl:element>
51             <xsl:apply-templates select="*[2]" mode="noannot"/>
52             <xsl:apply-templates select="*[3]" mode="noannot"/>
53          </m:apply>
54       </xsl:when>
55       <xsl:otherwise>
56          <xsl:apply-imports/>
57       </xsl:otherwise>
58    </xsl:choose>
59 </xsl:template>
60
61 </xsl:stylesheet>