Add start_tod initialization for nuopc / cmeps driver (CICE-Consortiu…

…m#991) Define msec in subroutine InitializeRealize in nuopc/cmeps driver
ESCOMP · Nov 7, 2024 · b3d5813 · b3d5813
1 parent 8707e16
commit b3d5813
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/cicecore/drivers/nuopc/cmeps/ice_comp_nuopc.F90 b/cicecore/drivers/nuopc/cmeps/ice_comp_nuopc.F90
@@ -834,6 +834,7 @@ subroutine InitializeRealize(gcomp, importState, exportState, clock, rc)
        myear = (idate/10000)                     ! integer year of basedate
        mmonth= (idate-myear*10000)/100           ! integer month of basedate
        mday  =  idate-myear*10000-mmonth*100     ! day of month of basedate
+       msec  = start_tod                         ! start from basedate
 
        if (my_task == master_task) then
           write(nu_diag,*) trim(subname),' curr_ymd = ',curr_ymd