/dports/math/libpgmath/flang-d07daf3/runtime/flang/ |
H A D | mmulreal8_t.c | 52 __INT_T s2_d1_lstride; in ENTF90() local 124 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 154 (s1_d1_lstride == 1) && (s2_d1_lstride == 1)) { in ENTF90() 160 s2_d1_soffset * s2_d1_lstride + s2_d1_lb * s2_d1_lstride + in ENTF90() 198 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 213 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90() 214 s2_n_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90()
|
H A D | mmulreal4_t.c | 52 __INT_T s2_d1_lstride; in ENTF90() local 124 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 154 (s1_d1_lstride == 1) && (s2_d1_lstride == 1)) { in ENTF90() 160 s2_d1_soffset * s2_d1_lstride + s2_d1_lb * s2_d1_lstride + in ENTF90() 198 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 213 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90() 214 s2_n_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90()
|
H A D | mmulcplx16_t.c | 52 __INT_T s2_d1_lstride; in ENTF90() local 124 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 154 (s1_d1_lstride == 1) && (s2_d1_lstride == 1)) { in ENTF90() 160 s2_d1_soffset * s2_d1_lstride + s2_d1_lb * s2_d1_lstride + in ENTF90() 198 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 213 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90() 214 s2_n_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90()
|
H A D | mmulcplx8_t.c | 52 __INT_T s2_d1_lstride; in ENTF90() local 124 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 154 (s1_d1_lstride == 1) && (s2_d1_lstride == 1)) { in ENTF90() 160 s2_d1_soffset * s2_d1_lstride + s2_d1_lb * s2_d1_lstride + in ENTF90() 198 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 213 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90() 214 s2_n_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90()
|
H A D | mmulint1.c | 52 __INT_T s2_d1_lstride; in ENTF90() local 146 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 176 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 192 s2_d1_offset = s2_d1_base = s2_d1_soffset * s2_d1_lstride; in ENTF90() 193 s2_d1_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90() 200 (s1_d1_lstride == 1) && (s2_d1_lstride == 1)) { in ENTF90() 202 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90() 258 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90()
|
H A D | mmulint2.c | 52 __INT_T s2_d1_lstride; in ENTF90() local 146 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 176 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 192 s2_d1_offset = s2_d1_base = s2_d1_soffset * s2_d1_lstride; in ENTF90() 193 s2_d1_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90() 200 (s1_d1_lstride == 1) && (s2_d1_lstride == 1)) { in ENTF90() 202 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90() 258 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90()
|
H A D | mmulint4.c | 52 __INT_T s2_d1_lstride; in ENTF90() local 146 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 176 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 192 s2_d1_offset = s2_d1_base = s2_d1_soffset * s2_d1_lstride; in ENTF90() 193 s2_d1_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90() 200 (s1_d1_lstride == 1) && (s2_d1_lstride == 1)) { in ENTF90() 202 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90() 257 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90()
|
H A D | mmulint8.c | 52 __INT_T s2_d1_lstride; in ENTF90() local 146 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 176 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 192 s2_d1_offset = s2_d1_base = s2_d1_soffset * s2_d1_lstride; in ENTF90() 193 s2_d1_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90() 200 (s1_d1_lstride == 1) && (s2_d1_lstride == 1)) { in ENTF90() 202 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90() 257 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90()
|
H A D | mmulreal4.c | 52 __INT_T s2_d1_lstride; in ENTF90() local 146 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 176 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 192 s2_d1_offset = s2_d1_base = s2_d1_soffset * s2_d1_lstride; in ENTF90() 193 s2_d1_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90() 200 (s1_d1_lstride == 1) && (s2_d1_lstride == 1)) { in ENTF90() 203 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90() 259 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90()
|
H A D | mmulreal8.c | 52 __INT_T s2_d1_lstride; in ENTF90() local 146 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 176 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 192 s2_d1_offset = s2_d1_base = s2_d1_soffset * s2_d1_lstride; in ENTF90() 193 s2_d1_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90() 200 (s1_d1_lstride == 1) && (s2_d1_lstride == 1)) { in ENTF90() 203 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90() 259 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90()
|
H A D | mmulcplx16.c | 52 __INT_T s2_d1_lstride; in ENTF90() local 146 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 177 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 193 s2_d1_offset = s2_d1_base = s2_d1_soffset * s2_d1_lstride; in ENTF90() 194 s2_d1_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90() 201 (s1_d1_lstride == 1) && (s2_d1_lstride == 1)) { in ENTF90() 204 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90() 264 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90()
|
H A D | mmulcplx8.c | 52 __INT_T s2_d1_lstride; in ENTF90() local 146 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 177 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 193 s2_d1_offset = s2_d1_base = s2_d1_soffset * s2_d1_lstride; in ENTF90() 194 s2_d1_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90() 201 (s1_d1_lstride == 1) && (s2_d1_lstride == 1)) { in ENTF90() 203 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90() 264 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90()
|
H A D | mmullog2.c | 47 __INT_T s2_d1_lstride; in ENTF90() local 141 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 172 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 188 s2_d1_offset = s2_d1_base = s2_d1_soffset * s2_d1_lstride; in ENTF90() 189 s2_d1_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90() 230 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90()
|
H A D | mmullog4.c | 47 __INT_T s2_d1_lstride; in ENTF90() local 141 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 172 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 188 s2_d1_offset = s2_d1_base = s2_d1_soffset * s2_d1_lstride; in ENTF90() 189 s2_d1_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90() 230 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90()
|
H A D | mmullog8.c | 47 __INT_T s2_d1_lstride; in ENTF90() local 141 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 172 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 188 s2_d1_offset = s2_d1_base = s2_d1_soffset * s2_d1_lstride; in ENTF90() 189 s2_d1_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90() 230 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90()
|
H A D | mmullog1.c | 47 __INT_T s2_d1_lstride; in ENTF90() local 141 s2_d1_lstride = F90_DIM_LSTRIDE_G(s2_desc, 0); in ENTF90() 172 s2_d1_lb * s2_d1_lstride + s2_d2_lb * s2_d2_lstride - 1; in ENTF90() 188 s2_d1_offset = s2_d1_base = s2_d1_soffset * s2_d1_lstride; in ENTF90() 189 s2_d1_delta = s2_d1_sstride * s2_d1_lstride; in ENTF90() 230 s2_base += s2_d1_soffset * s2_d1_lstride; in ENTF90()
|