In full coupler_main, Time at nc=0 and Time_init are set through a convoluted process in subroutine coupler_init.
For Time at nc=0,
Time = date where date is specified in the third line in the coupler.res file.
- If coupler.res does not exist or if the user specifies
force_date_from_namelist=.True., Time = current_date where current_date is specified in the namelist.
- If coupler_init is resorted to using
current_date and current_date is not of appropriate value, mpp_error is called.
Initially, Time_init=date_init where date_init is specified in the second line of coupler.res. This value is eventually overwritten to be Tiime_init=base_date where base_date is specified in the diag_table. If the base_year=0 from the diag_table, date_init=date where date had been determined as above description.
Setting of Time and Time_init should be straightfoward and only method route should be available to the user.
Refining the setting of Time and Time_init also opens up a chance to discuss the need of the coupler.res file.
In full coupler_main,
Timeat nc=0 andTime_initare set through a convoluted process in subroutine coupler_init.For
Timeat nc=0,Time = datewheredateis specified in the third line in the coupler.res file.force_date_from_namelist=.True.,Time = current_datewherecurrent_dateis specified in the namelist.current_dateandcurrent_dateis not of appropriate value, mpp_error is called.Initially,
Time_init=date_initwheredate_initis specified in the second line of coupler.res. This value is eventually overwritten to beTiime_init=base_datewherebase_dateis specified in the diag_table. If thebase_year=0from the diag_table,date_init=datewheredatehad been determined as above description.Setting of
TimeandTime_initshould be straightfoward and only method route should be available to the user.Refining the setting of Time and Time_init also opens up a chance to discuss the need of the
coupler.resfile.