Skip to content

Commit b8c19b0

Browse files
Hyeoksu LeeHyeoksu Lee
authored andcommitted
gpu declare fix
1 parent 8dcca3f commit b8c19b0

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/simulation/m_global_parameters.fpp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -472,7 +472,7 @@ module m_global_parameters
472472
!> @name Physical bubble parameters (see Ando 2010, Preston 2007)
473473
!> @{
474474
real(wp) :: phi_vg, phi_gv, Pe_c, Tw, k_vl, k_gl
475-
$:GPU_DECLARE(create='[phi_vg,phi_gv,Pe_c,Tw,M_g, M_v,k_vl,k_gl]')
475+
$:GPU_DECLARE(create='[phi_vg,phi_gv,Pe_c,Tw,k_vl,k_gl]')
476476

477477
real(wp), dimension(:), allocatable :: pb0, mass_g0, mass_v0, Pe_T, k_v, k_g
478478
real(wp), dimension(:), allocatable :: Re_trans_T, Re_trans_c, Im_trans_T, Im_trans_c, omegaN

0 commit comments

Comments
 (0)