Skip to content

Commit 022f593

Browse files
authored
Remove chemistry straggler
1 parent 29f0b7b commit 022f593

File tree

1 file changed

+0
-20
lines changed

1 file changed

+0
-20
lines changed

src/simulation/m_rhs.fpp

Lines changed: 0 additions & 20 deletions
Original file line numberDiff line numberDiff line change
@@ -857,26 +857,6 @@ contains
857857
end if
858858
! END: Additional physics and source terms =========================
859859

860-
#:if chemistry
861-
if (chem_params%advection) then
862-
call nvtxStartRange("RHS-CHEM-ADVECTION")
863-
864-
#:for NORM_DIR, XYZ in [(1, 'x'), (2, 'y'), (3, 'z')]
865-
866-
if (id == ${NORM_DIR}$) then
867-
call s_compute_chemistry_rhs_${XYZ}$ ( &
868-
flux_n, &
869-
rhs_vf, &
870-
flux_src_n(${NORM_DIR}$)%vf, &
871-
q_prim_vf)
872-
end if
873-
874-
#:endfor
875-
876-
call nvtxEndRange
877-
end if
878-
#:endif
879-
880860
end do
881861
! END: Dimensional Splitting Loop =================================
882862

0 commit comments

Comments
 (0)