]> matita.cs.unibo.it Git - helm.git/commitdiff
BUG LAMBDA fixed.
authorAndrea Asperti <andrea.asperti@unibo.it>
Mon, 18 Jun 2001 10:23:38 +0000 (10:23 +0000)
committerAndrea Asperti <andrea.asperti@unibo.it>
Mon, 18 Jun 2001 10:23:38 +0000 (10:23 +0000)
helm/style/content_to_html.xsl

index 71a82f613d16be524a61c0eb1c75febbf2e0945f..5a48cc1ea49933cc3b3d492a119822d5c07f8353 100644 (file)
        </xsl:otherwise>
        </xsl:choose>
       </xsl:when>
+      <xsl:when test="$name='let_in'">
+       <xsl:text>let&#x00a0;</xsl:text>
+       <xsl:apply-templates select="m:bvar/m:ci"/>
+       <xsl:text>&#x00a0;:=&#x00a0;</xsl:text>
+       <xsl:apply-templates select="*[3]">
+        <xsl:with-param name="current_indent" select="$current_indent+14"/>
+       </xsl:apply-templates>
+       <br/>
+       <xsl:call-template name="make_indent">
+        <xsl:with-param name="current_indent" select="$current_indent"/> 
+       </xsl:call-template>
+       <xsl:text>in&#x00a0;</xsl:text>
+       <xsl:apply-templates select="*[4]">
+        <xsl:with-param name="current_indent" select="$current_indent+5"/>
+       </xsl:apply-templates>
+      </xsl:when>
+
       <!-- ***************************************** -->
       <!-- *********** PROOF ELEMENTS ************** -->
       <!-- ***************************************** -->
       <!-- *********** LAMBDA ELEMENTS ************** -->
       <!-- ***************************************** -->
       <xsl:when test="$name='subst'">
-       <xsl:apply-templates select="*[2]"/>
+       <xsl:apply-templates select="*[3]"/>
        <xsl:text>[</xsl:text>
        <xsl:apply-templates select="*[4]"/>
        <a href="{*[1]/@definitionURL}">
         <xsl:text>&#x00ac;</xsl:text>
        </FONT>
        </a>
-       <xsl:apply-templates select="*[3]"/>
+       <xsl:apply-templates select="*[2]"/>
        <xsl:text>]</xsl:text>
       </xsl:when>