Skip to content

Commit 69f9f3b

Browse files
committed
make 1st timestep same as cam7
(cherry picked from commit feb2890)
1 parent 9e57b27 commit 69f9f3b

File tree

1 file changed

+2
-0
lines changed

1 file changed

+2
-0
lines changed

datm/atm_comp_nuopc.F90

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -877,6 +877,8 @@ real(R8) function getNextRadCDay( julday, tod, stepno, dtime, iradsw )
877877
! or later.
878878
if (mod(tod,delta_radsw) == 0 .and. stepno > 0) then
879879
nextsw_cday = julday + 1*dtime/shr_const_cday
880+
elseif (stepno == 0) then
881+
nextsw_cday = julday + (1+liradsw)*dtime/shr_const_cday
880882
else
881883
nextsw_cday = -1._r8
882884
end if

0 commit comments

Comments
 (0)