December 14th Stage-1 meeting: DCR, 3:00pm MST
Agenda:
type shr_ccsm_init_t
! Case description and name
character(len=nlen) :: case_desc ! Long description of this case
character(SHR_KIND_CS) :: case_name ! Short case identification
! Start type: initial, branch or continue
character(len=nlen) :: start_type ! Type of startup
! Directory to archive files to
character(SHR_KIND_CL) :: archive_dir ! Directory to archive to...
! Special configurations
logical :: atm_adiabatic ! No surface models and atm adiabatic mode
logical :: atm_ideal_phys ! No surface models and atm idealized physics mode
logical :: aqua_planet ! No ice or land, data-ocean with analytic SST's, perpetual time
! Restart file info
character(SHR_KIND_CL) :: restart_pfile ! Restart pointer file
! MSS information needed for CAM now, but not in the future?
integer :: mss_irt ! MSS retention period
character(len=nlen) :: mss_wpass ! MSS write password
end type shr_ccsm_init_t
|
!
! Information included in a CCSM clock
!
type shr_timemgr_clock_info_t
! CCSM time information: perpetual mode info and orbital information
private ! This is an opaque type
! Perpetual date information
logical :: perpetual_run = .false.
type(ESMF_Time) :: perpetual_time
! Orbital information to set: either year or all of rest
integer(SHR_KIND_IN) :: orb_iyear_AD = SHR_ORB_UNDEF_INT
real(SHR_KIND_R8) :: orb_obliq = SHR_ORB_UNDEF_REAL
real(SHR_KIND_R8) :: orb_eccen = SHR_ORB_UNDEF_REAL
real(SHR_KIND_R8) :: orb_mvelp = SHR_ORB_UNDEF_REAL
! Orbital information derived from above
real(SHR_KIND_R8) :: orb_obliqr = SHR_ORB_UNDEF_REAL
real(SHR_KIND_R8) :: orb_lambm0 = SHR_ORB_UNDEF_REAL
real(SHR_KIND_R8) :: orb_mvelpp = SHR_ORB_UNDEF_REAL
end type shr_timemgr_clock_info_t
!
! CCSM Clock, infomration, time and restart alarm
!
type shr_timemgr_clock_t
private ! This is an opaque type
type(ESMF_Clock) :: esmf_clock ! Time information
type(ESMF_Alarm) :: restart ! Restart alarm
type(shr_timemgr_clock_info_t) :: info ! Additional info: perpetual mode, orbit
end type shr_timemgr_clock_t
!
! Namelist values for setting up a CCSM clock
!
type shr_timemgr_setup_t
private ! This is an opaque type
! Calendar to use: NO_LEAP or GREGORIAN
character(len=32) :: calendar
! Frequency of restarts
integer(SHR_KIND_IN) :: restart_nsteps
integer(SHR_KIND_IN) :: restart_ndays
integer(SHR_KIND_IN) :: restart_nmonths
integer(SHR_KIND_IN) :: restart_nyears
! Coupling intervals of each model component
integer(SHR_KIND_IN) :: atm_cpl_dt
integer(SHR_KIND_IN) :: lnd_cpl_dt
integer(SHR_KIND_IN) :: ice_cpl_dt
integer(SHR_KIND_IN) :: ocn_cpl_dt
! Simulation stop time
integer(SHR_KIND_IN) :: stop_nsteps
integer(SHR_KIND_IN) :: stop_ndays
integer(SHR_KIND_IN) :: stop_nmonths
integer(SHR_KIND_IN) :: stop_nyears
integer(SHR_KIND_IN) :: stop_ymd
integer(SHR_KIND_IN) :: stop_tod
! Simulation start time
integer(SHR_KIND_IN) :: start_ymd
integer(SHR_KIND_IN) :: start_tod
! Simulation reference time
integer(SHR_KIND_IN) :: ref_ymd
integer(SHR_KIND_IN) :: ref_tod
! Perpetual date to hold to
integer(SHR_KIND_IN) :: perpetual_ymd
logical :: perpetual_run
! Orbital information to set: either year or all of rest
integer(SHR_KIND_IN) :: orb_iyear_AD
real(SHR_KIND_R8) :: orb_obliq
real(SHR_KIND_R8) :: orb_eccen
real(SHR_KIND_R8) :: orb_mvelp
end type shr_timemgr_setup_t
|