Skip to content

Commit 7ae0a65

Browse files
committed
more bug fixes
1 parent 88cbac0 commit 7ae0a65

File tree

2 files changed

+1
-3
lines changed

2 files changed

+1
-3
lines changed

src/pre_process/m_initial_condition.fpp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -247,7 +247,7 @@ contains
247247
deallocate (patch_id_fp)
248248

249249
if (ib) then
250-
deallocate (levelset%sf, levelset_norm%sf)
250+
deallocate (ib_markers%sf, levelset%sf, levelset_norm%sf)
251251
end if
252252

253253
deallocate (bc_type(1, 1)%sf)

src/simulation/m_riemann_solvers.fpp

Lines changed: 0 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -2466,8 +2466,6 @@ contains
24662466
E_L = gamma_L*pres_L + pi_inf_L + 5.e-1_wp*rho_L*vel_L_rms + qv_L
24672467
E_R = gamma_R*pres_R + pi_inf_R + 5.e-1_wp*rho_R*vel_R_rms + qv_R
24682468

2469-
H_L = (E_L + pres_L)/rho_L
2470-
H_R = (E_R + pres_R)/rho_R
24712469
H_L = (E_L + pres_L)/rho_L
24722470
H_R = (E_R + pres_R)/rho_R
24732471

0 commit comments

Comments
 (0)