LIB "tst.lib"; tst_init();
LIB "poly.lib";
ring r = 0,x, dp;
number n = 3/2;
denominator(n);
tst_status(1);$