Skip to content

Commit 3792b88

Browse files
author
Anand
committed
frontier build issue
1 parent 48209c1 commit 3792b88

File tree

1 file changed

+8
-5
lines changed

1 file changed

+8
-5
lines changed

src/simulation/m_start_up.fpp

Lines changed: 8 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1573,11 +1573,14 @@ contains
15731573
!$acc update device(sigma, surface_tension)
15741574

15751575
!$acc update device(dx, dy, dz, x_cb, x_cc, y_cb, y_cc, z_cb, z_cc)
1576-
1577-
#:for VAR in [ 'x','y','z' ]
1578-
!$acc update device(bc_{VAR}%vb1, bc_{VAR}%vb2, bc_{VAR}%vb3, bc_{VAR}%ve1, bc_{VAR}%ve2, bc_{VAR}%ve3)
1579-
!$acc update device(bc_{VAR}%grcbc_in, bc_{VAR}%grcbc_out, bc_{VAR}%grcbc_vel_out)
1580-
#:endfor
1576+
1577+
!$acc update device(bc_x%vb1, bc_x%vb2, bc_x%vb3, bc_x%ve1, bc_x%ve2, bc_x%ve3)
1578+
!$acc update device(bc_y%vb1, bc_y%vb2, bc_y%vb3, bc_y%ve1, bc_y%ve2, bc_y%ve3)
1579+
!$acc update device(bc_z%vb1, bc_z%vb2, bc_z%vb3, bc_z%ve1, bc_z%ve2, bc_z%ve3)
1580+
1581+
!$acc update device(bc_x%grcbc_in, bc_x%grcbc_out, bc_x%grcbc_vel_out)
1582+
!$acc update device(bc_y%grcbc_in, bc_y%grcbc_out, bc_y%grcbc_vel_out)
1583+
!$acc update device(bc_z%grcbc_in, bc_z%grcbc_out, bc_z%grcbc_vel_out)
15811584

15821585
!$acc update device(relax, relax_model)
15831586
if (relax) then

0 commit comments

Comments
 (0)