45 #define bli_ssgets( x, yr, yi )  { (yr) = bli_sreal(x); (yi) = bli_simag(x); }  argument
46 #define bli_dsgets( x, yr, yi )  { (yr) = bli_dreal(x); (yi) = bli_dimag(x); }  argument
47 #define bli_csgets( x, yr, yi )  { (yr) = bli_creal(x); (yi) = bli_cimag(x); }  argument
48 #define bli_zsgets( x, yr, yi )  { (yr) = bli_zreal(x); (yi) = bli_zimag(x); }  argument
49 #define bli_isgets( x, yr, yi )  { (yr) = ( float )(x); (yi) = 0.0F; }  argument
51 #define bli_sdgets( x, yr, yi )  { (yr) = bli_sreal(x); (yi) = bli_simag(x); }  argument
52 #define bli_ddgets( x, yr, yi )  { (yr) = bli_dreal(x); (yi) = bli_dimag(x); }  argument
53 #define bli_cdgets( x, yr, yi )  { (yr) = bli_creal(x); (yi) = bli_cimag(x); }  argument
54 #define bli_zdgets( x, yr, yi )  { (yr) = bli_zreal(x); (yi) = bli_zimag(x); }  argument
55 #define bli_idgets( x, yr, yi )  { (yr) = ( double )(x); (yi) = 0.0; }  argument
57 #define bli_scgets( x, yr, yi )  { (yr) = bli_sreal(x); (yi) = bli_simag(x); }  argument
58 #define bli_dcgets( x, yr, yi )  { (yr) = bli_dreal(x); (yi) = bli_dimag(x); }  argument
59 #define bli_ccgets( x, yr, yi )  { (yr) = bli_creal(x); (yi) = bli_cimag(x); }  argument
60 #define bli_zcgets( x, yr, yi )  { (yr) = bli_zreal(x); (yi) = bli_zimag(x); }  argument
61 #define bli_icgets( x, yr, yi )  { (yr) = ( float )(x); (yi) = 0.0F; }  argument
63 #define bli_szgets( x, yr, yi )  { (yr) = bli_sreal(x); (yi) = bli_simag(x); }  argument
64 #define bli_dzgets( x, yr, yi )  { (yr) = bli_dreal(x); (yi) = bli_dimag(x); }  argument
65 #define bli_czgets( x, yr, yi )  { (yr) = bli_creal(x); (yi) = bli_cimag(x); }  argument
66 #define bli_zzgets( x, yr, yi )  { (yr) = bli_zreal(x); (yi) = bli_zimag(x); }  argument
67 #define bli_izgets( x, yr, yi )  { (yr) = ( double )(x); (yi) = 0.0; }  argument
69 #define bli_sigets( x, yr, yi )  { (yr) = bli_sreal(x); (yi) = 0; }  argument
70 #define bli_digets( x, yr, yi )  { (yr) = bli_dreal(x); (yi) = 0; }  argument
71 #define bli_cigets( x, yr, yi )  { (yr) = bli_creal(x); (yi) = 0; }  argument
72 #define bli_zigets( x, yr, yi )  { (yr) = bli_zreal(x); (yi) = 0; }  argument
73 #define bli_iigets( x, yr, yi )  { (yr) =          (x); (yi) = 0; }  argument
76 #define bli_sgets( x, yr, yi )  bli_ssgets( x, yr, yi )  argument
77 #define bli_dgets( x, yr, yi )  bli_ddgets( x, yr, yi )  argument
78 #define bli_cgets( x, yr, yi )  bli_csgets( x, yr, yi )  argument
79 #define bli_zgets( x, yr, yi )  bli_zdgets( x, yr, yi )  argument
80 #define bli_igets( x, yr, yi )  bli_idgets( x, yr, yi )  argument