LIB "tst.lib";
tst_init();

ring r;
map f=r,0;
f[3]=x;
f;

tst_status(1);$