Ignore:
Timestamp:
Apr 12, 2013 6:19:32 AM (8 years ago)
Author:
raasch
Message:

asynchronous transfer of ghost point data for acc-optimized version

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/wall_fluxes.f90

    r1037 r1128  
    2020! Current revisions:
    2121! -----------------
    22 !
     22! loop index bounds in accelerator version replaced by i_left, i_right, j_south,
     23! j_north
    2324!
    2425! Former revisions:
     
    256257       !$acc         present( u, v, w, wall, wall_flux, z0 )
    257258       !$acc loop
    258        DO  i = nxl, nxr
    259           DO  j = nys, nyn
     259       DO  i = i_left, i_right
     260          DO  j = j_south, j_north
    260261             !$acc loop vector( 32 )
    261262             DO  k = min_inner, max_outer
     
    666667       !$acc         present( u, v, w, wall, wall_flux, z0 )
    667668       !$acc loop
    668        DO  i = nxl, nxr
    669           DO  j = nys, nyn
     669       DO  i = i_left, i_right
     670          DO  j = j_south, j_north
    670671             !$acc loop vector(32)
    671672             DO  k = min_inner, max_outer
Note: See TracChangeset for help on using the changeset viewer.