Skip to content

Commit 3ad2ddb

Browse files
author
Malmahrouqi3
committed
lint/format + few fixes
1 parent 6e7281b commit 3ad2ddb

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

src/simulation/m_riemann_solvers.fpp

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1139,7 +1139,7 @@ contains
11391139
if (model_eqns == 3) then
11401140
!ME3
11411141
$:GPU_PARALLEL_LOOP(collapse=3, private='[vel_L, vel_R, &
1142-
& vel_K_Star, Re_L, Re_R, rho_avg, h_avg, &
1142+
& vel_K_Star, Re_L, Re_R, rho_avg, h_avg, c_fast, &
11431143
& gamma_avg, s_L, s_R, s_S, vel_avg_rms, &
11441144
& alpha_L, alpha_R, Ys_L, Ys_R, Xs_L, Xs_R, &
11451145
& Gamma_iL, Gamma_iR, Cp_iL, Cp_iR, Yi_avg, &
@@ -1752,8 +1752,8 @@ contains
17521752

17531753
elseif (model_eqns == 2 .and. bubbles_euler) then
17541754
$:GPU_PARALLEL_LOOP(collapse=3, private='[R0_L, R0_R, V0_L, &
1755-
& V0_R, P0_L, P0_R, pbw_L, pbw_R, vel_L, &
1756-
& vel_R, rho_avg, alpha_L, alpha_R, h_avg, &
1755+
& V0_R, P0_L, P0_R, pbw_L, pbw_R, vel_L, c_fast, &
1756+
& vel_R, rho_avg, alpha_L, alpha_R, h_avg, tau_e_L, tau_e_R, &
17571757
& gamma_avg, s_L, s_R, s_S, nbub_L, nbub_R, &
17581758
& ptilde_L, ptilde_R, vel_avg_rms, Re_L, Re_R, &
17591759
& pcorr, zcoef, vel_L_tmp, vel_R_tmp]')
@@ -2191,7 +2191,7 @@ contains
21912191
else
21922192
! 5-EQUATION MODEL WITH HLLC
21932193
$:GPU_PARALLEL_LOOP(collapse=3, private='[vel_L, vel_R, &
2194-
& Re_L, Re_R, rho_avg, h_avg, gamma_avg, &
2194+
& Re_L, Re_R, rho_avg, h_avg, gamma_avg, c_fast, &
21952195
& alpha_L, alpha_R, s_L, s_R, s_S, &
21962196
& vel_avg_rms, pcorr, zcoef, vel_L_tmp, &
21972197
& vel_R_tmp, Ys_L, Ys_R, Xs_L, Xs_R, &

0 commit comments

Comments
 (0)