60 #define Z *z  macro
71 GB_PUBLIC void complex_first  (C Z, const C X, const C Y) { Z = X ; }  in complex_first()
72 GB_PUBLIC void complex_second (C Z, const C X, const C Y) { Z = Y ; }  in complex_second()
73 GB_PUBLIC void complex_pair   (C Z, const C X, const C Y) { Z = ONE ; }  in complex_pair()
74 GB_PUBLIC void complex_plus   (C Z, const C X, const C Y) { Z = X + Y ; }  in complex_plus()
75 GB_PUBLIC void complex_minus  (C Z, const C X, const C Y) { Z = X - Y ; }  in complex_minus()
76 GB_PUBLIC void complex_rminus (C Z, const C X, const C Y) { Z = Y - X ; }  in complex_rminus()
77 GB_PUBLIC void complex_times  (C Z, const C X, const C Y) { Z = X * Y ; }  in complex_times()
78 GB_PUBLIC void complex_div    (C Z, const C X, const C Y) { Z = X / Y ; }  in complex_div()
79 GB_PUBLIC void complex_rdiv   (C Z, const C X, const C Y) { Z = Y / X ; }  in complex_rdiv()
83 void complex_min (C Z, const C X, const C Y)  in complex_min()
112 void complex_max (C Z, const C X, const C Y)  in complex_max()
148 void complex_iseq (C Z, const C X, const C Y)  in complex_iseq()
154 void complex_isne (C Z, const C X, const C Y)  in complex_isne()
161 void complex_isgt (C Z, const C X, const C Y)  in complex_isgt()
167 void complex_islt (C Z, const C X, const C Y)  in complex_islt()
172 void complex_isge (C Z, const C X, const C Y)  in complex_isge()
177 void complex_isle (C Z, const C X, const C Y)  in complex_isle()
187 void complex_or (C Z, const C X, const C Y)  in complex_or()
193 void complex_and (C Z, const C X, const C Y)  in complex_and()
199 void complex_xor (C Z, const C X, const C Y)  in complex_xor()
212 void complex_eq (bool Z, const C X, const C Y)  in complex_eq()
218 void complex_ne (bool Z, const C X, const C Y)  in complex_ne()
225 void complex_gt (bool Z, const C X, const C Y)  in complex_gt()
231 void complex_lt (bool Z, const C X, const C Y)  in complex_lt()
237 void complex_ge (bool Z, const C X, const C Y)  in complex_ge()
243 void complex_le (bool Z, const C X, const C Y)  in complex_le()
254 void complex_complex (C Z, const double X, const double Y)  in complex_complex()
266 void complex_one      (C Z, const C X) { Z =      ONE ; }  in complex_one()
268 void complex_identity (C Z, const C X) { Z =       X  ; }  in complex_identity()
270 void complex_ainv     (C Z, const C X) { Z =      -X  ; }  in complex_ainv()
272 void complex_minv     (C Z, const C X) { Z =  1. / X  ; }  in complex_minv()
274 void complex_conj     (C Z, const C X) { Z = conj (X) ; }  in complex_conj()
278 void complex_abs      (C Z, const C X) { Z = GxB_CMPLX (cabs (X), 0) ; }  in complex_abs()
280 void complex_not      (C Z, const C X) { Z = BOOL (X) ? F : T ; }  in complex_not()
288 void complex_real  (double Z, const C X) { Z = creal (X) ; }  in complex_real()
290 void complex_imag  (double Z, const C X) { Z = cimag (X) ; }  in complex_imag()
292 void complex_cabs  (double Z, const C X) { Z = cabs  (X) ; }  in complex_cabs()
294 void complex_angle (double Z, const C X) { Z = carg  (X) ; }  in complex_angle()
302 void complex_complex_real (C Z, const double X) { Z = GxB_CMPLX (X, 0) ; }  in complex_complex_real()
304 void complex_complex_imag (C Z, const double X) { Z = GxB_CMPLX (0, X) ; }  in complex_complex_imag()