DataUCSDSharedData.f90 Source File

MODULE DataUCSDSharedData

          ! Module containing the data shared between the UCSD models.

          ! MODULE INFORMATION:
          !       AUTHOR         Linda Lawrie
          !       DATE WRITTEN   March 2005
          !       MODIFIED       na
          !       RE-ENGINEERED  na

          ! PURPOSE OF THIS MODULE:
          ! <description>

          ! METHODOLOGY EMPLOYED:
          ! <description>

          ! REFERENCES:
          ! na

          ! OTHER NOTES:
          ! na

          ! USE STATEMENTS:
          ! <use statements for data only modules>
USE DataPrecisionGlobals
          ! <use statements for access to subroutines in other modules>

IMPLICIT NONE ! Enforce explicit typing of all variables

PUBLIC ! Everything in data only module is public

          ! MODULE PARAMETER DEFINITIONS:
          ! na

          ! DERIVED TYPE DEFINITIONS:
          ! na

          ! MODULE VARIABLE DECLARATIONS:
  ! The Eplus surface numbers will be stored in the arrays Apos according to the
  ! type of surface. The PosZ_Wall array has dimension 2 times the Number of Zones and
  ! for each zone it has 2 positions: the start and end positions in the Apos_Wall array
  ! for that specific zone.
  INTEGER, ALLOCATABLE, DIMENSION  (:)    :: APos_Wall
  INTEGER, ALLOCATABLE, DIMENSION  (:)    :: APos_Floor
  INTEGER, ALLOCATABLE, DIMENSION  (:)    :: APos_Ceiling
  INTEGER, ALLOCATABLE, DIMENSION  (:)    :: PosZ_Wall
  INTEGER, ALLOCATABLE, DIMENSION  (:)    :: PosZ_Floor
  INTEGER, ALLOCATABLE, DIMENSION  (:)    :: PosZ_Ceiling
  INTEGER, ALLOCATABLE, DIMENSION  (:)    :: APos_Window
  INTEGER, ALLOCATABLE, DIMENSION  (:)    :: APos_Door
  INTEGER, ALLOCATABLE, DIMENSION  (:)    :: APos_Internal
  INTEGER, ALLOCATABLE, DIMENSION  (:)    :: PosZ_Window
  INTEGER, ALLOCATABLE, DIMENSION  (:)    :: PosZ_Door
  INTEGER, ALLOCATABLE, DIMENSION  (:)    :: PosZ_Internal
  ! Convection coeficients for the various surfaces
  REAL(r64), ALLOCATABLE, DIMENSION  (:)       :: Hceiling
  REAL(r64), ALLOCATABLE, DIMENSION  (:)       :: HWall
  REAL(r64), ALLOCATABLE, DIMENSION  (:)       :: HFloor
  REAL(r64), ALLOCATABLE, DIMENSION  (:)       :: HInternal
  REAL(r64), ALLOCATABLE, DIMENSION  (:)       :: HWindow
  REAL(r64), ALLOCATABLE, DIMENSION  (:)       :: HDoor

!     NOTICE
!
!     Copyright © 1996-2013 The Board of Trustees of the University of Illinois
!     and The Regents of the University of California through Ernest Orlando Lawrence
!     Berkeley National Laboratory.  All rights reserved.
!
!     Portions of the EnergyPlus software package have been developed and copyrighted
!     by other individuals, companies and institutions.  These portions have been
!     incorporated into the EnergyPlus software package under license.   For a complete
!     list of contributors, see "Notice" located in EnergyPlus.f90.
!
!     NOTICE: The U.S. Government is granted for itself and others acting on its
!     behalf a paid-up, nonexclusive, irrevocable, worldwide license in this data to
!     reproduce, prepare derivative works, and perform publicly and display publicly.
!     Beginning five (5) years after permission to assert copyright is granted,
!     subject to two possible five year renewals, the U.S. Government is granted for
!     itself and others acting on its behalf a paid-up, non-exclusive, irrevocable
!     worldwide license in this data to reproduce, prepare derivative works,
!     distribute copies to the public, perform publicly and display publicly, and to
!     permit others to do so.
!
!     TRADEMARKS: EnergyPlus is a trademark of the US Department of Energy.
!

END MODULE DataUCSDSharedData