Searched refs:NLg_loc (Results 1 – 2 of 2) sorted by relevance
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | ewald_spline_util.F | 157 Lg_loc_min, max_iter, my_i, my_j, my_k, n1, n2, n3, n_extra, NLg_loc, nxlim, nylim, & local
229 NLg_loc = SIZE(Lg)/grid%pw_grid%para%group_size
234 Lg_loc_min = (NLg_loc + 1)*grid%pw_grid%para%my_pos + 1
235 Lg_loc_max = Lg_loc_min + (NLg_loc + 1) - 1
237 Lg_loc_min = (NLg_loc + 1)*n_extra + NLg_loc*(grid%pw_grid%para%my_pos - n_extra) + 1
238 Lg_loc_max = Lg_loc_min + NLg_loc - 1
242 NLg_loc = Lg_loc_max - Lg_loc_min + 1
244 IF (NLg_loc > 0) THEN ! some work for this node
249 ALLOCATE (lhs(act_nx, NLg_loc))
250 ALLOCATE (rhs(act_ny, NLg_loc))
[all …]
|
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | ewald_spline_util.F | 157 Lg_loc_min, max_iter, my_i, my_j, my_k, n1, n2, n3, n_extra, NLg_loc, nxlim, nylim, & local
229 NLg_loc = SIZE(Lg)/grid%pw_grid%para%group_size
234 Lg_loc_min = (NLg_loc + 1)*grid%pw_grid%para%my_pos + 1
235 Lg_loc_max = Lg_loc_min + (NLg_loc + 1) - 1
237 Lg_loc_min = (NLg_loc + 1)*n_extra + NLg_loc*(grid%pw_grid%para%my_pos - n_extra) + 1
238 Lg_loc_max = Lg_loc_min + NLg_loc - 1
242 NLg_loc = Lg_loc_max - Lg_loc_min + 1
244 IF (NLg_loc > 0) THEN ! some work for this node
249 ALLOCATE (lhs(act_nx, NLg_loc))
250 ALLOCATE (rhs(act_ny, NLg_loc))
[all …]
|