blob: cbbcd106b6f3df3c70b2aa0d43a827953d7fd9f2 [file] [log] [blame]
ilovesoupc9fef1d2012-07-08 19:30:42 +00001drop dataverse test if exists;
2create dataverse test;
3use dataverse test;
4
5write output to nc1:"rttest/numeric_round-half-to-even23.adm";
6
7
8let $c0 := double("0.555")
9let $c1 := double("0.322")
10let $c2 := double("NaN")
11let $c3 := double("INF")
12let $c4 := double("-INF")
13let $c5 := double("-0.0")
14let $c6 := double("0.0")
15return {"d0": numeric-round-half-to-even2($c0,2), "d1": numeric-round-half-to-even2($c1,2),"d2": numeric-round-half-to-even2($c2,3),
16 "d3": numeric-round-half-to-even2($c3,4),"d4": numeric-round-half-to-even2($c4,5),"d5": numeric-round-half-to-even2($c5,6), "d6": numeric-round-half-to-even2($c6,0)}