Skip to content

Commit

Permalink
format
Browse files Browse the repository at this point in the history
  • Loading branch information
wilfonba committed May 29, 2024
1 parent e5da900 commit 73e7515
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/simulation/m_rhs.fpp
Original file line number Diff line number Diff line change
Expand Up @@ -1011,8 +1011,8 @@ contains
if (run_time_info .or. probe_wrt .or. ib) then

ix%beg = -buff_size; iy%beg = 0; iz%beg = 0
if (n > 0) iy%beg = -buff_size;
if (p > 0) iz%beg = -buff_size;
if (n > 0) iy%beg = -buff_size;
if (p > 0) iz%beg = -buff_size;
ix%end = m - ix%beg; iy%end = n - iy%beg; iz%end = p - iz%beg
!$acc update device(ix, iy, iz)

Expand Down

0 comments on commit 73e7515

Please sign in to comment.