Fortran: Module Interface UrbanMod (Source File: UrbanMod.F90)

Calculate solar and longwave radiation, and turbulent fluxes for urban landunit

USES:

   use shr_kind_mod, only : r8 => shr_kind_r8
   use clm_varpar  , only : numrad
   use clm_varcon  , only : isecspday, degpsec
   use clm_varctl  , only : iulog
   use abortutils  , only : endrun  
   use shr_sys_mod , only : shr_sys_flush

PUBLIC TYPES:

   implicit none
   save

PUBLIC MEMBER FUNCTIONS:

   public :: UrbanClumpInit    ! Initialization of urban clump data structure
   public :: UrbanRadiation    ! Urban radiative fluxes
   public :: UrbanAlbedo       ! Urban albedos  
   public :: UrbanSnowAlbedo   ! Urban snow albedos
   public :: UrbanFluxes       ! Urban turbulent fluxes
 
   !Urban control variables
   character(len= *), parameter, public :: urban_hac_off = 'OFF'               ! 
   character(len= *), parameter, public :: urban_hac_on =  'ON'                ! 
   character(len= *), parameter, public :: urban_wasteheat_on = 'ON_WASTEHEAT' ! 
   character(len= 16), public :: urban_hac = urban_hac_off
   logical, public :: urban_traffic = .false.        ! urban traffic fluxes

REVISION HISTORY:

   Created by Gordon Bonan and Mariana Vertenstein and Keith Oleson 04/2003