Cross Reference: /xsrc/external/mit/xedit/dist/lisp/mathimp.c

Lines Matching +defs:re +defs:comp
3563 nadd_re_cx(n_number *num, LispObj *comp)
3569     add_real_object(NREAL(num), OCXR(comp));
3572     set_real_object(NIMAG(num), OCXI(comp));
3580 nsub_re_cx(n_number *num, LispObj *comp)
3586     sub_real_object(NREAL(num), OCXR(comp));
3591     mul_real_object(NIMAG(num), OCXI(comp));
3599 nmul_re_cx(n_number *num, LispObj *comp)
3608     mul_real_object(NREAL(num), OCXR(comp));
3611     mul_real_object(NIMAG(num), OCXI(comp));
3619 ndiv_re_cx(n_number *num, LispObj *comp)
3629     set_real_object(&div, OCXR(comp));
3630     mul_real_object(&div, OCXR(comp));
3633     set_real_object(&temp, OCXI(comp));
3634     mul_real_object(&temp, OCXI(comp));
3643     mul_real_object(NIMAG(num), OCXI(comp));
3647     mul_real_object(NREAL(num), OCXR(comp));
3663 nadd_cx_re(n_number *num, LispObj *re)
3668     add_real_object(NREAL(num), re);
3674 nsub_cx_re(n_number *num, LispObj *re)
3679     sub_real_object(NREAL(num), re);
3685 nmul_cx_re(n_number *num, LispObj *re)
3690     mul_real_object(NREAL(num), re);
3691     mul_real_object(NIMAG(num), re);
3697 ndiv_cx_re(n_number *num, LispObj *re)
3702     div_real_object(NREAL(num), re);
3703     div_real_object(NIMAG(num), re);
3713 nadd_cx_cx(n_number *num, LispObj *comp)
3718     add_real_object(NREAL(num), OCXR(comp));
3719     add_real_object(NIMAG(num), OCXI(comp));
3725 nsub_cx_cx(n_number *num, LispObj *comp)
3730     sub_real_object(NREAL(num), OCXR(comp));
3731     sub_real_object(NIMAG(num), OCXI(comp));
3737 nmul_cx_cx(n_number *num, LispObj *comp)
3745     mul_real_object(&IaIb, OCXI(comp));
3748     mul_real_object(&RaIb, OCXI(comp));
3751     mul_real_object(NREAL(num), OCXR(comp));
3756     mul_real_object(NIMAG(num), OCXR(comp));
3764 ndiv_cx_cx(n_number *num, LispObj *comp)
3775     mul_real_object(&temp1, OCXI(comp));
3779     mul_real_object(&temp2, OCXI(comp));
3782     mul_real_object(NREAL(num), OCXR(comp));
3787     mul_real_object(NIMAG(num), OCXR(comp));
3793     set_real_object(&temp1, OCXR(comp));
3794     mul_real_object(&temp1, OCXR(comp));
3797     set_real_object(&temp2, OCXI(comp));
3798     mul_real_object(&temp2, OCXI(comp));