LIB "tst.lib"; tst_init();
LIB "general.lib";
ring r1 = 0,x,dp;
absValue(-2002);
poly f=-4;
absValue(f);
tst_status(1);$