Skip to content

Commit ba3c266

Browse files
committed
If dosubsidence and dodrivenequilibrium are true, use dosubsidence ONLY
1 parent 1620d91 commit ba3c266

File tree

1 file changed

+1
-0
lines changed

1 file changed

+1
-0
lines changed

forcing.f90

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -354,6 +354,7 @@ subroutine forcing
354354
tlsvadv(:) = 0.
355355
mklsadv(:,:) = 0. ! large-scale microphysical tendencies
356356

357+
if(dosubsidence.AND.dodrivenequilibrium) dodrivenequilibrium = .false.
357358
if(dosubsidence) call subsidence()
358359
if(dodrivenequilibrium) call drivenequilibrium()
359360

0 commit comments

Comments
 (0)