]> matita.cs.unibo.it Git - helm.git/blob - helm/on-line/xslt/search.xsl
ocaml 3.09 transition
[helm.git] / helm / on-line / xslt / search.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 <xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
28                               xmlns:m="http://www.w3.org/1998/Math/MathML"
29                               xmlns:helm="http://www.cs.unibo.it/helm"
30                               xmlns:xlink="http://www.w3.org/1999/xlink">
31
32 <!--***********************************************************************--> 
33 <!-- From MathML presentation or HTML to themselves with links             -->
34 <!-- HELM Group: Asperti, Padovani, Sacerdoti, Schena                      -->
35 <!-- First draft: March 16 2001, Andrea Asperti                            -->
36 <!--***********************************************************************--> 
37
38 <xsl:param name="action" select="''"/>
39 <xsl:param name="expression" select="''"/>
40 <xsl:param name="advanced" select="no"/>
41 <xsl:param name="choices" select="''"/>
42 <xsl:param name="interp" select="''"/>
43 <xsl:param name="constraints" select="''"/>
44 <xsl:param name="searchengineURL" select="''"/>
45 <xsl:param name="url" select="''"/>
46
47 <xsl:include href="links_library.xsl"/>
48
49 <xsl:variable name="quoted_expression">
50  <xsl:call-template name="quote">
51   <xsl:with-param name="s" select="$expression"/>
52  </xsl:call-template>
53 </xsl:variable>
54
55 <xsl:variable name="quoted_url">
56  <xsl:call-template name="quote">
57   <xsl:with-param name="s" select="$url"/>
58  </xsl:call-template>
59 </xsl:variable>
60
61 <xsl:variable name="quoted_choices">
62  <xsl:call-template name="quote">
63   <xsl:with-param name="s" select="$choices"/>
64  </xsl:call-template>
65 </xsl:variable>
66
67 <xsl:variable name="quoted_constraints">
68  <xsl:call-template name="quote">
69   <xsl:with-param name="s" select="$constraints"/>
70  </xsl:call-template>
71 </xsl:variable>
72
73 <xsl:variable name="param_constraints">
74  <xsl:choose>
75   <xsl:when test="$constraints=''">
76    <xsl:value-of select="''"/>
77   </xsl:when>
78   <xsl:otherwise>
79    <xsl:value-of select="concat('&amp;constraints=',$quoted_constraints)"/>
80   </xsl:otherwise>
81  </xsl:choose>
82 </xsl:variable>
83
84 <xsl:template match="/">
85  <xsl:copy-of select="document(concat($searchengineURL,$action,'?expression=',$quoted_expression,'&amp;advanced=',$advanced,'&amp;choices=',$quoted_choices,'&amp;interpretation_choices=',$interp,$param_constraints,'&amp;url=',$quoted_url,'&amp;preprocess=true'))"/> 
86 </xsl:template>
87
88 </xsl:stylesheet>