c     ------------------------------------------------------------------
c     file 'p1const.inc'
c
c     These parameter variables are used in place of typical constant
c     values within WERM to make the coding more readable and
c     maintainable.  Generally, only common constants likely to be used
c     throughout the WERM coding should reside here.  Constants used
c     locally in the WERM coding should be defined in separate parameter
c     include files.
c
c     These parameter values may be consulted from within any sections
c     of the WERM code if this file has been included.
c
      real             pi
      real             anemht
      real             awzzo

c     + + + VARIABLE DECLARATIONS + + +
c
      parameter (pi      = 3.14159)
      parameter (anemht  = 10.0)
      parameter (awzzo    = 25.0)

c
c     + + + VARIABLE DEFINITIONS + + +
c
c     pi     - The constant PI (radians)
c
c     anemht  - Standardized anemometer height (m)
c
c     awzzo   - Aerodynamic roughness assumed at weather stations(mm)
c     ------------------------------------------------------------------