LIB "tst.lib"; tst_init();
  list L=1,2;
  insert(L,4,2);
  insert(L,4);
tst_status(1);$