MODI_TEB_GARDEN_STRUCT Module


Contents


Interfaces

interface

  • public subroutine TEB_GARDEN_STRUCT(OGARDEN, OGREENROOF, OSOLAR_PANEL, HZ0H, HIMPLICIT_WIND, HROAD_DIR, HWALL_OPT, TPTIME, PTSUN, PT_CAN, PQ_CAN, PU_CAN, PT_LOWCAN, PQ_LOWCAN, PU_LOWCAN, PZ_LOWCAN, PTI_BLD, PT_ROOF, PT_ROAD, PT_WALL_A, PT_WALL_B, PWS_ROOF, PWS_ROAD, HSNOW_ROOF, PWSNOW_ROOF, PTSNOW_ROOF, PRSNOW_ROOF, PASNOW_ROOF, PTSSNOW_ROOF, PESNOW_ROOF, HSNOW_ROAD, PWSNOW_ROAD, PTSNOW_ROAD, PRSNOW_ROAD, PASNOW_ROAD, PTSSNOW_ROAD, PESNOW_ROAD, PPEW_A_COEF, PPEW_B_COEF, PPEW_A_COEF_LOWCAN, PPEW_B_COEF_LOWCAN, PPS, PPA, PEXNS, PEXNA, PTA, PQA, PRHOA, PCO2, PLW_RAD, PDIR_SW, PSCA_SW, PSW_BANDS, KSW, PZENITH, PAZIM, PRR, PSR, PZREF, PUREF, PVMOD, PH_TRAFFIC, PLE_TRAFFIC, PH_INDUSTRY, PLE_INDUSTRY, PTSTEP, PZ0_TOWN, PBLD, PGARDEN, PROAD_DIR, PROAD, PFRAC_GR, PBLD_HEIGHT, PWALL_O_HOR, PCAN_HW_RATIO, PROAD_O_GRND, PGARDEN_O_GRND, PWALL_O_GRND, PALB_ROOF, PEMIS_ROOF, PHC_ROOF, PTC_ROOF, PD_ROOF, PALB_ROAD, PEMIS_ROAD, PSVF_ROAD, PHC_ROAD, PTC_ROAD, PD_ROAD, PALB_WALL, PEMIS_WALL, PSVF_WALL, PSVF_GARDEN, PHC_WALL, PTC_WALL, PD_WALL, PRN_ROOF, PH_ROOF, PLE_ROOF, PLEW_ROOF, PGFLUX_ROOF, PRUNOFF_ROOF, PRN_ROAD, PH_ROAD, PLE_ROAD, PLEW_ROAD, PGFLUX_ROAD, PRUNOFF_ROAD, PRN_WALL_A, PH_WALL_A, PLE_WALL_A, PGFLUX_WALL_A, PRN_WALL_B, PH_WALL_B, PLE_WALL_B, PGFLUX_WALL_B, PRN_STRLROOF, PH_STRLROOF, PLE_STRLROOF, PGFLUX_STRLROOF, PRUNOFF_STRLROOF, PRN_BLT, PH_BLT, PLE_BLT, PGFLUX_BLT, PRNSNOW_ROOF, PHSNOW_ROOF, PLESNOW_ROOF, PGSNOW_ROOF, PMELT_ROOF, PRNSNOW_ROAD, PHSNOW_ROAD, PLESNOW_ROAD, PGSNOW_ROAD, PMELT_ROAD, PRN_GRND, PH_GRND, PLE_GRND, PGFLUX_GRND, PRN_TOWN, PH_TOWN, PLE_TOWN, PGFLUX_TOWN, PEVAP_TOWN, PRUNOFF_TOWN, PSFCO2, PUW_GRND, PUW_ROOF, PDUWDU_GRND, PDUWDU_ROOF, PUSTAR_TOWN, PCD, PCDN, PCH_TOWN, PRI_TOWN, PTS_TOWN, PEMIS_TOWN, PDIR_ALB_TOWN, PSCA_ALB_TOWN, PRESA_TOWN, PDQS_TOWN, PQF_TOWN, PQF_BLD, PFLX_BLD, PAC_ROAD, PAC_GARDEN, PAC_GREENROOF, PAC_ROAD_WAT, PAC_GARDEN_WAT, PAC_GREENROOF_WAT, PABS_SW_ROOF, PABS_LW_ROOF, PABS_SW_SNOW_ROOF, PABS_LW_SNOW_ROOF, PABS_SW_ROAD, PABS_LW_ROAD, PABS_SW_SNOW_ROAD, PABS_LW_SNOW_ROAD, PABS_SW_WALL_A, PABS_LW_WALL_A, PABS_SW_WALL_B, PABS_LW_WALL_B, PABS_SW_PANEL, PABS_LW_PANEL, PABS_SW_GARDEN, PABS_LW_GARDEN, PABS_SW_GREENROOF, PABS_LW_GREENROOF, PG_GREENROOF_ROOF, HCOOL_COIL, PF_WATER_COND, HHEAT_COIL, HNATVENT, PNATVENT, KDAY, PAUX_MAX, PT_FLOOR, PT_MASS, PH_BLD_COOL, PT_BLD_COOL, PH_BLD_HEAT, PLE_BLD_COOL, PLE_BLD_HEAT, PH_WASTE, PLE_WASTE, PF_WASTE_CAN, PHVAC_COOL, PHVAC_HEAT, PQIN, PQIN_FRAD, PQIN_FLAT, PGR, PEFF_HEAT, PINF, PTCOOL_TARGET, PTHEAT_TARGET, PHR_TARGET, PT_WIN2, PQI_BLD, PV_VENT, PCAP_SYS_HEAT, PCAP_SYS_RAT, PT_ADP, PM_SYS_RAT, PCOP_RAT, PCAP_SYS, PM_SYS, PCOP, PQ_SYS, PT_SYS, PTR_SW_WIN, PFAN_POWER, PHC_FLOOR, PTC_FLOOR, PD_FLOOR, PT_WIN1, PABS_SW_WIN, PABS_LW_WIN, PSHGC, PSHGC_SH, PUGG_WIN, PALB_WIN, PABS_WIN, PEMIT_LW_FAC, PEMIT_LW_GRND, PT_RAD_IND, PREF_SW_GRND, PREF_SW_FAC, PHU_BLD, PTIME, OSHADE, PSHADE, OSHAD_DAY, ONATVENT_NIGHT, HBEM, PN_FLOOR, PWALL_O_BLD, PGLAZ_O_BLD, PMASS_O_BLD, PFLOOR_HW_RATIO, PF_FLOOR_MASS, PF_FLOOR_WALL, PF_FLOOR_WIN, PF_FLOOR_ROOF, PF_WALL_FLOOR, PF_WALL_MASS, PF_WALL_WIN, PF_WIN_FLOOR, PF_WIN_MASS, PF_WIN_WALL, PF_MASS_FLOOR, PF_MASS_WALL, PF_MASS_WIN, OCANOPY, PTRAN_WIN, HCH_BEM, PROUGH_ROOF, PROUGH_WALL, PF_WIN_WIN, OPAR_RD_IRRIG, PRD_START_MONTH, PRD_END_MONTH, PRD_START_HOUR, PRD_END_HOUR, PRD_24H_IRRIG, PIRRIG_ROAD, PEMIS_PANEL, PALB_PANEL, PEFF_PANEL, PFRAC_PANEL, PRESIDENTIAL, PTHER_PROD_PANEL, PPHOT_PROD_PANEL, PPROD_PANEL, PTHER_PROD_BLD, PPHOT_PROD_BLD, PPROD_BLD, PTHER_PRODC_DAY, PH_PANEL, PRN_PANEL, PDT_RES, PDT_OFF, PCUR_TCOOL_TARGET, PCUR_THEAT_TARGET, PCUR_QIN)

    Arguments

    Type IntentOptional AttributesName
    logical, intent(in) :: OGARDEN
    logical, intent(in) :: OGREENROOF
    logical, intent(in) :: OSOLAR_PANEL
    character(len=6), intent(in) :: HZ0H
    character(len=*), intent(in) :: HIMPLICIT_WIND
    character(len=4), intent(in) :: HROAD_DIR
    character(len=4), intent(in) :: HWALL_OPT
    type(DATE_TIME), intent(in) :: TPTIME
    real, intent(in), DIMENSION(:):: PTSUN
    real, intent(inout), DIMENSION(:):: PT_CAN
    real, intent(inout), DIMENSION(:):: PQ_CAN
    real, intent(in), DIMENSION(:):: PU_CAN
    real, intent(in), DIMENSION(:):: PT_LOWCAN
    real, intent(in), DIMENSION(:):: PQ_LOWCAN
    real, intent(in), DIMENSION(:):: PU_LOWCAN
    real, intent(in), DIMENSION(:):: PZ_LOWCAN
    real, intent(inout), DIMENSION(:):: PTI_BLD
    real, intent(inout), DIMENSION(:,:):: PT_ROOF
    real, intent(inout), DIMENSION(:,:):: PT_ROAD
    real, intent(inout), DIMENSION(:,:):: PT_WALL_A
    real, intent(inout), DIMENSION(:,:):: PT_WALL_B
    real, intent(inout), DIMENSION(:):: PWS_ROOF
    real, intent(inout), DIMENSION(:):: PWS_ROAD
    character(len=*), intent(in) :: HSNOW_ROOF
    real, intent(inout), DIMENSION(:,:):: PWSNOW_ROOF
    real, intent(inout), DIMENSION(:,:):: PTSNOW_ROOF
    real, intent(inout), DIMENSION(:,:):: PRSNOW_ROOF
    real, intent(inout), DIMENSION(:):: PASNOW_ROOF
    real, intent(inout), DIMENSION(:):: PTSSNOW_ROOF
    real, intent(inout), DIMENSION(:):: PESNOW_ROOF
    character(len=*), intent(in) :: HSNOW_ROAD
    real, intent(inout), DIMENSION(:,:):: PWSNOW_ROAD
    real, intent(inout), DIMENSION(:,:):: PTSNOW_ROAD
    real, intent(inout), DIMENSION(:,:):: PRSNOW_ROAD
    real, intent(inout), DIMENSION(:):: PASNOW_ROAD
    real, intent(inout), DIMENSION(:):: PTSSNOW_ROAD
    real, intent(inout), DIMENSION(:):: PESNOW_ROAD
    real, intent(in), DIMENSION(:):: PPEW_A_COEF
    real, intent(in), DIMENSION(:):: PPEW_B_COEF
    real, intent(in), DIMENSION(:):: PPEW_A_COEF_LOWCAN
    real, intent(in), DIMENSION(:):: PPEW_B_COEF_LOWCAN
    real, intent(in), DIMENSION(:):: PPS
    real, intent(in), DIMENSION(:):: PPA
    real, intent(in), DIMENSION(:):: PEXNS
    real, intent(in), DIMENSION(:):: PEXNA
    real, intent(in), DIMENSION(:):: PTA
    real, intent(in), DIMENSION(:):: PQA
    real, intent(in), DIMENSION(:):: PRHOA
    real, intent(in), DIMENSION(:):: PCO2
    real, intent(in), DIMENSION(:):: PLW_RAD
    real, intent(in), DIMENSION(:,:):: PDIR_SW
    real, intent(in), DIMENSION(:,:):: PSCA_SW
    real, intent(in), DIMENSION(:):: PSW_BANDS
    integer, intent(in) :: KSW
    real, intent(in), DIMENSION(:):: PZENITH
    real, intent(in), DIMENSION(:):: PAZIM
    real, intent(in), DIMENSION(:):: PRR
    real, intent(in), DIMENSION(:):: PSR
    real, intent(in), DIMENSION(:):: PZREF
    real, intent(in), DIMENSION(:):: PUREF
    real, intent(in), DIMENSION(:):: PVMOD
    real, intent(in), DIMENSION(:):: PH_TRAFFIC
    real, intent(in), DIMENSION(:):: PLE_TRAFFIC
    real, intent(in), DIMENSION(:):: PH_INDUSTRY
    real, intent(in), DIMENSION(:):: PLE_INDUSTRY
    real, intent(in) :: PTSTEP
    real, intent(in), DIMENSION(:):: PZ0_TOWN
    real, intent(in), DIMENSION(:):: PBLD
    real, intent(in), DIMENSION(:):: PGARDEN
    real, intent(in), DIMENSION(:):: PROAD_DIR
    real, intent(in), DIMENSION(:):: PROAD
    real, intent(in), DIMENSION(:):: PFRAC_GR
    real, intent(in), DIMENSION(:):: PBLD_HEIGHT
    real, intent(in), DIMENSION(:):: PWALL_O_HOR
    real, intent(in), DIMENSION(:):: PCAN_HW_RATIO
    real, intent(in), DIMENSION(:):: PROAD_O_GRND
    real, intent(in), DIMENSION(:):: PGARDEN_O_GRND
    real, intent(in), DIMENSION(:):: PWALL_O_GRND
    real, intent(in), DIMENSION(:):: PALB_ROOF
    real, intent(in), DIMENSION(:):: PEMIS_ROOF
    real, intent(in), DIMENSION(:,:):: PHC_ROOF
    real, intent(in), DIMENSION(:,:):: PTC_ROOF
    real, intent(in), DIMENSION(:,:):: PD_ROOF
    real, intent(in), DIMENSION(:):: PALB_ROAD
    real, intent(in), DIMENSION(:):: PEMIS_ROAD
    real, intent(in), DIMENSION(:):: PSVF_ROAD
    real, intent(in), DIMENSION(:,:):: PHC_ROAD
    real, intent(in), DIMENSION(:,:):: PTC_ROAD
    real, intent(in), DIMENSION(:,:):: PD_ROAD
    real, intent(in), DIMENSION(:):: PALB_WALL
    real, intent(in), DIMENSION(:):: PEMIS_WALL
    real, intent(in), DIMENSION(:):: PSVF_WALL
    real, intent(in), DIMENSION(:):: PSVF_GARDEN
    real, intent(in), DIMENSION(:,:):: PHC_WALL
    real, intent(in), DIMENSION(:,:):: PTC_WALL
    real, intent(in), DIMENSION(:,:):: PD_WALL
    real, intent(out), DIMENSION(:):: PRN_ROOF
    real, intent(out), DIMENSION(:):: PH_ROOF
    real, intent(out), DIMENSION(:):: PLE_ROOF
    real, intent(out), DIMENSION(:):: PLEW_ROOF
    real, intent(out), DIMENSION(:):: PGFLUX_ROOF
    real, intent(out), DIMENSION(:):: PRUNOFF_ROOF
    real, intent(out), DIMENSION(:):: PRN_ROAD
    real, intent(out), DIMENSION(:):: PH_ROAD
    real, intent(out), DIMENSION(:):: PLE_ROAD
    real, intent(out), DIMENSION(:):: PLEW_ROAD
    real, intent(out), DIMENSION(:):: PGFLUX_ROAD
    real, intent(out), DIMENSION(:):: PRUNOFF_ROAD
    real, intent(out), DIMENSION(:):: PRN_WALL_A
    real, intent(out), DIMENSION(:):: PH_WALL_A
    real, intent(out), DIMENSION(:):: PLE_WALL_A
    real, intent(out), DIMENSION(:):: PGFLUX_WALL_A
    real, intent(out), DIMENSION(:):: PRN_WALL_B
    real, intent(out), DIMENSION(:):: PH_WALL_B
    real, intent(out), DIMENSION(:):: PLE_WALL_B
    real, intent(out), DIMENSION(:):: PGFLUX_WALL_B
    real, intent(out), DIMENSION(:):: PRN_STRLROOF
    real, intent(out), DIMENSION(:):: PH_STRLROOF
    real, intent(out), DIMENSION(:):: PLE_STRLROOF
    real, intent(out), DIMENSION(:):: PGFLUX_STRLROOF
    real, intent(out), DIMENSION(:):: PRUNOFF_STRLROOF
    real, intent(out), DIMENSION(:):: PRN_BLT
    real, intent(out), DIMENSION(:):: PH_BLT
    real, intent(out), DIMENSION(:):: PLE_BLT
    real, intent(out), DIMENSION(:):: PGFLUX_BLT
    real, intent(out), DIMENSION(:):: PRNSNOW_ROOF
    real, intent(out), DIMENSION(:):: PHSNOW_ROOF
    real, intent(out), DIMENSION(:):: PLESNOW_ROOF
    real, intent(out), DIMENSION(:):: PGSNOW_ROOF
    real, intent(out), DIMENSION(:):: PMELT_ROOF
    real, intent(out), DIMENSION(:):: PRNSNOW_ROAD
    real, intent(out), DIMENSION(:):: PHSNOW_ROAD
    real, intent(out), DIMENSION(:):: PLESNOW_ROAD
    real, intent(out), DIMENSION(:):: PGSNOW_ROAD
    real, intent(out), DIMENSION(:):: PMELT_ROAD
    real, intent(out), DIMENSION(:):: PRN_GRND
    real, intent(out), DIMENSION(:):: PH_GRND
    real, intent(out), DIMENSION(:):: PLE_GRND
    real, intent(out), DIMENSION(:):: PGFLUX_GRND
    real, intent(out), DIMENSION(:):: PRN_TOWN
    real, intent(out), DIMENSION(:):: PH_TOWN
    real, intent(out), DIMENSION(:):: PLE_TOWN
    real, intent(out), DIMENSION(:):: PGFLUX_TOWN
    real, intent(out), DIMENSION(:):: PEVAP_TOWN
    real, intent(out), DIMENSION(:):: PRUNOFF_TOWN
    real, intent(out), DIMENSION(:):: PSFCO2
    real, intent(out), DIMENSION(:):: PUW_GRND
    real, intent(out), DIMENSION(:):: PUW_ROOF
    real, intent(out), DIMENSION(:):: PDUWDU_GRND
    real, intent(out), DIMENSION(:):: PDUWDU_ROOF
    real, intent(out), DIMENSION(:):: PUSTAR_TOWN
    real, intent(out), DIMENSION(:):: PCD
    real, intent(out), DIMENSION(:):: PCDN
    real, intent(out), DIMENSION(:):: PCH_TOWN
    real, intent(out), DIMENSION(:):: PRI_TOWN
    real, intent(out), DIMENSION(:):: PTS_TOWN
    real, intent(out), DIMENSION(:):: PEMIS_TOWN
    real, intent(out), DIMENSION(:):: PDIR_ALB_TOWN
    real, intent(out), DIMENSION(:):: PSCA_ALB_TOWN
    real, intent(out), DIMENSION(:):: PRESA_TOWN
    real, intent(out), DIMENSION(:):: PDQS_TOWN
    real, intent(out), DIMENSION(:):: PQF_TOWN
    real, intent(out), DIMENSION(:):: PQF_BLD
    real, intent(out), DIMENSION(:):: PFLX_BLD
    real, intent(out), DIMENSION(:):: PAC_ROAD
    real, intent(out), DIMENSION(:):: PAC_GARDEN
    real, intent(out), DIMENSION(:):: PAC_GREENROOF
    real, intent(out), DIMENSION(:):: PAC_ROAD_WAT
    real, intent(out), DIMENSION(:):: PAC_GARDEN_WAT
    real, intent(out), DIMENSION(:):: PAC_GREENROOF_WAT
    real, intent(out), DIMENSION(:):: PABS_SW_ROOF
    real, intent(out), DIMENSION(:):: PABS_LW_ROOF
    real, intent(out), DIMENSION(:):: PABS_SW_SNOW_ROOF
    real, intent(out), DIMENSION(:):: PABS_LW_SNOW_ROOF
    real, intent(out), DIMENSION(:):: PABS_SW_ROAD
    real, intent(out), DIMENSION(:):: PABS_LW_ROAD
    real, intent(out), DIMENSION(:):: PABS_SW_SNOW_ROAD
    real, intent(out), DIMENSION(:):: PABS_LW_SNOW_ROAD
    real, intent(out), DIMENSION(:):: PABS_SW_WALL_A
    real, intent(out), DIMENSION(:):: PABS_LW_WALL_A
    real, intent(out), DIMENSION(:):: PABS_SW_WALL_B
    real, intent(out), DIMENSION(:):: PABS_LW_WALL_B
    real, intent(out), DIMENSION(:):: PABS_SW_PANEL
    real, intent(out), DIMENSION(:):: PABS_LW_PANEL
    real, intent(out), DIMENSION(:):: PABS_SW_GARDEN
    real, intent(out), DIMENSION(:):: PABS_LW_GARDEN
    real, intent(out), DIMENSION(:):: PABS_SW_GREENROOF
    real, intent(out), DIMENSION(:):: PABS_LW_GREENROOF
    real, intent(out), DIMENSION(:):: PG_GREENROOF_ROOF
    character(len=12), intent(in) :: HCOOL_COIL
    real, intent(in), DIMENSION(:):: PF_WATER_COND
    character(len=6), intent(in) :: HHEAT_COIL
    character(len=4), intent(in), DIMENSION(:):: HNATVENT
    real, intent(in), DIMENSION(:):: PNATVENT
    integer, intent(in) :: KDAY
    real, intent(inout), DIMENSION(:):: PAUX_MAX
    real, intent(inout), DIMENSION(:,:):: PT_FLOOR
    real, intent(inout), DIMENSION(:,:):: PT_MASS
    real, intent(out), DIMENSION(:):: PH_BLD_COOL
    real, intent(out), DIMENSION(:):: PT_BLD_COOL
    real, intent(out), DIMENSION(:):: PH_BLD_HEAT
    real, intent(out), DIMENSION(: ):: PLE_BLD_COOL
    real, intent(out), DIMENSION(:):: PLE_BLD_HEAT
    real, intent(out), DIMENSION(:):: PH_WASTE
    real, intent(out), DIMENSION(:):: PLE_WASTE
    real, intent(in), DIMENSION(:):: PF_WASTE_CAN
    real, intent(out), DIMENSION(:):: PHVAC_COOL
    real, intent(out), DIMENSION(:):: PHVAC_HEAT
    real, intent(in), DIMENSION(:):: PQIN
    real, intent(in), DIMENSION(:):: PQIN_FRAD
    real, intent(in), DIMENSION(:):: PQIN_FLAT
    real, intent(in), DIMENSION(:):: PGR
    real, intent(in), DIMENSION(:):: PEFF_HEAT
    real, intent(in), DIMENSION(:):: PINF
    real, intent(in), DIMENSION(:):: PTCOOL_TARGET
    real, intent(in), DIMENSION(:):: PTHEAT_TARGET
    real, intent(in), DIMENSION(:):: PHR_TARGET
    real, intent(inout), DIMENSION(:):: PT_WIN2
    real, intent(inout), DIMENSION(:):: PQI_BLD
    real, intent(in), DIMENSION(:):: PV_VENT
    real, intent(in), DIMENSION(:):: PCAP_SYS_HEAT
    real, intent(inout), DIMENSION(:):: PCAP_SYS_RAT
    real, intent(in), DIMENSION(:):: PT_ADP
    real, intent(inout), DIMENSION(:):: PM_SYS_RAT
    real, intent(in), DIMENSION(:):: PCOP_RAT
    real, intent(out), DIMENSION(:):: PCAP_SYS
    real, intent(out), DIMENSION(:):: PM_SYS
    real, intent(out), DIMENSION(:):: PCOP
    real, intent(out), DIMENSION(:):: PQ_SYS
    real, intent(out), DIMENSION(:):: PT_SYS
    real, intent(out), DIMENSION(:):: PTR_SW_WIN
    real, intent(out), DIMENSION(:):: PFAN_POWER
    real, intent(in), DIMENSION(:,:):: PHC_FLOOR
    real, intent(in), DIMENSION(:,:):: PTC_FLOOR
    real, intent(in), DIMENSION(:,:):: PD_FLOOR
    real, intent(inout), DIMENSION(:):: PT_WIN1
    real, intent(out), DIMENSION(:):: PABS_SW_WIN
    real, intent(out), DIMENSION(:):: PABS_LW_WIN
    real, intent(in), DIMENSION(:):: PSHGC
    real, intent(in), DIMENSION(:):: PSHGC_SH
    real, intent(in), DIMENSION(:):: PUGG_WIN
    real, intent(out), DIMENSION(:):: PALB_WIN
    real, intent(in), DIMENSION(:):: PABS_WIN
    real, intent(out), DIMENSION(:):: PEMIT_LW_FAC
    real, intent(out), DIMENSION(:):: PEMIT_LW_GRND
    real, intent(out), DIMENSION(:):: PT_RAD_IND
    real, intent(out), DIMENSION(:):: PREF_SW_GRND
    real, intent(out), DIMENSION(:):: PREF_SW_FAC
    real, intent(out), DIMENSION(:):: PHU_BLD
    real, intent(in) :: PTIME
    logical, intent(in), DIMENSION(:):: OSHADE
    real, intent(in), DIMENSION(:):: PSHADE
    logical, intent(inout), DIMENSION(:):: OSHAD_DAY
    logical, intent(inout), DIMENSION(:):: ONATVENT_NIGHT
    character(len=3), intent(in) :: HBEM
    real, intent(in), DIMENSION(:):: PN_FLOOR
    real, intent(in), DIMENSION(:):: PWALL_O_BLD
    real, intent(in), DIMENSION(:):: PGLAZ_O_BLD
    real, intent(in), DIMENSION(:):: PMASS_O_BLD
    real, intent(in), DIMENSION(:):: PFLOOR_HW_RATIO
    real, intent(in), DIMENSION(:):: PF_FLOOR_MASS
    real, intent(in), DIMENSION(:):: PF_FLOOR_WALL
    real, intent(in), DIMENSION(:):: PF_FLOOR_WIN
    real, intent(in), DIMENSION(:):: PF_FLOOR_ROOF
    real, intent(in), DIMENSION(:):: PF_WALL_FLOOR
    real, intent(in), DIMENSION(:):: PF_WALL_MASS
    real, intent(in), DIMENSION(:):: PF_WALL_WIN
    real, intent(in), DIMENSION(:):: PF_WIN_FLOOR
    real, intent(in), DIMENSION(:):: PF_WIN_MASS
    real, intent(in), DIMENSION(:):: PF_WIN_WALL
    real, intent(in), DIMENSION(:):: PF_MASS_FLOOR
    real, intent(in), DIMENSION(:):: PF_MASS_WALL
    real, intent(in), DIMENSION(:):: PF_MASS_WIN
    logical, intent(in) :: OCANOPY
    real, intent(in), DIMENSION(:):: PTRAN_WIN
    character(len=5), intent(in) :: HCH_BEM
    real, intent(in), DIMENSION(:):: PROUGH_ROOF
    real, intent(in), DIMENSION(:):: PROUGH_WALL
    real, intent(in), DIMENSION(:):: PF_WIN_WIN
    logical, intent(in) :: OPAR_RD_IRRIG
    real, intent(in), DIMENSION(:):: PRD_START_MONTH
    real, intent(in), DIMENSION(:):: PRD_END_MONTH
    real, intent(in), DIMENSION(:):: PRD_START_HOUR
    real, intent(in), DIMENSION(:):: PRD_END_HOUR
    real, intent(in), DIMENSION(:):: PRD_24H_IRRIG
    real, intent(out), DIMENSION(:):: PIRRIG_ROAD
    real, intent(in), DIMENSION(:):: PEMIS_PANEL
    real, intent(in), DIMENSION(:):: PALB_PANEL
    real, intent(in), DIMENSION(:):: PEFF_PANEL
    real, intent(in), DIMENSION(:):: PFRAC_PANEL
    real, intent(in), DIMENSION(:):: PRESIDENTIAL
    real, intent(out), DIMENSION(:):: PTHER_PROD_PANEL
    real, intent(out), DIMENSION(:):: PPHOT_PROD_PANEL
    real, intent(out), DIMENSION(:):: PPROD_PANEL
    real, intent(out), DIMENSION(:):: PTHER_PROD_BLD
    real, intent(out), DIMENSION(:):: PPHOT_PROD_BLD
    real, intent(out), DIMENSION(:):: PPROD_BLD
    real, intent(inout), DIMENSION(:):: PTHER_PRODC_DAY
    real, intent(out), DIMENSION(:):: PH_PANEL
    real, intent(out), DIMENSION(:):: PRN_PANEL
    real, intent(in) :: PDT_RES
    real, intent(in) :: PDT_OFF
    real, intent(out), DIMENSION(:):: PCUR_TCOOL_TARGET
    real, intent(out), DIMENSION(:):: PCUR_THEAT_TARGET
    real, intent(out), DIMENSION(:):: PCUR_QIN