Skip to content

Commit 3ed0cfd

Browse files
committed
Enable RTI source terms
RTI has been broken for ~2 years since 181c9fa as we had a check for rho < 1d99 and if true we would turn off the RTI source term (and thats of cousre always true).
1 parent c5afb09 commit 3ed0cfd

File tree

3 files changed

+3
-4
lines changed

3 files changed

+3
-4
lines changed

star/private/hydro_alpha_rti_eqns.f90

Lines changed: 1 addition & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -136,8 +136,7 @@ subroutine do1_dalpha_RTI_dt_eqn(s, k, nvar, ierr)
136136
instability2 = -dPdr_drhodr ! > 0 means Rayleigh-Taylor unstable
137137
if (instability2 <= 0d0 .or. &
138138
s% q(k) > s% alpha_RTI_src_max_q .or. &
139-
s% q(k) < s% alpha_RTI_src_min_q .or. &
140-
s% rho(k) < 1d99) then
139+
s% q(k) < s% alpha_RTI_src_min_q) then
141140
source_plus = 0d0
142141
instability2 = 0d0
143142
instability = 0d0

star/test_suite/ccsn_IIp/inlist_end_infall

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -148,7 +148,7 @@
148148

149149
&pgstar
150150

151-
pause = .true.
151+
!pause = .true.
152152

153153
Grid2_win_flag = .true.
154154
pgstar_interval = 1

star/test_suite/ccsn_IIp/inlist_infall

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -122,7 +122,7 @@
122122

123123
&pgstar
124124

125-
pause = .true.
125+
!pause = .true.
126126

127127
Grid2_win_flag = .true.
128128
pgstar_interval = 1

0 commit comments

Comments
 (0)