| ilovesoup | c9fef1d | 2012-07-08 19:30:42 +0000 | [diff] [blame] | 1 | drop dataverse test if exists; |
| 2 | create dataverse test; |
| 3 | use dataverse test; |
| 4 | |
| 5 | write output to nc1:"rttest/numeric_abs3.adm"; |
| 6 | |
| 7 | |
| 8 | let $c0 := double("-20.1") |
| 9 | let $c1 := double("-20.56e-30") |
| 10 | let $c2 := double("NaN") |
| 11 | let $c3 := double("INF") |
| 12 | let $c4 := double("-INF") |
| 13 | let $c5 := double("-0.0") |
| 14 | let $c6 := double("0.0") |
| jarodwen | f5cd0a7 | 2013-03-17 02:08:33 +0000 | [diff] [blame] | 15 | let $c7 := double("-6223372036854775807.89239") |
| ilovesoup | c9fef1d | 2012-07-08 19:30:42 +0000 | [diff] [blame] | 16 | return {"d0": numeric-abs($c0), "d1": numeric-abs($c1),"d2": numeric-abs($c2), |
| jarodwen | f5cd0a7 | 2013-03-17 02:08:33 +0000 | [diff] [blame] | 17 | "d3": numeric-abs($c3),"d4": numeric-abs($c4),"d5": numeric-abs($c5), "d6": numeric-abs($c6), "d7": numeric-abs($c7)} |