/dports/math/libpgmath/flang-d07daf3/runtime/flang/ |
H A D | mmulint1.c | 67 __INT_T d_d2_lstride = 1; in ENTF90() local 167 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 178 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 183 d_d2_offset = d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 184 d_d2_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_d1_delta; in ENTF90() 205 d_d2_soffset*d_d2_lstride, in ENTF90() 212 d_d2_soffset*d_d2_lstride, in ENTF90() 220 d_d2_soffset*d_d2_lstride, in ENTF90() 224 &s1_d2_lstride,&s2_d2_lstride,&d_d2_lstride, in ENTF90()
|
H A D | mmulint2.c | 67 __INT_T d_d2_lstride = 1; in ENTF90() local 167 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 178 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 183 d_d2_offset = d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 184 d_d2_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_d1_delta; in ENTF90() 205 d_d2_soffset*d_d2_lstride, in ENTF90() 212 d_d2_soffset*d_d2_lstride, in ENTF90() 220 d_d2_soffset*d_d2_lstride, in ENTF90() 224 &s1_d2_lstride,&s2_d2_lstride,&d_d2_lstride, in ENTF90()
|
H A D | mmulint4.c | 67 __INT_T d_d2_lstride = 1; in ENTF90() local 167 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 178 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 183 d_d2_offset = d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 184 d_d2_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_d1_delta; in ENTF90() 205 d_d2_soffset*d_d2_lstride, in ENTF90() 212 d_d2_soffset*d_d2_lstride, in ENTF90() 219 d_d2_soffset*d_d2_lstride, in ENTF90() 223 &s1_d2_lstride,&s2_d2_lstride,&d_d2_lstride, in ENTF90()
|
H A D | mmulint8.c | 67 __INT_T d_d2_lstride = 1; in ENTF90() local 167 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 178 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 183 d_d2_offset = d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 184 d_d2_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_d1_delta; in ENTF90() 205 d_d2_soffset*d_d2_lstride, in ENTF90() 212 d_d2_soffset*d_d2_lstride, in ENTF90() 219 d_d2_soffset*d_d2_lstride, in ENTF90() 223 &s1_d2_lstride,&s2_d2_lstride,&d_d2_lstride, in ENTF90()
|
H A D | mmulreal4.c | 67 __INT_T d_d2_lstride = 1; in ENTF90() local 167 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 178 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 183 d_d2_offset = d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 184 d_d2_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_d1_delta; in ENTF90() 206 d_d2_soffset*d_d2_lstride, in ENTF90() 214 d_d2_soffset*d_d2_lstride, in ENTF90() 221 d_d2_soffset*d_d2_lstride, in ENTF90() 225 &s1_d2_lstride,&s2_d2_lstride,&d_d2_lstride, in ENTF90()
|
H A D | mmulreal8.c | 67 __INT_T d_d2_lstride = 1; in ENTF90() local 167 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 178 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 183 d_d2_offset = d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 184 d_d2_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_d1_delta; in ENTF90() 206 d_d2_soffset*d_d2_lstride, in ENTF90() 214 d_d2_soffset*d_d2_lstride, in ENTF90() 221 d_d2_soffset*d_d2_lstride, in ENTF90() 225 &s1_d2_lstride,&s2_d2_lstride,&d_d2_lstride, in ENTF90()
|
H A D | mmulcplx16.c | 67 __INT_T d_d2_lstride = 1; in ENTF90() local 167 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 179 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 184 d_d2_offset = d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 185 d_d2_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_d1_delta; in ENTF90() 207 d_d2_soffset*d_d2_lstride, in ENTF90() 214 d_d2_soffset*d_d2_lstride, in ENTF90() 222 d_d2_soffset*d_d2_lstride, in ENTF90() 226 &s1_d2_lstride,&s2_d2_lstride,&d_d2_lstride, in ENTF90()
|
H A D | mmulcplx8.c | 67 __INT_T d_d2_lstride = 1; in ENTF90() local 167 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 179 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 184 d_d2_offset = d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 185 d_d2_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_d1_delta; in ENTF90() 207 d_d2_soffset*d_d2_lstride, in ENTF90() 214 d_d2_soffset*d_d2_lstride, in ENTF90() 222 d_d2_soffset*d_d2_lstride, in ENTF90() 226 &s1_d2_lstride,&s2_d2_lstride,&d_d2_lstride, in ENTF90()
|
H A D | mmulreal8_t.c | 67 __INT_T d_d2_lstride = 1; in ENTF90() local 145 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 163 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 167 d_d2_soffset*d_d2_lstride, in ENTF90() 200 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 204 d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 205 d_k_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_m_delta; in ENTF90()
|
H A D | mmulreal4_t.c | 67 __INT_T d_d2_lstride = 1; in ENTF90() local 145 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 163 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 167 d_d2_soffset*d_d2_lstride, in ENTF90() 200 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 204 d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 205 d_k_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_m_delta; in ENTF90()
|
H A D | mmulcplx16_t.c | 67 __INT_T d_d2_lstride = 1; in ENTF90() local 145 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 163 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 167 d_d2_soffset*d_d2_lstride, in ENTF90() 200 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 204 d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 205 d_k_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_m_delta; in ENTF90()
|
H A D | mmulcplx8_t.c | 67 __INT_T d_d2_lstride = 1; in ENTF90() local 145 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 163 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 167 d_d2_soffset*d_d2_lstride, in ENTF90() 200 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 204 d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 205 d_k_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_m_delta; in ENTF90()
|
H A D | mmullog2.c | 62 __INT_T d_d2_lstride = 1; in ENTF90() local 162 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 174 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 179 d_d2_offset = d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 180 d_d2_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_d1_delta; in ENTF90()
|
H A D | mmullog4.c | 62 __INT_T d_d2_lstride = 1; in ENTF90() local 162 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 174 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 179 d_d2_offset = d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 180 d_d2_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_d1_delta; in ENTF90()
|
H A D | mmullog8.c | 62 __INT_T d_d2_lstride = 1; in ENTF90() local 162 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 174 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 179 d_d2_offset = d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 180 d_d2_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_d1_delta; in ENTF90()
|
H A D | mmullog1.c | 62 __INT_T d_d2_lstride = 1; in ENTF90() local 162 d_d2_lstride = F90_DIM_LSTRIDE_G(dest_desc, 1); in ENTF90() 174 d_d1_lb * d_d1_lstride + d_d2_lb * d_d2_lstride - 1; in ENTF90() 179 d_d2_offset = d_d2_base = d_d2_soffset * d_d2_lstride; in ENTF90() 180 d_d2_delta = s1_rank == 2 ? d_d2_sstride * d_d2_lstride : d_d1_delta; in ENTF90()
|