Skip to content

Commit a0c8e32

Browse files
committed
Patches to get BACM back to Jason skill, plus stealth AIST-NR updates
1 parent 1495b7c commit a0c8e32

File tree

1 file changed

+2
-10
lines changed

1 file changed

+2
-10
lines changed

FV_StateMod.F90

Lines changed: 2 additions & 10 deletions
Original file line numberDiff line numberDiff line change
@@ -546,11 +546,7 @@ subroutine FV_Setup(GC,LAYOUT_FILE, RC)
546546
FV_Atm(1)%flagstruct%do_sat_adj = .false. ! only valid when nwat >= 6
547547
FV_Atm(1)%flagstruct%dz_min = 6.0
548548
FV_Atm(1)%flagstruct%RF_fast = .true.
549-
if (FV_Atm(1)%flagstruct%npz == 72) then
550-
FV_Atm(1)%flagstruct%tau = 0.0
551-
else
552-
FV_Atm(1)%flagstruct%tau = 2.0
553-
endif
549+
FV_Atm(1)%flagstruct%tau = 2.0
554550
FV_Atm(1)%flagstruct%rf_cutoff = 0.35e2
555551
if (FV_Atm(1)%flagstruct%npx*CEILING(FV_Atm(1)%flagstruct%stretch_fac) >= 1440) then
556552
! 6th order default damping options
@@ -575,11 +571,7 @@ subroutine FV_Setup(GC,LAYOUT_FILE, RC)
575571
else
576572
FV_Atm(1)%flagstruct%fv_sg_adj = DT
577573
FV_Atm(1)%flagstruct%RF_fast = .false.
578-
if (FV_Atm(1)%flagstruct%npz == 72) then
579-
FV_Atm(1)%flagstruct%tau = 0.0
580-
else
581-
FV_Atm(1)%flagstruct%tau = 2.0
582-
endif
574+
FV_Atm(1)%flagstruct%tau = 0.0
583575
FV_Atm(1)%flagstruct%rf_cutoff = 0.35e2
584576
! 4th order default damping options
585577
FV_Atm(1)%flagstruct%nord = 2

0 commit comments

Comments
 (0)