Skip to content

Commit

Permalink
Move setting use_leap_years to ice_calendar
Browse files Browse the repository at this point in the history
  • Loading branch information
anton-seaice committed Feb 22, 2024
1 parent 118f61e commit b64d07c
Show file tree
Hide file tree
Showing 2 changed files with 9 additions and 7 deletions.
7 changes: 1 addition & 6 deletions cicecore/drivers/nuopc/cmeps/ice_comp_nuopc.F90
Original file line number Diff line number Diff line change
Expand Up @@ -26,7 +26,7 @@ module ice_comp_nuopc
use ice_calendar , only : force_restart_now, write_ic
use ice_calendar , only : idate, idate0, mday, mmonth, myear, year_init, month_init, day_init
use ice_calendar , only : msec, dt, calendar, calendar_type, nextsw_cday, istep
use ice_calendar , only : ice_calendar_noleap, ice_calendar_gregorian, use_leap_years
use ice_calendar , only : ice_calendar_noleap, ice_calendar_gregorian
use ice_kinds_mod , only : dbl_kind, int_kind, char_len, char_len_long
use ice_fileunits , only : nu_diag, nu_diag_set, inst_index, inst_name
use ice_fileunits , only : inst_suffix, release_all_fileunits, flush_fileunit
Expand Down Expand Up @@ -645,11 +645,6 @@ subroutine InitializeAdvertise(gcomp, importState, exportState, clock, rc)
call abort_ice(trim(errmsg))
endif

! Set use_leap_years as some CICE calls use this instead of the calendar type
call ESMF_TimeGet( currTime, calkindflag=esmf_caltype, rc=rc )
if (ChkErr(rc,__LINE__,u_FILE_u)) return
if (esmf_caltype == ESMF_CALKIND_GREGORIAN) use_leap_years = .true.

#else

! Read the cice namelist as part of the call to cice_init1
Expand Down
9 changes: 8 additions & 1 deletion cicecore/shared/ice_calendar.F90
Original file line number Diff line number Diff line change
Expand Up @@ -211,7 +211,14 @@ subroutine init_calendar
nstreams = 0

#ifdef CESMCOUPLED
! calendar_type set by coupling
! calendar_type set by coupling
! set use_leap_years for consistency
if (calendar_type == trim(ice_calendar_gregorian)) then
use_leap_years = .true.
else
use_leap_years = .false.
endif

#else
calendar_type = ''
if (use_leap_years) then
Expand Down

0 comments on commit b64d07c

Please sign in to comment.