lsub
lop = lsub(lzero, lop);
rop = lsub(lzero, rop);
tmp = lsub(div, rop);
exp = lsub(exp, lone);
extern dl_t lsub(dl_t, dl_t);