dbl_frnd
int dbl_frnd(dbl_floating_point *, dbl_floating_point *, unsigned int *);
return(dbl_frnd(&fpregs[r1],