We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent c2b78bd commit f860e69Copy full SHA for f860e69
src/simulation/m_ibm.fpp
@@ -85,14 +85,14 @@ contains
85
86
integer :: i, j, k
87
88
- !$acc update device(ib_markers%sf)
+ !$acc update device(ib_markers%sf, levelset%sf, levelset_norm%sf)
89
90
! Get neighboring IB variables from other processors
91
call s_mpi_sendrecv_ib_buffers(ib_markers, gp_layers)
92
93
call s_find_num_ghost_points()
94
95
- !$acc update device(num_inner_gps)
+ !$acc update device(num_gps, num_inner_gps)
96
@:ALLOCATE_GLOBAL(ghost_points(num_gps))
97
@:ALLOCATE_GLOBAL(inner_points(num_inner_gps))
98
0 commit comments