Skip to content

Commit 3469288

Browse files
committed
fix: add flux_tau to GPU private list in s_lf_riemann_solver
type(riemann_states) structs are not auto-private under OpenACC (unlike plain real(wp) scalars). flux_tau_L/flux_tau_R were scalars on master and worked without explicit listing; after the riemann_states refactor they became flux_tau (a derived type) which requires explicit private=[flux_tau]. HLLC had it; LF was missed.
1 parent 3d7b107 commit 3469288

1 file changed

Lines changed: 1 addition & 1 deletion

File tree

src/simulation/m_riemann_solvers.fpp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -876,7 +876,7 @@ contains
876876
& B2, b4, cm, pcorr, zcoef, vel_grad_L, vel_grad_R, idx_right_phys, vel_rms, vel_avg_rms, &
877877
& vel_tmp, Ms, pres_S, alpha_L_sum, alpha_R_sum, c_avg, pres, rho, gamma, pi_inf, qv, c, E, &
878878
& H, ptilde, s_M, s_P, xi_M, xi_P, Cp_avg, Cv_avg, T_avg, eps, c_sum_Yi_Phi, Cp, Cv, R_gas, &
879-
& MW, T, Y]')
879+
& MW, T, Y, flux_tau]')
880880
do l = ${Z_BND}$%beg, ${Z_BND}$%end
881881
do k = ${Y_BND}$%beg, ${Y_BND}$%end
882882
do j = ${X_BND}$%beg, ${X_BND}$%end

0 commit comments

Comments
 (0)