| drop dataverse test if exists; | |
| create dataverse test; | |
| use dataverse test; | |
| write output to nc1:"rttest/numeric_abs2.adm"; | |
| let $c0 := float("-20.1") | |
| let $c1 := float("-20.56e-30") | |
| let $c2 := float("NaN") | |
| let $c3 := float("INF") | |
| let $c4 := float("-INF") | |
| let $c5 := float("-0.0") | |
| let $c6 := float("0.0") | |
| return {"f0": numeric-abs($c0), "f1": numeric-abs($c1),"f2": numeric-abs($c2), | |
| "f3": numeric-abs($c3),"f4": numeric-abs($c4),"f5": numeric-abs($c5), "f6": numeric-abs($c6)} |