Lines Matching refs:ihalo
118 INTEGER :: handle, iblkcol, ihalo, ikind, & local
190 DO ihalo = 1, max_nhalos
191 IF (ihalo > nhalos) THEN
209 halos(ihalo), &
278 INTEGER :: handle, iblkcol, ihalo, ikind, & local
388 DO ihalo = 1, nhalos
389 CALL fb_atomic_halo_get(atomic_halo=halos(ihalo), &
396 DO ihalo = 1, nhalos
401 halos(ihalo), &
1124 INTEGER :: dest, handle, iatom_global, iatom_in_halo, iatom_stored, ihalo, itask, & local
1165 DO ihalo = 1, nhalos
1166 CALL fb_atomic_halo_get(atomic_halo=halos(ihalo), &
1186 DO ihalo = 1, nhalos
1187 CALL fb_atomic_halo_get(atomic_halo=halos(ihalo), &