sgl_fsub
return(sgl_fsub(&fpregs[r1],&fpregs[r2],
if (sgl_fsub(&fpregs[ta], &fpregs[ra], &atmp.ints.i1,&status))