sgl_fmpy
return(sgl_fmpy(&fpregs[r1],
if (sgl_fmpy(&fpregs[rm1],&fpregs[rm2],&mtmp.ints.i1,
if (sgl_fmpy(&fpregs[rm1],&fpregs[rm2],&mtmp.ints.i1,
if (sgl_fmpy(&fpregs[rm1],&fpregs[rm2],&mtmp.ints.i1,&status))
return(sgl_fmpy(&fpregs[r1],&fpregs[r2],