/dports/math/libpgmath/flang-d07daf3/runtime/flang/ |
H A D | mmulint1.c | 45 __INT_T s1_d1_soffset = 0; in ENTF90() local 136 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 186 s1_d1_offset = s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90() 206 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 213 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 221 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90()
|
H A D | mmulint2.c | 45 __INT_T s1_d1_soffset = 0; in ENTF90() local 136 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 186 s1_d1_offset = s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90() 206 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 213 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 221 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90()
|
H A D | mmulint4.c | 45 __INT_T s1_d1_soffset = 0; in ENTF90() local 136 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 186 s1_d1_offset = s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90() 206 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 213 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 220 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90()
|
H A D | mmulint8.c | 45 __INT_T s1_d1_soffset = 0; in ENTF90() local 136 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 186 s1_d1_offset = s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90() 206 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 213 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 220 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90()
|
H A D | mmulreal4.c | 45 __INT_T s1_d1_soffset = 0; in ENTF90() local 136 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 186 s1_d1_offset = s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90() 207 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 215 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 222 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90()
|
H A D | mmulreal8.c | 45 __INT_T s1_d1_soffset = 0; in ENTF90() local 136 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 186 s1_d1_offset = s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90() 207 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 215 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 222 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90()
|
H A D | mmulcplx16.c | 45 __INT_T s1_d1_soffset = 0; in ENTF90() local 136 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 187 s1_d1_offset = s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90() 208 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 215 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 223 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90()
|
H A D | mmulcplx8.c | 45 __INT_T s1_d1_soffset = 0; in ENTF90() local 136 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 187 s1_d1_offset = s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90() 208 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 215 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 223 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90()
|
H A D | mmulreal8_t.c | 45 __INT_T s1_d1_soffset = 0; in ENTF90() local 114 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 168 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 207 s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90()
|
H A D | mmulreal4_t.c | 45 __INT_T s1_d1_soffset = 0; in ENTF90() local 114 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 168 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 207 s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90()
|
H A D | mmulcplx16_t.c | 45 __INT_T s1_d1_soffset = 0; in ENTF90() local 114 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 168 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 207 s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90()
|
H A D | mmulcplx8_t.c | 45 __INT_T s1_d1_soffset = 0; in ENTF90() local 114 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 168 s1_base + s1_d1_soffset * s1_d1_lstride, in ENTF90() 207 s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90()
|
H A D | mmullog2.c | 40 __INT_T s1_d1_soffset = 0; in ENTF90() local 131 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 182 s1_d1_offset = s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90()
|
H A D | mmullog4.c | 40 __INT_T s1_d1_soffset = 0; in ENTF90() local 131 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 182 s1_d1_offset = s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90()
|
H A D | mmullog8.c | 40 __INT_T s1_d1_soffset = 0; in ENTF90() local 131 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 182 s1_d1_offset = s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90()
|
H A D | mmullog1.c | 40 __INT_T s1_d1_soffset = 0; in ENTF90() local 131 s1_d1_soffset = F90_DIM_SOFFSET_G(s1_desc, 0) + s1_d1_sstride - s1_d1_lb; in ENTF90() 182 s1_d1_offset = s1_d1_base = s1_d1_soffset * s1_d1_lstride; in ENTF90()
|