From dcb8a726f645b5f0261fba0b6fb9ad9a3f58035d Mon Sep 17 00:00:00 2001 From: Spencer Bryngelson Date: Tue, 5 May 2026 17:51:47 -0400 Subject: [PATCH] fix: free tau_Re_vf in all viscous runs, not only cyl_coord --- src/simulation/m_rhs.fpp | 12 +++++------- 1 file changed, 5 insertions(+), 7 deletions(-) diff --git a/src/simulation/m_rhs.fpp b/src/simulation/m_rhs.fpp index 8589a7ff52..4b275bd19d 100644 --- a/src/simulation/m_rhs.fpp +++ b/src/simulation/m_rhs.fpp @@ -1823,13 +1823,11 @@ contains end if end if - if (cyl_coord) then - do i = 1, num_dims - @:DEALLOCATE(tau_re_vf(eqn_idx%cont%end + i)%sf) - end do - @:DEALLOCATE(tau_re_vf(eqn_idx%E)%sf) - @:DEALLOCATE(tau_re_vf) - end if + do i = 1, num_dims + @:DEALLOCATE(tau_re_vf(eqn_idx%cont%end + i)%sf) + end do + @:DEALLOCATE(tau_re_vf(eqn_idx%E)%sf) + @:DEALLOCATE(tau_re_vf) end if @:DEALLOCATE(dqL_prim_dx_n, dqL_prim_dy_n, dqL_prim_dz_n) @:DEALLOCATE(dqR_prim_dx_n, dqR_prim_dy_n, dqR_prim_dz_n)