Searched refs:__CPLX32_T (Results 1 – 11 of 11) sorted by relevance
/dports/math/libpgmath/flang-d07daf3/runtime/flang/ |
H A D | red_sum.c | 92 CSUMFN(sum_cplx32, __CPLX32_T, __REAL16_T) 103 CSUMFNLKN(sum_cplx32, __CPLX32_T, __REAL16_T, 1) 114 CSUMFNLKN(sum_cplx32, __CPLX32_T, __REAL16_T, 2) 125 CSUMFNLKN(sum_cplx32, __CPLX32_T, __REAL16_T, 4) 136 CSUMFNLKN(sum_cplx32, __CPLX32_T, __REAL16_T, 8)
|
H A D | const.c | 62 sizeof(__CPLX32_T), /* F complex*32 (2x real*16) */ 280 static __CPLX32_T unit_cplx32 = {1.0, 0.0}; 335 static __CPLX32_T __fort_true_cplx32; 390 static __CPLX32_T __fort_mask_cplx32;
|
H A D | gathscat.c | 138 local_scatter_CPLX32(int n, __CPLX32_T *dst, int *sv, __CPLX32_T *src) in local_scatter_CPLX32() 297 local_gathscat_CPLX32(int n, __CPLX32_T *dst, int *sv, __CPLX32_T *src, int *gv) in local_gathscat_CPLX32()
|
H A D | fortDt.h | 174 } __CPLX32_T; /* 30 __CPLX32 complex*32 */ typedef 230 typedef __CPLX32_T __DCPLX_T;
|
H A D | gather.c | 128 local_gather_CPLX32(int n, __CPLX32_T *dst, __CPLX32_T *src, int *gv) in local_gather_CPLX32()
|
H A D | assign.c | 115 PP_REAL16(item + (sizeof(__CPLX32_T) >> 1)) = in __fortio_assign() 118 PP_REAL16(item + (sizeof(__CPLX32_T) >> 1)) = 0; in __fortio_assign() 176 PP_REAL16(item + (sizeof(__CPLX32_T) >> 1)) = 0; in __fortio_assign()
|
H A D | scalar_copy.c | 169 copy_cplx32(__CPLX32_T *rp, __CPLX32_T *sp, int size) in copy_cplx32()
|
H A D | dbug.c | 91 fprintf(__io_stderr(), "(%lg,%lg)", ((__CPLX32_T *)adr)->r, in __fort_print_scalar() 92 ((__CPLX32_T *)adr)->i); in __fort_print_scalar() 506 __CPLX32_T *c32; in I8()
|
H A D | red.c | 815 ((__CPLX32_T *)rb)[i] = *(__CPLX32_T *)zb; in I8() 1008 ((__CPLX32_T *)rb)[i] = *(__CPLX32_T *)zb; in I8() 1199 ((__CPLX32_T *)rb)[i] = *(__CPLX32_T *)zb; in I8()
|
H A D | miscsup_com.c | 3480 return ((__CPLX32_T *)a)->r; 3518 return ((__CPLX32_T *)a)->r; 3556 return ((__CPLX32_T *)a)->r; 3594 return ((__CPLX32_T *)a)->r; 3632 return ((__CPLX32_T *)a)->r;
|
H A D | type.c | 1601 sizeof(__CPLX32_T), 0, 0, 0, 0,
|