WeatherManager Module

Used By

Variables

Type	Visibility	Attributes		Name		Initial
integer,	private,	parameter	::	InvalidDate	=	-1
integer,	private,	parameter	::	MonthDay	=	1
integer,	private,	parameter	::	NthDayInMonth	=	2
integer,	private,	parameter	::	LastDayInMonth	=	3
integer,	private,	parameter	::	ScheduleMethod	=	1
integer,	private,	parameter	::	CorrelationMethod	=	2
integer,	private,	parameter	::	InvalidWeatherFile	=	0
integer,	private,	parameter	::	EPlusWeatherFile	=	1
integer,	private,	parameter	::	ASHRAE_ClearSky	=	0
integer,	private,	parameter	::	Zhang_Huang	=	1
integer,	private,	parameter	::	SolarModel_Schedule	=	2
integer,	private,	parameter	::	ASHRAE_Tau	=	3
integer,	private,	parameter	::	DDHumIndType_Wetbulb	=	0
integer,	private,	parameter	::	DDHumIndType_Dewpoint	=	1
integer,	private,	parameter	::	DDHumIndType_Enthalpy	=	2
integer,	private,	parameter	::	DDHumIndType_HumRatio	=	3
integer,	private,	parameter	::	DDHumIndType_RelHumSch	=	4
integer,	private,	parameter	::	DDHumIndType_WBProfDef	=	5
integer,	private,	parameter	::	DDHumIndType_WBProfDif	=	6
integer,	private,	parameter	::	DDHumIndType_WBProfMul	=	7
integer,	private,	parameter	::	DDHumIndType_Count	=	8
integer,	private,	parameter	::	DDDBRangeType_Default	=	0
integer,	private,	parameter	::	DDDBRangeType_Multiplier	=	1
integer,	private,	parameter	::	DDDBRangeType_Difference	=	2
integer,	private,	parameter	::	DDDBRangeType_Profile	=	3
integer,	private,	parameter	::	WP_ScheduleValue	=	1
integer,	private,	parameter	::	WP_DryBulbDelta	=	2
integer,	private,	parameter	::	WP_DewPointDelta	=	3
integer,	private,	parameter	::	WP_SkyTAlgorithmA	=	4
integer,	private,	parameter	::	GregorianToJulian	=	1
integer,	private,	parameter	::	JulianToGregorian	=	2
real(kind=r64),	private,	parameter	::	Sigma	=	5.6697d-8
real(kind=r64),	private,	parameter	::	TKelvin	=	KelvinConv
character(len=*),	private,	parameter	::	Blank	=	' '
character(len=*),	private,	parameter, DIMENSION(7)	::	DaysOfWeek	=	(/"SUNDAY ", "MONDAY ", "TUESDAY ", "WEDNESDAY", "THURSDAY ", "FRIDAY ", "SATURDAY "/)
logical,	private		::	Debugout	=	.false.
integer,	private		::	YearofSim	=	1
integer,	private,	parameter	::	NumDaysInYear	=	365
integer,	private		::	EnvironmentReportNbr	=	0
character(len=3),	private		::	EnvironmentReportChr	=	Blank
integer,	private		::	TimeStampReportNbr	=	0
character(len=3),	private		::	TimeStampReportChr	=	Blank
integer,	private		::	WeatherDataReport	=	0
logical,	private		::	WeatherFileExists	=	.FALSE.
character(len=100),	private		::	LocationTitle	=	Blank
logical,	private		::	LocationGathered	=	.false.
real(kind=r64),	private		::	WeatherFileLatitude	=	0.0d0
real(kind=r64),	private		::	WeatherFileLongitude	=	0.0d0
real(kind=r64),	private		::	WeatherFileTimeZone	=	0.0d0
real(kind=r64),	private		::	WeatherFileElevation	=	0.0d0
integer,	private		::	WeatherFileUnitNumber
real(kind=r64),	private,	DIMENSION(12)	::	GroundTemps	=	(/18.d0, 18.d0, 18.d0, 18.d0, 18.d0, 18.d0, 18.d0, 18.d0, 18.d0, 18.d0, 18.d0, 18.d0/)
real(kind=r64),	private,	DIMENSION(12)	::	GroundTempsFC	=	(/0.d0, 0.d0, 0.d0, 0.d0, 0.d0, 0.d0, 0.d0, 0.d0, 0.d0, 0.d0, 0.d0, 0.d0/)
real(kind=r64),	private,	DIMENSION(12)	::	SurfaceGroundTemps	=	(/13.d0, 13.d0, 13.d0, 13.d0, 13.d0, 13.d0, 13.d0, 13.d0, 13.d0, 13.d0, 13.d0, 13.d0/)
real(kind=r64),	private,	DIMENSION(12)	::	DeepGroundTemps	=	(/16.d0, 16.d0, 16.d0, 16.d0, 16.d0, 16.d0, 16.d0, 16.d0, 16.d0, 16.d0, 16.d0, 16.d0/)
real(kind=r64),	private,	DIMENSION(12)	::	GroundReflectances	=	(/.2d0, .2d0, .2d0, .2d0, .2d0, .2d0, .2d0, .2d0, .2d0, .2d0, .2d0, .2d0/)
real(kind=r64),	private		::	SnowGndRefModifier	=	1.0d0
real(kind=r64),	private		::	SnowGndRefModifierForDayltg	=	1.0d0
integer,	private		::	WaterMainsTempsMethod	=	0
integer,	private		::	WaterMainsTempsSchedule	=	0
real(kind=r64),	private		::	WaterMainsTempsAnnualAvgAirTemp	=	0.0d0
real(kind=r64),	private		::	WaterMainsTempsMaxDiffAirTemp	=	0.0d0
logical,	private		::	wthFCGroundTemps	=	.false.
real(kind=r64),	private		::	RainAmount	=	0.0d0
real(kind=r64),	private		::	SnowAmount	=	0.0d0
type(DayWeatherVariables),	private,	SAVE	::	TodayVariables	=	DayWeatherVariables(0, 0, 0, 0, 0, 0, 0, 0.0d0, 0.0d0, 0.0d0)
type(DayWeatherVariables),	private,	SAVE	::	TomorrowVariables	=	DayWeatherVariables(0, 0, 0, 0, 0, 0, 0, 0.0d0, 0.0d0, 0.0d0)
type(DayWeatherVariables),	private,	ALLOCATABLE, DIMENSION(:)	::	DesignDay
type(MissingData),	private,	SAVE	::	Missing	=	MissingData(0.0d0, 0.0d0, 0, 0.0d0, 0, 0.0d0, 0, 0, 0.0d0, 0, 0, 0.0d0, 0, 0, 0.0d0, 0.0d0)
type(MissingDataCounts),	private,	SAVE	::	Missed	=	MissingDataCounts(0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0)
type(RangeDataCounts),	private,	SAVE	::	OutOfRange	=	RangeDataCounts(0, 0, 0, 0, 0, 0, 0, 0)
type(DesignDayData),	private,	ALLOCATABLE, DIMENSION(:)	::	DesDayInput
type(EnvironmentData),	private,	ALLOCATABLE, DIMENSION(:)	::	Environment
type(RunPeriodData),	private,	ALLOCATABLE, DIMENSION(:)	::	RunPeriodInput
type(RunPeriodData),	private,	ALLOCATABLE, DIMENSION(:)	::	RunPeriodDesignInput
type(TypicalExtremeData),	private,	ALLOCATABLE, DIMENSION(:)	::	TypicalExtremePeriods
type(DaylightSavingPeriodData),	private,	SAVE	::	EPWDST	=	DaylightSavingPeriodData(0, 0, 0, 0, 0, 0, 0, 0)
type(DaylightSavingPeriodData),	private,	SAVE	::	IDFDST	=	DaylightSavingPeriodData(0, 0, 0, 0, 0, 0, 0, 0)
type(DaylightSavingPeriodData),	private,	SAVE	::	DST	=	DaylightSavingPeriodData(0, 0, 0, 0, 0, 0, 0, 0)
type(WeatherProperties),	private,	ALLOCATABLE, DIMENSION(:)	::	WPSkyTemperature
integer,	private		::	TotRunPers	=	0
integer,	private		::	TotRunDesPers	=	0
integer,	private		::	NumSpecialDays	=	0
type(SpecialDayData),	private,	ALLOCATABLE, DIMENSION(:)	::	SpecialDays
integer,	private,	DIMENSION(366)	::	SpecialDayTypes	=	0
integer,	private,	DIMENSION(366)	::	WeekDayTypes	=	0
integer,	private,	DIMENSION(366)	::	DSTIndex	=	0
integer,	private		::	NumDataPeriods	=	0
type(DataPeriodData),	private,	ALLOCATABLE, DIMENSION(:)	::	DataPeriods
integer,	private		::	NumIntervalsPerHour	=	1
logical,	private		::	UseDaylightSaving	=	.true.
logical,	private		::	UseSpecialDays	=	.true.
logical,	private		::	UseRainValues	=	.true.
logical,	private		::	UseSnowValues	=	.true.
logical,	private		::	EPWDaylightSaving	=	.false.
logical,	private		::	IDFDaylightSaving	=	.false.
logical,	private		::	DaylightSavingIsActive	=	.false.
logical,	private		::	WFAllowsLeapYears	=	.false.
integer,	private		::	WFLeapYearInd	=	0
integer,	private		::	curSimDayforEndofRunPeriod	=	0
integer,	private		::	Envrn	=	0
integer,	private		::	NumOfEnvrn	=	0
integer,	private		::	NumEPWTypExtSets	=	0
integer,	private		::	NumWPSkyTemperatures	=	0
logical,	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayIsRain
logical,	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayIsSnow
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayRainAmount
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodaySnowAmount
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayOutDryBulbTemp
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayOutWetBulbTemp
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayOutDewPointTemp
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayOutBaroPress
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayOutHumRat
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayOutRelHum
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayWindSpeed
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayWindDir
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodaySkyTemp
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayHorizIRSky
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayBeamSolarRad
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayDifSolarRad
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayAlbedo
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TodayLiquidPrecip
logical,	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowIsRain
logical,	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowIsSnow
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowRainAmount
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowSnowAmount
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowOutDryBulbTemp
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowOutDewPointTemp
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowOutBaroPress
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowOutRelHum
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowWindSpeed
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowWindDir
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowSkyTemp
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowHorizIRSky
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowBeamSolarRad
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowDifSolarRad
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowAlbedo
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:)	::	TomorrowLiquidPrecip
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:,:)	::	DDDBRngModifier
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:,:)	::	DDHumIndModifier
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:,:)	::	DDBeamSolarValues
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:,:)	::	DDDiffuseSolarValues
real(kind=r64),	private,	ALLOCATABLE, DIMENSION (:,:,:)	::	DDSkyTempScheduleValues
integer,	private		::	RptIsRain	=	0
integer,	private		::	RptIsSnow	=	0
integer,	private		::	RptDayType	=	0
real(kind=r64),	private		::	HrAngle	=	0.0d0
real(kind=r64),	private		::	SolarAltitudeAngle	=	0.0d0
real(kind=r64),	private		::	SolarAzimuthAngle	=	0.0d0
real(kind=r64),	private		::	HorizIRSky	=	0.0d0
real(kind=r64),	private		::	TimeStepFraction	=	0.0d0
real(kind=r64),	private,	ALLOCATABLE, DIMENSION(:)	::	SPSiteDryBulbRangeModScheduleValue
real(kind=r64),	private,	ALLOCATABLE, DIMENSION(:)	::	SPSiteHumidityConditionScheduleValue
real(kind=r64),	private,	ALLOCATABLE, DIMENSION(:)	::	SPSiteBeamSolarScheduleValue
real(kind=r64),	private,	ALLOCATABLE, DIMENSION(:)	::	SPSiteDiffuseSolarScheduleValue
real(kind=r64),	private,	ALLOCATABLE, DIMENSION(:)	::	SPSiteSkyTemperatureScheduleValue
integer,	private,	ALLOCATABLE, DIMENSION(:)	::	SPSiteScheduleNamePtr
character(len=16),	private,	ALLOCATABLE, DIMENSION(:)	::	SPSiteScheduleUnits
integer,	private		::	NumSPSiteScheduleNamePtrs	=	0
integer,	private		::	NumMissing	=	0
logical,	private		::	StripCR	=	.false.
real(kind=r64),	private,	ALLOCATABLE, DIMENSION(:)	::	Interpolation
real(kind=r64),	private,	ALLOCATABLE, DIMENSION(:)	::	SolarInterpolation
integer,	private,	DIMENSION(12)	::	EndDayOfMonth	=	(/31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31/)
logical,	private		::	ErrorInWeatherFile	=	.false.
integer,	private		::	LeapYearAdd	=	0
logical,	private		::	DatesShouldBeReset	=	.false.
logical,	private		::	StartDatesCycleShouldBeReset	=	.false.
logical,	private		::	Jan1DatesShouldBeReset	=	.false.

Derived Types

type, private :: EnvironmentData

Components

Type	Visibility	Attributes		Name		Initial
character(len=100),	public		::	Title	=	Blank
character(len=100),	public		::	cKindOfEnvrn	=	Blank
integer,	public		::	KindOfEnvrn	=	0
integer,	public		::	TotalDays	=	0
integer,	public		::	StartJDay	=	0
integer,	public		::	StartMonth	=	0
integer,	public		::	StartDay	=	0
integer,	public		::	StartYear	=	0
integer,	public		::	StartDate	=	0
integer,	public		::	EndMonth	=	0
integer,	public		::	EndDay	=	0
integer,	public		::	EndJDay	=	0
integer,	public		::	EndYear	=	0
integer,	public		::	EndDate	=	0
integer,	public		::	DayOfWeek	=	0
logical,	public		::	UseDST	=	.false.
logical,	public		::	UseHolidays	=	.false.
logical,	public		::	ApplyWeekendRule	=	.false.
logical,	public		::	UseRain	=	.true.
logical,	public		::	UseSnow	=	.true.
integer,	public,	DIMENSION(12)	::	MonWeekDay	=	0
logical,	public		::	SetWeekDays	=	.false.
integer,	public		::	NumSimYears	=	1
integer,	public		::	CurrentCycle	=	0
integer,	public		::	WP_Type1	=	0
integer,	public		::	CurrentYear	=	0
logical,	public		::	IsLeapYear	=	.false.
logical,	public		::	RollDayTypeOnRepeat	=	.true.
logical,	public		::	TreatYearsAsConsecutive	=	.true.
logical,	public		::	MatchYear	=	.false.
logical,	public		::	ActualWeather	=	.false.
integer,	public		::	RawSimDays	=	0

type, private :: DesignDayData

Components

Type	Visibility		Name		Initial
character(len=MaxNameLength),	public	::	Title	=	Blank
real(kind=r64),	public	::	MaxDryBulb	=	0.0d0
real(kind=r64),	public	::	DailyDBRange	=	0.0d0
real(kind=r64),	public	::	HumIndValue	=	0.0d0
integer,	public	::	HumIndType	=	0
real(kind=r64),	public	::	PressBarom	=	0.0d0
real(kind=r64),	public	::	WindSpeed	=	0.0d0
real(kind=r64),	public	::	WindDir	=	0.0d0
real(kind=r64),	public	::	SkyClear	=	0.0d0
integer,	public	::	RainInd	=	0
integer,	public	::	SnowInd	=	0
integer,	public	::	DayOfMonth	=	0
integer,	public	::	Month	=	0
integer,	public	::	DayType	=	0
integer,	public	::	DSTIndicator	=	0
integer,	public	::	SolarModel	=	0
integer,	public	::	DBTempRangeType	=	0
integer,	public	::	TempRangeSchPtr	=	0
integer,	public	::	HumIndSchPtr	=	0
integer,	public	::	BeamSolarSchPtr	=	0
integer,	public	::	DiffuseSolarSchPtr	=	0
real(kind=r64),	public	::	TauB	=	0.0d0
real(kind=r64),	public	::	TauD	=	0.0d0
real(kind=r64),	public	::	DailyWBRange	=	0.0d0
logical,	public	::	PressureEntered	=	.false.
logical,	public	::	DewPointNeedsSet	=	.false.

type, private :: RunPeriodData

Components

Type	Visibility	Attributes		Name		Initial
character(len=MaxNameLength),	public		::	Title	=	Blank
character(len=MaxNameLength),	public		::	PeriodType	=	Blank
integer,	public		::	TotalDays	=	0
integer,	public		::	StartMonth	=	1
integer,	public		::	StartDay	=	1
integer,	public		::	StartDate	=	0
integer,	public		::	StartYear	=	0
integer,	public		::	EndMonth	=	12
integer,	public		::	EndDay	=	31
integer,	public		::	EndDate	=	0
integer,	public		::	EndYear	=	0
integer,	public		::	DayOfWeek	=	0
logical,	public		::	UseDST	=	.false.
logical,	public		::	UseHolidays	=	.false.
logical,	public		::	ApplyWeekendRule	=	.false.
logical,	public		::	UseRain	=	.true.
logical,	public		::	UseSnow	=	.true.
integer,	public,	DIMENSION(12)	::	MonWeekDay	=	0
integer,	public		::	NumSimYears	=	1
integer,	public		::	BeginYear	=	0
logical,	public		::	IsLeapYear	=	.false.
logical,	public		::	RollDayTypeOnRepeat	=	.true.
logical,	public		::	TreatYearsAsConsecutive	=	.true.
logical,	public		::	ActualWeather	=	.false.

type, private :: DayWeatherVariables

Components

Type	Visibility		Name		Initial
integer,	public	::	DayOfYear	=	0
integer,	public	::	Year	=	0
integer,	public	::	Month	=	0
integer,	public	::	DayOfMonth	=	0
integer,	public	::	DayOfWeek	=	0
integer,	public	::	DaylightSavingIndex	=	0
integer,	public	::	HolidayIndex	=	0
real(kind=r64),	public	::	SinSolarDeclinAngle	=	0.0d0
real(kind=r64),	public	::	CosSolarDeclinAngle	=	0.0d0
real(kind=r64),	public	::	EquationOfTime	=	0.0d0

type, private :: SpecialDayData

Components

Type	Visibility		Name		Initial
character(len=MaxNameLength),	public	::	Name	=	Blank
integer,	public	::	DateType	=	0
integer,	public	::	Month	=	0
integer,	public	::	Day	=	0
integer,	public	::	WeekDay	=	0
integer,	public	::	CompDate	=	0
logical,	public	::	WthrFile	=	.false.
integer,	public	::	Duration	=	0
integer,	public	::	DayType	=	0
integer,	public	::	ActStMon	=	0
integer,	public	::	ActStDay	=	0
logical,	public	::	Used	=	.false.

type, private :: DataPeriodData

Components

Type	Visibility	Attributes		Name		Initial
character(len=MaxNameLength),	public		::	Name	=	Blank
character(len=10),	public		::	DayOfWeek	=	Blank
integer,	public		::	NumYearsData	=	1
integer,	public		::	WeekDay	=	0
integer,	public		::	StMon	=	0
integer,	public		::	StDay	=	0
integer,	public		::	StYear	=	0
integer,	public		::	EnMon	=	0
integer,	public		::	EnDay	=	0
integer,	public		::	EnYear	=	0
integer,	public		::	NumDays	=	0
integer,	public,	DIMENSION(12)	::	MonWeekDay	=	0
integer,	public		::	DataStJDay	=	0
integer,	public		::	DataEnJDay	=	0
logical,	public		::	HasYearData	=	.false.

type, private :: DaylightSavingPeriodData

Components

Type	Visibility		Name
integer,	public	::	StDateType	=
integer,	public	::	StWeekDay	=
integer,	public	::	StMon	=
integer,	public	::	StDay	=
integer,	public	::	EnDateType	=
integer,	public	::	EnMon	=
integer,	public	::	EnDay	=
integer,	public	::	EnWeekDay	=

type, private :: MissingData

Components

Type	Visibility		Name		Initial
real(kind=r64),	public	::	DryBulb	=	0.0d0
real(kind=r64),	public	::	DewPoint	=	0.0d0
integer,	public	::	RelHumid	=	0
real(kind=r64),	public	::	StnPres	=	0.0d0
integer,	public	::	WindDir	=	0
real(kind=r64),	public	::	WindSpd	=	0.0d0
integer,	public	::	TotSkyCvr	=	0
integer,	public	::	OpaqSkyCvr	=	0
real(kind=r64),	public	::	Visibility	=	0.0d0
integer,	public	::	Ceiling	=	0
integer,	public	::	PrecipWater	=	0
real(kind=r64),	public	::	AerOptDepth	=	0.0d0
integer,	public	::	SnowDepth	=	0
integer,	public	::	DaysLastSnow	=	0
real(kind=r64),	public	::	Albedo	=	0.0d0
real(kind=r64),	public	::	LiquidPrecip	=	0.0d0

type, private :: MissingDataCounts

Components

Type	Visibility		Name
integer,	public	::	DryBulb	=
integer,	public	::	DewPoint	=
integer,	public	::	RelHumid	=
integer,	public	::	StnPres	=
integer,	public	::	WindDir	=
integer,	public	::	WindSpd	=
integer,	public	::	DirectRad	=
integer,	public	::	DiffuseRad	=
integer,	public	::	TotSkyCvr	=
integer,	public	::	OpaqSkyCvr	=
integer,	public	::	Visibility	=
integer,	public	::	Ceiling	=
integer,	public	::	PrecipWater	=
integer,	public	::	AerOptDepth	=
integer,	public	::	SnowDepth	=
integer,	public	::	DaysLastSnow	=
integer,	public	::	WeathCodes	=
integer,	public	::	Albedo	=
integer,	public	::	LiquidPrecip	=

type, private :: RangeDataCounts

Components

Type	Visibility		Name
integer,	public	::	DryBulb	=
integer,	public	::	DewPoint	=
integer,	public	::	RelHumid	=
integer,	public	::	StnPres	=
integer,	public	::	WindDir	=
integer,	public	::	WindSpd	=
integer,	public	::	DirectRad	=
integer,	public	::	DiffuseRad	=

type, private :: TypicalExtremeData

Components

Type	Visibility		Name		Initial
character(len=MaxNameLength),	public	::	Title	=	Blank
character(len=20),	public	::	ShortTitle	=	Blank
character(len=20),	public	::	MatchValue	=	Blank
character(len=20),	public	::	MatchValue1	=	Blank
character(len=20),	public	::	MatchValue2	=	Blank
character(len=20),	public	::	TEType	=	Blank
integer,	public	::	TotalDays	=	0
integer,	public	::	StartJDay	=	0
integer,	public	::	StartMonth	=	0
integer,	public	::	StartDay	=	0
integer,	public	::	EndMonth	=	0
integer,	public	::	EndDay	=	0
integer,	public	::	EndJDay	=	0

type, private :: WeatherProperties

Components

Type	Visibility		Name		Initial
character(len=MaxNameLength),	public	::	Name	=	Blank
character(len=MaxNameLength),	public	::	ScheduleName	=	Blank
logical,	public	::	IsSchedule	=	.true.
integer,	public	::	CalculationType	=	0
integer,	public	::	SchedulePtr	=	0
logical,	public	::	UsedForEnvrn	=	.false.

Functions

private function AirMass(CosZen)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=r64),	intent(in)			::	CosZen

Return Value real(kind=r64)

private function GetSTM(Longitude)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=r64),	intent(in)			::	Longitude

Return Value real(kind=r64)

private function IsLeapYear(Year) result(YesNo)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	Year

Return Value logical

private function CalculateDayOfWeek(JulianDate) result(dayOfWeek)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	JulianDate

Return Value integer

Subroutines

public subroutine ManageWeather()

Arguments

None

public subroutine ResetEnvironmentCounter()

Arguments

None

public subroutine GetNextEnvironment(Available, ErrorsFound)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(out)			::	Available
logical,	intent(inout)			::	ErrorsFound

private subroutine SetupWeekDaysByMonth(StMon, StDay, StWeekDay, Weekdays)

Arguments

Type	Intent	Attributes		Name
integer,	intent(in)		::	StMon
integer,	intent(in)		::	StDay
integer,	intent(in)		::	StWeekDay
integer,	intent(inout),	DIMENSION(12)	::	Weekdays

private subroutine ResetWeekDaysByMonth(Weekdays, LeapYearAdd, StartMonth, StartMonthDay, EndMonth, EndMonthDay, Rollover, MidSimReset)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout),		DIMENSION(12)	::	Weekdays
integer,	intent(in)			::	LeapYearAdd
integer,	intent(in)			::	StartMonth
integer,	intent(in)			::	StartMonthDay
integer,	intent(in)			::	EndMonth
integer,	intent(in)			::	EndMonthDay
logical,	intent(in)			::	Rollover
logical,	intent(in),	optional		::	MidSimReset

private subroutine SetDSTDateRanges(MonWeekDay, DSTIndex, DSTActStMon, DSTActStDay, DSTActEnMon, DSTActEnDay)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout),		DIMENSION(:)	::	MonWeekDay
integer,	intent(inout),		DIMENSION(:)	::	DSTIndex
integer,		optional		::	DSTActStMon
integer,		optional		::	DSTActStDay
integer,		optional		::	DSTActEnMon
integer,		optional		::	DSTActEnDay

private subroutine SetSpecialDayDates(MonWeekDay)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout),		DIMENSION(:)	::	MonWeekDay

private subroutine InitializeWeather(PrintEnvrnStamp)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout)			::	PrintEnvrnStamp

private subroutine UpdateWeatherData()

Arguments

None

private subroutine SetCurrentWeather()

Arguments

None

private subroutine ReadWeatherForDay(DayToRead, Environ, BackSpaceAfterRead)

Arguments

Type		Name
integer	::	DayToRead
integer	::	Environ
logical	::	BackSpaceAfterRead

private subroutine ReadEPlusWeatherForDay(DayToRead, Environ, BackSpaceAfterRead)

Arguments

Type	Intent		Name
integer,	intent(in)	::	DayToRead
integer,	intent(in)	::	Environ
logical,	intent(in)	::	BackSpaceAfterRead

private subroutine InterpretWeatherDataLine(Line, ErrorFound, WYear, WMonth, WDay, Whour, WMinute, RField1, RField2, RField3, RField4, RField5, RField6, RField7, RField8, RField9, RField10, RField11, RField12, RField13, RField14, RField15, RField16, RField17, RField18, RField19, RField20, WObs, WCodesArr, RField22, RField23, RField24, RField25, RField26, RField27)

Arguments

Type	Intent	Attributes		Name
character(len=*),	intent(inout)		::	Line
logical,	intent(out)		::	ErrorFound
integer,	intent(out)		::	WYear
integer,	intent(out)		::	WMonth
integer,	intent(out)		::	WDay
integer,	intent(out)		::	Whour
integer,	intent(out)		::	WMinute
real(kind=r64),	intent(out)		::	RField1
real(kind=r64),	intent(out)		::	RField2
real(kind=r64),	intent(out)		::	RField3
real(kind=r64),	intent(out)		::	RField4
real(kind=r64),	intent(out)		::	RField5
real(kind=r64),	intent(out)		::	RField6
real(kind=r64),	intent(out)		::	RField7
real(kind=r64),	intent(out)		::	RField8
real(kind=r64),	intent(out)		::	RField9
real(kind=r64),	intent(out)		::	RField10
real(kind=r64),	intent(out)		::	RField11
real(kind=r64),	intent(out)		::	RField12
real(kind=r64),	intent(out)		::	RField13
real(kind=r64),	intent(out)		::	RField14
real(kind=r64),	intent(out)		::	RField15
real(kind=r64),	intent(out)		::	RField16
real(kind=r64),	intent(out)		::	RField17
real(kind=r64),	intent(out)		::	RField18
real(kind=r64),	intent(out)		::	RField19
real(kind=r64),	intent(out)		::	RField20
integer,	intent(out)		::	WObs
integer,	intent(out),	DIMENSION(9)	::	WCodesArr
real(kind=r64),	intent(out)		::	RField22
real(kind=r64),	intent(out)		::	RField23
real(kind=r64),	intent(out)		::	RField24
real(kind=r64),	intent(out)		::	RField25
real(kind=r64),	intent(out)		::	RField26
real(kind=r64),	intent(out)		::	RField27

private subroutine SetUpDesignDay(EnvrnNum)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	EnvrnNum

private subroutine ASHRAETauModel(ETR, CosZen, TauB, TauD, IDirN, IDifH, IGlbH)

Arguments

Type	Intent		Name
real(kind=r64),	intent(in)	::	ETR
real(kind=r64),	intent(in)	::	CosZen
real(kind=r64),	intent(in)	::	TauB
real(kind=r64),	intent(in)	::	TauD
real(kind=r64),	intent(out)	::	IDirN
real(kind=r64),	intent(out)	::	IDifH
real(kind=r64),	intent(out)	::	IGlbH

private subroutine AllocateWeatherData()

Arguments

None

private subroutine CalculateDailySolarCoeffs(DayOfYear, A, B, C, AnnVarSolConstant, EquationOfTime, SineSolarDeclination, CosineSolarDeclination)

Arguments

Type	Intent		Name
integer,	intent(in)	::	DayOfYear
real(kind=r64),	intent(out)	::	A
real(kind=r64),	intent(out)	::	B
real(kind=r64),	intent(out)	::	C
real(kind=r64),	intent(out)	::	AnnVarSolConstant
real(kind=r64),	intent(out)	::	EquationOfTime
real(kind=r64),	intent(out)	::	SineSolarDeclination
real(kind=r64),	intent(out)	::	CosineSolarDeclination

private subroutine CalculateSunDirectionCosines(TimeValue, EqOfTime, SinSolDeclin, CosSolDeclin, SUNCOS)

Arguments

Type	Intent		Name
real(kind=r64),	intent(in)	::	TimeValue
real(kind=r64),	intent(in)	::	EqOfTime
real(kind=r64),	intent(in)	::	SinSolDeclin
real(kind=r64),	intent(in)	::	CosSolDeclin
real(kind=r64),	intent(out)	::	SUNCOS(3)

private subroutine DetermineSunUpDown(SunDirectionCosines)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=r64),	intent(out),		DIMENSION(3)	::	SunDirectionCosines

private subroutine OpenWeatherFile(ErrorsFound)

Arguments

Type	Intent	Optional	Attributes		Name
logical				::	ErrorsFound

private subroutine OpenEPlusWeatherFile(ErrorsFound, ProcessHeader)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout)			::	ErrorsFound
logical,	intent(in)			::	ProcessHeader

private subroutine CloseWeatherFile()

Arguments

None

private subroutine ResolveLocationInformation(ErrorsFound)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout)			::	ErrorsFound

private subroutine CheckLocationValidity()

Arguments

None

private subroutine CheckWeatherFileValidity()

Arguments

None

private subroutine ReportOutputFileHeaders()

Arguments

None

private subroutine ReportWeatherAndTimeInformation(PrintEnvrnStamp)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout)			::	PrintEnvrnStamp

private subroutine ReadUserWeatherInput()

Arguments

None

private subroutine GetRunPeriodData(TotRunPers, ErrorsFound)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	TotRunPers
logical,	intent(inout)			::	ErrorsFound

private subroutine GetRunPeriodDesignData(ErrorsFound)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout)			::	ErrorsFound

private subroutine GetSpecialDayPeriodData(ErrorsFound)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout)			::	ErrorsFound

private subroutine CalcSpecialDayTypes()

Arguments

None

private subroutine GetDSTData(ErrorsFound)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout)			::	ErrorsFound

private subroutine GetDesignDayData(TotDesDays, ErrorsFound)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	TotDesDays
logical,	intent(inout)			::	ErrorsFound

private subroutine GetLocationInfo(ErrorsFound)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout)			::	ErrorsFound

private subroutine GetWeatherProperties(ErrorsFound)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout)			::	ErrorsFound

private subroutine GetGroundTemps(ErrorsFound)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout)			::	ErrorsFound

private subroutine GetGroundReflectances(ErrorsFound)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout)			::	ErrorsFound

private subroutine GetSnowGroundRefModifiers(ErrorsFound)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout)			::	ErrorsFound

private subroutine GetWaterMainsTemperatures(ErrorsFound)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout)			::	ErrorsFound

private subroutine CalcWaterMainsTemp()

Arguments

None

private subroutine GetWeatherStation(ErrorsFound)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout)			::	ErrorsFound

private subroutine DayltgCurrentExtHorizIllum()

Arguments

None

private subroutine DayltgLuminousEfficacy(DiffLumEff, DirLumEff)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=r64)				::	DiffLumEff
real(kind=r64)				::	DirLumEff

private subroutine ProcessEPWHeader(HeaderString, Line, ErrorsFound)

Arguments

Type	Intent		Name
character(len=*),	intent(in)	::	HeaderString
character(len=*),	intent(inout)	::	Line
logical,	intent(inout)	::	ErrorsFound

private subroutine SkipEPlusWFHeader()

Arguments

None

private subroutine ReportMissing_RangeData()

Arguments

None

private subroutine SetupInterpolationValues()

Arguments

None

private subroutine SetupEnvironmentTypes()

Arguments

None

private subroutine JGDate(jflag, jdate, gyyyy, gmm, gdd)

Arguments

Type		Name
integer	::	jflag
integer	::	jdate
integer	::	gyyyy
integer	::	gmm
integer	::	gdd

All Modules

AirflowNetworkBalanceManager AirflowNetworkSolver BaseboardElectric BaseboardRadiator Boilers BoilerSteam BranchInputManager BranchNodeConnections ChillerAbsorption ChillerElectricEIR ChillerExhaustAbsorption ChillerGasAbsorption ChillerIndirectAbsorption ChillerReformulatedEIR CondenserLoopTowers ConductionTransferFunctionCalc ConvectionCoefficients CoolTower CostEstimateManager CrossVentMgr CTElectricGenerator CurveManager DataAirflowNetwork DataAirLoop DataAirSystems DataBranchAirLoopPlant DataBranchNodeConnections DataBSDFWindow DataComplexFenestration DataContaminantBalance DataConvergParams DataConversions DataCostEstimate DataDaylighting DataDaylightingDevices DataDefineEquip DataDElight DataEnvironment DataErrorTracking DataGenerators DataGlobalConstants DataGlobals DataHeatBalance DataHeatBalFanSys DataHeatBalSurface DataHVACControllers DataHVACGlobals DataInterfaces DataIPShortCuts DataLoopNode DataMoistureBalance DataMoistureBalanceEMPD DataOutputs DataPhotovoltaics DataPlant DataPlantPipingSystems DataPrecisionGlobals DataReportingFlags DataRoomAirModel DataRootFinder DataRuntimeLanguage DataShadowingCombinations DataSizing DataStringGlobals DataSurfaceColors DataSurfaceLists DataSurfaces DataSystemVariables DataTimings DataUCSDSharedData DataVectorTypes DataViewFactorInformation DataWater DataWindowEquivalentLayer DataZoneControls DataZoneEnergyDemands DataZoneEquipment DaylightingDevices DaylightingManager DELIGHTMANAGERF DELIGHTMANAGERF DemandManager DesiccantDehumidifiers DirectAirManager DisplacementVentMgr DualDuct DXCoils DXFEarClipping EarthTube EconomicLifeCycleCost EconomicTariff EcoRoofManager ElectricBaseboardRadiator EMSManager EvaporativeCoolers EvaporativeFluidCoolers ExteriorEnergyUse ExternalInterface FanCoilUnits Fans FaultsManager FluidCoolers FluidProperties FuelCellElectricGenerator Furnaces General GeneratorDynamicsManager GeneratorFuelSupply GlobalNames GroundHeatExchangers HeatBalanceAirManager HeatBalanceHAMTManager HeatBalanceIntRadExchange HeatBalanceManager HeatBalanceMovableInsulation HeatBalanceSurfaceManager HeatBalFiniteDiffManager HeatingCoils HeatPumpWaterToWaterCOOLING HeatPumpWaterToWaterHEATING HeatPumpWaterToWaterSimple HeatRecovery HighTempRadiantSystem Humidifiers HVACControllers HVACCooledBeam HVACDuct HVACDXHeatPumpSystem HVACDXSystem HVACHXAssistedCoolingCoil HVACInterfaceManager HVACManager HVACMultiSpeedHeatPump HVACSingleDuctInduc HVACStandAloneERV HVACUnitaryBypassVAV HVACUnitarySystem HVACVariableRefrigerantFlow HWBaseboardRadiator ICEngineElectricGenerator IceThermalStorage InputProcessor InternalHeatGains ISO_C_FUNCTION_BINDING ISO_C_FUNCTION_BINDING LowTempRadiantSystem ManageElectricPower MatrixDataManager MicroCHPElectricGenerator MicroturbineElectricGenerator MixedAir MixerComponent MoistureBalanceEMPDManager MundtSimMgr NodeInputManager NonZoneEquipmentManager OutAirNodeManager OutdoorAirUnit OutputProcessor OutputReportPredefined OutputReportTabular OutsideEnergySources PackagedTerminalHeatPump PackagedThermalStorageCoil Photovoltaics PhotovoltaicThermalCollectors PipeHeatTransfer Pipes PlantCentralGSHP PlantChillers PlantComponentTemperatureSources PlantCondLoopOperation PlantHeatExchangerFluidToFluid PlantLoadProfile PlantLoopEquip PlantLoopSolver PlantManager PlantPipingSystemsManager PlantPressureSystem PlantUtilities PlantValves PollutionModule PondGroundHeatExchanger PoweredInductionUnits Psychrometrics Pumps PurchasedAirManager RefrigeratedCase ReportSizingManager ReturnAirPathManager RoomAirModelManager RoomAirModelUserTempPattern RootFinder RuntimeLanguageProcessor ScheduleManager SetPointManager SimAirServingZones SimulationManager SingleDuct SizingManager SolarCollectors SolarReflectionManager SolarShading SortAndStringUtilities SplitterComponent SQLiteProcedures SQLiteProcedures StandardRatings SteamBaseboardRadiator SteamCoils SurfaceGeometry SurfaceGroundHeatExchanger SystemAvailabilityManager SystemReports TARCOGArgs TARCOGCommon TARCOGDeflection TARCOGGasses90 TARCOGGassesParams TARCOGMain TARCOGOutput TARCOGParams TarcogShading ThermalChimney ThermalComfort ThermalEN673Calc ThermalISO15099Calc TranspiredCollector UFADManager UnitHeater UnitVentilator UserDefinedComponents VariableSpeedCoils vectors VentilatedSlab WaterCoils WaterManager WaterThermalTanks WatertoAirHeatPump WatertoAirHeatPumpSimple WaterUse WeatherManager WindowAC WindowComplexManager WindowEquivalentLayer WindowManager WindTurbine ZoneAirLoopEquipmentManager ZoneContaminantPredictorCorrector ZoneDehumidifier ZoneEquipmentManager ZonePlenum ZoneTempPredictorCorrector

WeatherManager Module

Uses:

Used By

Variables

Derived Types

type, private :: EnvironmentData

Components

type, private :: DesignDayData

Components

type, private :: RunPeriodData

Components

type, private :: DayWeatherVariables

Components

type, private :: SpecialDayData

Components

type, private :: DataPeriodData

Components

type, private :: DaylightSavingPeriodData

Components

type, private :: MissingData

Components

type, private :: MissingDataCounts

Components

type, private :: RangeDataCounts

Components

type, private :: TypicalExtremeData

Components

type, private :: WeatherProperties

Components

Functions

private function AirMass(CosZen)

Arguments

Return Value real(kind=r64)

private function GetSTM(Longitude)

Arguments

Return Value real(kind=r64)

private function IsLeapYear(Year) result(YesNo)

Arguments

Return Value logical

private function CalculateDayOfWeek(JulianDate) result(dayOfWeek)

Arguments

Return Value integer

Subroutines

public subroutine ManageWeather()

Arguments

public subroutine ResetEnvironmentCounter()

Arguments

public subroutine GetNextEnvironment(Available, ErrorsFound)

Arguments

private subroutine SetupWeekDaysByMonth(StMon, StDay, StWeekDay, Weekdays)

Arguments

private subroutine ResetWeekDaysByMonth(Weekdays, LeapYearAdd, StartMonth, StartMonthDay, EndMonth, EndMonthDay, Rollover, MidSimReset)

Arguments

private subroutine SetDSTDateRanges(MonWeekDay, DSTIndex, DSTActStMon, DSTActStDay, DSTActEnMon, DSTActEnDay)

Arguments

private subroutine SetSpecialDayDates(MonWeekDay)

Arguments

private subroutine InitializeWeather(PrintEnvrnStamp)

Arguments

private subroutine UpdateWeatherData()

Arguments

private subroutine SetCurrentWeather()

Arguments

private subroutine ReadWeatherForDay(DayToRead, Environ, BackSpaceAfterRead)

Arguments

private subroutine ReadEPlusWeatherForDay(DayToRead, Environ, BackSpaceAfterRead)

Arguments

Arguments

private subroutine SetUpDesignDay(EnvrnNum)

Arguments

private subroutine ASHRAETauModel(ETR, CosZen, TauB, TauD, IDirN, IDifH, IGlbH)

Arguments

private subroutine AllocateWeatherData()

Arguments

private subroutine CalculateDailySolarCoeffs(DayOfYear, A, B, C, AnnVarSolConstant, EquationOfTime, SineSolarDeclination, CosineSolarDeclination)

Arguments

private subroutine CalculateSunDirectionCosines(TimeValue, EqOfTime, SinSolDeclin, CosSolDeclin, SUNCOS)

Arguments

private subroutine DetermineSunUpDown(SunDirectionCosines)

Arguments