RCOMPLEX         1425 rational.c     	if (k_exact_p(RCOMPLEX(a1)->imag) && f_zero_p(RCOMPLEX(a1)->imag))
RCOMPLEX         1426 rational.c     	    a1 = RCOMPLEX(a1)->real;
RCOMPLEX         1431 rational.c     	if (k_exact_p(RCOMPLEX(a2)->imag) && f_zero_p(RCOMPLEX(a2)->imag))
RCOMPLEX         1432 rational.c     	    a2 = RCOMPLEX(a2)->real;