tests/expr/math/math-3303a.xsl
author Michael Kay <mike@saxonica.com>
Mon, 11 Jan 2016 11:27:29 +0000
changeset 1198 aacf3d6d8681
child 1211 226a4c4600fb
permissions -rw-r--r--
Variants of some math tests to force runtime evaluation
<?xml version="1.0" encoding="ISO-8859-1"?>
<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="2.0">
<?spec fo#func-round-half-to-even?>
<!-- PURPOSE:  Test of round-half-to-even on doubles. -->
    <!-- Variant forcing runtime evaluation -->
    
    <xsl:param name="p" select="1"/>

<xsl:template match="doc">
<out>;
    <a b="{round-half-to-even($p*120.0e0)}" c="{round-half-to-even($p*0.0e0)}" d="{round-half-to-even($p*-3.0e0)}"/>;
    <a b="{round-half-to-even($p*120.0e0, 2)}" c="{round-half-to-even($p*0.0e0, 2)}" d="{round-half-to-even($p*-3.0e0, 2)}"/>;
    <a b="{round-half-to-even($p*120.0e0, -2)}" c="{round-half-to-even($p*0.0e0, -2)}" d="{round-half-to-even($p*-3.0e0, -2)}"/>;
    <a b="{round-half-to-even($p*180.0e0, -2)}" c="{round-half-to-even($p*150.0e0, -2)}" d="{round-half-to-even($p*250.0e0, -2)}"/>;
    <a b="{round-half-to-even($p*-120.0e0, -2)}" c="{round-half-to-even($p*-150.0e0, -2)}" d="{round-half-to-even($p*-250.0e0, -2)}"/>;
    <a b="{round-half-to-even($p*180.0180e0, 2)}" c="{round-half-to-even($p*150.0150e0, 2)}" d="{round-half-to-even($p*250.0250e0, 2)}"/>;
    <a b="{round-half-to-even($p*-120.0120e0, 2)}" c="{round-half-to-even($p*-150.0150e0, 2)}" d="{round-half-to-even($p*-250.0250e0, 2)}"/>;
</out>
</xsl:template>
</xsl:stylesheet>