dc_date_types.f90 File Reference

Go to the source code of this file.

Data Types
type	dc_date_types::dc_datetime
type	dc_date_types::dc_difftime

Modules
module	dc_date_types

Variables
integer, parameter, public	dc_date_types::cal_cyclic = 1
integer, parameter, public	dc_date_types::cal_noleap = 2
integer, parameter, public	dc_date_types::cal_julian = 3
integer, parameter, public	dc_date_types::cal_gregorian = 4
integer, dimension(0:3), parameter, public	dc_date_types::prepared_caltypes = (/CAL_CYCLIC, CAL_NOLEAP, CAL_JULIAN, CAL_GREGORIAN/)
integer, save, public	dc_date_types::caltype = CAL_GREGORIAN
real(dp), parameter, public	dc_date_types::cyclic_mdays = 30.6_DP
integer, parameter, public	dc_date_types::min_seconds = 60
integer, parameter, public	dc_date_types::hour_seconds = 3600
real(dp), parameter, public	dc_date_types::day_seconds_earth = 86400.0_DP
real(dp), save, public	dc_date_types::day_seconds = DAY_SECONDS_EARTH
type(dc_scaled_sec), save, public	dc_date_types::day_seconds_scl
logical, save, public	dc_date_types::flag_set_day_seconds_scl = .false.
integer, parameter, public	dc_date_types::year_days = 365
integer, parameter, public	dc_date_types::year_months = 12
integer, parameter, public	dc_date_types::four_years = YEAR_DAYS * 4 + 1
integer, parameter, public	dc_date_types::four_century = YEAR_DAYS * 400 + 97
character(*), dimension(1), parameter, public	dc_date_types::unit_nondim = (/ '1' /)
character(*), dimension(8), parameter, public	dc_date_types::unit_sec = (/ 'seconds', 'second ', 'secs. ', 'secs ', 'sec. ', 'sec ', 's. ', 's '/)
character(*), dimension(4), parameter, public	dc_date_types::unit_min = (/ 'minutes', 'minute ', 'min. ', 'min '/)
character(*), dimension(8), parameter, public	dc_date_types::unit_hour = (/ 'hours', 'hour ', 'hrs. ', 'hrs ', 'hr. ', 'hr ', 'h. ', 'h '/)
character(*), dimension(4), parameter, public	dc_date_types::unit_day = (/ 'days', 'day ', 'd. ', 'd '/)
character(*), dimension(6), parameter, public	dc_date_types::unit_month = (/ 'months', 'month ', 'mon. ', 'mon ', 'mo. ', 'mo '/)
character(*), dimension(4), parameter, public	dc_date_types::unit_year = (/ 'years', 'year ', 'yr. ', 'yr '/)
integer, parameter, public	dc_date_types::unit_symbol_err = -1
integer, parameter, public	dc_date_types::unit_symbol_nondim = 1
integer, parameter, public	dc_date_types::unit_symbol_sec = 2
integer, parameter, public	dc_date_types::unit_symbol_min = 3
integer, parameter, public	dc_date_types::unit_symbol_hour = 4
integer, parameter, public	dc_date_types::unit_symbol_day = 5
integer, parameter, public	dc_date_types::unit_symbol_month = 6
integer, parameter, public	dc_date_types::unit_symbol_year = 7