safe_mul          781 complex.c      	real = f_sub(safe_mul(areal, breal, arzero, brzero),
safe_mul          782 complex.c      		     safe_mul(aimag, bimag, aizero, bizero));
safe_mul          783 complex.c      	imag = f_add(safe_mul(areal, bimag, arzero, bizero),
safe_mul          784 complex.c      		     safe_mul(aimag, breal, aizero, brzero));