@@ -571,7 +571,6 @@ contains
571571 subroutine s_initialize_variables_conversion_module () ! ----------------
572572
573573 integer :: i, j
574- !$acc update device(momxb, momxe, bubxb, bubxe, advxb, advxe, contxb, contxe, strxb, strxe)
575574
576575#ifdef MFC_PRE_PROCESS
577576 ixb = 0 ; iyb = 0 ; izb = 0 ;
@@ -628,13 +627,6 @@ contains
628627 !$acc update device(bubrs)
629628 end if
630629
631- !$acc update device(dt, sys_size, pref, rhoref, gamma_idx, pi_inf_idx, E_idx, alf_idx, stress_idx, mpp_lim, bubbles, hypoelasticity, alt_soundspeed, avg_state, num_fluids, model_eqns, num_dims, mixture_err, nb, weight, grid_geometry, cyl_coord, mapped_weno, mp_weno, weno_eps)
632- !$acc update device(nb, R0ref, Ca, Web, Re_inv, weight, R0, V0, bubbles, polytropic, polydisperse, qbmm, R0_type, ptil, bubble_model, thermal, poly_sigma)
633-
634- !$acc update device(R_n, R_v, phi_vn, phi_nv, Pe_c, Tw, pv, M_n, M_v, k_n, k_v, pb0, mass_n0, mass_v0, Pe_T, Re_trans_T, Re_trans_c, Im_trans_T, Im_trans_c, omegaN , mul0, ss, gamma_v, mu_v, gamma_m, gamma_n, mu_n, gam)
635-
636- !$acc update device(monopole, num_mono)
637-
638630#ifdef MFC_POST_PROCESS
639631 ! Allocating the density, the specific heat ratio function and the
640632 ! liquid stiffness function, respectively
0 commit comments