Skip to content

Commit a07c5e3

Browse files
TempTemp
authored andcommitted
Add max_dt to private clause
1 parent 5ffd5e8 commit a07c5e3

1 file changed

Lines changed: 1 addition & 1 deletion

File tree

src/simulation/m_time_steppers.fpp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -642,7 +642,7 @@ contains
642642
end if
643643

644644
dt_local = huge(1.0_wp)
645-
$:GPU_PARALLEL_LOOP(collapse=3, private='[vel, alpha, Re, rho, vel_sum, pres, gamma, pi_inf, c, H, qv, fl]', &
645+
$:GPU_PARALLEL_LOOP(collapse=3, private='[vel, alpha, Re, rho, vel_sum, pres, gamma, pi_inf, c, H, qv, fl, max_dt]', &
646646
& reduction='[[dt_local]]', reductionOp='[min]')
647647
do l = 0, p
648648
do k = 0, n

0 commit comments

Comments
 (0)