mom_cap_time.F90 File Reference

Go to the source code of this file.

Modules
module	mom_cap_time
	This was originally share code in CIME, but required CIME as a dependency to build the MOM cap. The options here for setting a restart alarm are useful for all caps, so a second step is to determine if/how these could be offered more generally in a shared library. For now we really want the MOM cap to only depend on MOM and ESMF/NUOPC.

Functions/Subroutines
subroutine, public	mom_cap_time::alarminit (clock, alarm, option, opt_n, opt_ymd, opt_tod, RefTime, alarmname, rc)
	Setup an alarm in a clock. The ringtime sent to AlarmCreate MUST be the next alarm time. If you send an arbitrary but proper ringtime from the past and the ring interval, the alarm will always go off on the next clock advance and this will cause serious problems. Even if it makes sense to initialize an alarm with some reference time and the alarm interval, that reference time has to be advance forward to be >= the current time. In the logic below we set an appropriate "NextAlarm" and then we make sure to advance it properly based on the ring interval. More...
subroutine, private	mom_cap_time::timeinit (Time, ymd, cal, tod, desc, logunit, rc)
	Creates the ESMF_Time object corresponding to the given input time, given in YMD (Year Month Day) and TOD (Time-of-day) format. Sets the time by an integer as YYYYMMDD and integer seconds in the day. More...
subroutine, private	mom_cap_time::date2ymd (date, year, month, day)
	Converts a coded-date (yyyymmdd) into calendar year,month,day. More...

Variables
character(len= *), parameter, private	mom_cap_time::optnone = "none"
character(len= *), parameter, private	mom_cap_time::optnever = "never"
character(len= *), parameter, private	mom_cap_time::optnsteps = "nsteps"
character(len= *), parameter, private	mom_cap_time::optnstep = "nstep"
character(len= *), parameter, private	mom_cap_time::optnseconds = "nseconds"
character(len= *), parameter, private	mom_cap_time::optnsecond = "nsecond"
character(len= *), parameter, private	mom_cap_time::optnminutes = "nminutes"
character(len= *), parameter, private	mom_cap_time::optnminute = "nminute"
character(len= *), parameter, private	mom_cap_time::optnhours = "nhours"
character(len= *), parameter, private	mom_cap_time::optnhour = "nhour"
character(len= *), parameter, private	mom_cap_time::optndays = "ndays"
character(len= *), parameter, private	mom_cap_time::optnday = "nday"
character(len= *), parameter, private	mom_cap_time::optnmonths = "nmonths"
character(len= *), parameter, private	mom_cap_time::optnmonth = "nmonth"
character(len= *), parameter, private	mom_cap_time::optnyears = "nyears"
character(len= *), parameter, private	mom_cap_time::optnyear = "nyear"
character(len= *), parameter, private	mom_cap_time::optmonthly = "monthly"
character(len= *), parameter, private	mom_cap_time::optyearly = "yearly"
character(len= *), parameter, private	mom_cap_time::optdate = "date"
character(len= *), parameter, private	mom_cap_time::optifdays0 = "ifdays0"
character(len= *), parameter, private	mom_cap_time::optglccouplingperiod = "glc_coupling_period"
integer, parameter	mom_cap_time::secperday = 86400
character(len= *), parameter	mom_cap_time::u_file_u = __FILE__