EPA-450/4-88-017
User's Guide to SDM—
A Shoreline Dispersion Model
by:
PEI Associates, Inc.
11499 Chester Road
Cincinnati, Ohio 45246
EPA Project Officer Jawad S. Touma
EPA Contract NO. 68-02-4351
Prepared for
U.S. ENVIRONMENTAL PROTECTION AGENCY
Office of Air Quality Planning and Standards
Technical Support Division
Research Triangle Park NC 27711
September 1988
-------
ACKNOWLEDGMENTS
The SDM User's Guide was written by Jeffrey Winget and George Schewe of
PEI Associates, Inc. with major contributions from Sue Templeman of North
Carolina State University. This work was funded by the Environmental Protec-
tion Agency under Contract No. 68-02-4351, with Jawad Touma as the Work
Assignment Manager. Technical reviews and comments provided by Jawad Touma,
Roger Erode, Hersch Rorex, and Jerome Mersch are gratefully acknowledged.
-------
CONTENTS
.
Figures vii
Tibles ix
1. Introduction 1-1
2, Submodel Overview 2-1
2.1 Algorithm Selection Criteria 2-1
2.2 SFM Submodel 2-2
2.3 MPTER Submodel 2-10
3. Program Narrative 3-1
1 SDM Program Description 3-1
3.2 External Support Programs 3-4
4. SDM Input 4-1
4.1 Input Format 4-1
4.2 Standard SDM Control and Source Input File 4-9
4.3 Other Input Files 4-27
4.4 Treatment of Shoreline Orientation 4-29
5. SDM Output 5-1
6. Model Execution 6-1
7. SDMMET Program 7-1
8. Example Cases 8-1
References R-l
Appendix A User's Guide for Shoreline Fumigation Model (SFM) A-l
Appendix B Flow Charts for the SDM Model B-l
Appendix C Source Code for SDM C-l
Appendix D SDM Example Case Input File D-l
Appendix E Example SDM Case Output E-l
-------
FIGURES
Number Page
3-1 SOW subroutines map 3-3
3-2 Generalized input flow to SDM 3-5
4-1 System flow for SDM 4-2
4-2 Use of the shoreline definition cards 4-30
4-3 Complex shoreline 4-32
-------
TABLES
Number Page
2-1 Model Selection 2-2
2-2 Wind Profile Power Law Exponents Corresponding to a
0.03-Meter Roughness 2-13
4-1 SDM Cards 1, 2, and 3 - Title 4-1
4-2 SOM Card 4 - Control and Constants 4-3
4-3 SDM Card 5 - Options 4-4
4-4 SOM Card 6—Wind and Terrain 4-5
4-5 SDM Card 7—Point Source 4-5
4-6 SDM Card 7A--Shoreline Definition 4-6
4-7 SDM Card 8—Meteorological Data Identifiers 4-6
4-8 SDM Card 9—Specified Significant Sources 4-6
4-9 SDM Card 10—Polar Coordinate Receptors 4-7
4-10 SDM Card 11—Polar Coordinate Receptor Elevations 4-7
4-11 SDM Card 12—Receptor 4-7
4-12 SDM Card 13—Segemented Run 4-8
4-13 SDM Card 14—Meteorology 4-8
4-14 Default Option—Subsequent Settings 4-22
4-15 SDM Optional Input File—Emission Data 4-24
4-16 SDM Optional Input File - Meteorological Data 4-28
4-17 SDM Mandatory Shoreline Tower Meteorological Data 4-28"
5-1 SDM Standard Printed Output 5-2
5-2 SDM Optional Output Punched Cards—Average Concentrations 5-3
(continued)
ix
-------
TABLES (continued)
Number Page
5-3 SDM Optional Output File—Partial Concentrations 5-3
5-4 SDM Optional Output File—Hourly Concentrations 5-4
5-5 SDh Optional Output File—Averaging Period Concentrations 5-4
5-6 SDM Optional Temporary File—Values for High-Five Tables 5-5
5-7 SDM Special Shoreline Fumigation Output 5-5
6-1 DOS Command to Run SDM 6-2
7-1 SDMMET Variables 7-2
7-2 SDMMET Input File 7-3
7-3 Surface Roughness Lengths Categorized by Terrain 7-4
-------
SECTION 1
INTRODUCTION
The Shoreline Dispersion Model (SDM) is a multipoint Gaussian dispersion
model that can be used to determine ground-level concentrations from tall
stationary point sources that are influenced by the unique meteorological
phenomenon in a shoreline environment. This model provides a realistic
approach to the phenomenon of plume fumigation that can affect emissions from
tall stacks at a shoreline. Plume fumigation results when a plume emitted
from a tall stack and traveling with relatively little diffusion impacts the
thermal internal boundary layer (TIBL) at some distance downwind. As long as
this situation exists, fumigation may occur continuously and result in a high
ground-level concentration. Under these circumstances, current regulatory
models are not applicable; therefore, the development of SDM was necessary to
allow appropriate treatment of fumigation cases.
The SDM model is a hybrid model that utilizes the Shoreline Fumigation
Model, SFM, (see Appendix A) to determine the hours during the year when
fumigation events are expected and that uses the MPTER model (UNAMAP Version
6) for the remaining hours. The SFM Model was used because a statistical
evaluation of shoreline fumigation models indicated that the SFM Model com-
pares favorably with observations (U.S. EPA 1987). The MPTER model was used
because it is an EPA-preferred regulatory model for estimating ground-level
concentrations from multiple sources in simple terrain (Pierce 1986).
1-1
-------
The advantage of the SDM hybrid model is that it can provide the total
impact of a source, i.e., the impact from tall stacks whose plume is being
influenced by shoreline fumigation conditions and other nearby sources that
may or may not be experiencing this condition but need to be included as
nearby background sources. The SDK can model up to 250 sources and 180
receptors coincidently. The user specifies the location of each source by
its coordinates and the associated shoreline, and the model computes the
distance from the source to the shoreline. Necessary input also includes
hourly meteorological data from a tower located on or near the shoreline.
The meteorological data used are in both the standard RAMMET preprocessor
format and a special format for the shoreline model.
Section 2 includes an overview of the program, its routine, and algo-
rithms. Section 3 provides a brief description of the main program and each
subroutine used in the program. Section 4 describes model input requirements
for the user. Section 5 shows all output formats. Section 6 describes the
execution of the program on a mainframe IBM 3090 system. Section 7 provides
an overview and the operating procedures for the specialized tower meteoro-
logical data. Section 8 is an example case to be used in testing the model.
Appendix A provides more detail concerning the theoretical basis for shore-
line fumigation and methods for determining some of the meteorological param-
eters required for fumigation.
1-2
-------
SECTION 2
SUBMODEL OVERVIEW
The SDM is a combination of both the regulatory version of the MPTER
model and the SFM model based on algorithms developed by Misra (Appendix A).
The combination of these two models permits the analysis of both shoreline
fumigation and nonfumigation conditions for sources near a shoreline. When
operating, SDM must select the appropriate submodel that is applicable to the
particular source, meteorological data, and combination thereof for each hour
of analysis. The following subsections review the submodel selection cri-
teria and provide an overview of the individual SFM and MPTER algorithms.
2.1 ALGORITHM SELECTION CRITERIA
The SDK operates on the principle that for each source and each hour of
analysis a determination of the existence of a TIBL must be made as well as
whether the source height is above or below the TIBL. This determination is
made within the SDM and is based on criteria believed to be conducive to the
development of a lake breeze condition at some locations. The TIBL develops
as a thermal discontinuity interface between the stable onshore air masses
and the convective air inland beneath the staple air. The shape of the TIBL
is influenced by the sensible heat flux at the ground surface, wind speed,
and over-water atmospheric stability.
Table 2-1 gives the submodel selection factors used by SDM for each
source and hour of analysis.
2-1
-------
TABLE 2-1. MODEL SELECTION
SFM MODEL
Hourly wind direction at the shoreline is onshore
Wind speed is greater than or equal to 2 m/s
Daytime, with A, B, or C stability over land
Heat flux over land is greater than 20 watts/m2
Stable air over water
The stack top is above the TIBL height.
MPTER MODEL
Anytime the above conditions are not met
For a given hour of meteorological data, therefore, the TIBL formation is
determined by SDM on the basis of the above criteria and either the SFM or
MPTER sub-model is selected to compute ambient concentrations.
2.2 SFM SUBMODEL
The Shoreline Fumigation Model (SFM) estimates ground-level concentra-
tions for user-defined receptor points downwind of an elevated source situ-
ated near a simple shoreline. The SFM is described in detail in Appendix A.
The model operates under certain inherent assumptions regarding ambient
atmospheric conditions and plurae behavior. These assumptions are as follows:
0 Over-water lapse rate is stable.
0 Airflow is on shore.
0 Plume is released in the stable air and is Gaussian in nature.
0 Mean wind direction in the stable air is the same as the mean wind
direction in the TIBL.
0 Plume has not begun to meander significantly before impacting the
TIBL.
0 Plume impacts the top of the TIBL and creates an area source from
which pollutants are dispersed downward into the TIBL.
0 Mixing downward of the plume upon TIBL impaction is uniform and
instantaneous.
0 Pollutants corresponding to the elevated area source have hori-
zontal Gaussian and uniform vertical distributions within the TIBL.
2-2
-------
0 Horizontal dispersion coefficient in the unstable air within the
TIBL is a function of the convective velocity, w*.
2.2.1 Concentration Equation
By summing the contribution of all small area sources dx'dy1 along the
TIBL interface, the total concentration at a point x,y at ground level
(z = 0) can be calculated. The ground-level concentration field inside the
TIBL is first thought of in terms of the contribution at (x,y,0) of an
elemental source of area dx'dy1 located at [x1, y', H,(x')], where H, is the
TIBL height. Integrating over y' between -« and « and over x1 between 0 and
x, the net contribution at (x,y,0) is obtained (Misra 1980, Misra and Onlock
1982):
x
0 ( 1
*> • dfcr / 0
•^
1/X'> - H(x''V v2
T
.
s
. HT(x'J - H(x')
dx<
where Q - source strength, g s"
HT = TIBL height, m
UL * mean wind speed within the TIBL, m s"1
(x1) +
-------
x1 = point downwind at which the plume begins to intersect the TIBL, m
y = horizontal distance perpendicular to the downwind direction, m
To conceptualize how SFM operates, the user should consider the TIBL inter-
face as a porous, curved surface that a plume impacts from above. Some
portion of the plume is thought of as intersecting the TIBL and dispersing
downward through it at all times. Initially, only a small portion of the
plume will be intersecting; however, with increased distance downwind, more
and more of the plume will intersect. One may consider that a source
strength exists at each point (x1, y1) on HT. The individual terms in Equa-
tion 2-1 are described in the remainder of this subsection.
2.2.2 TIBL Height (Hy)
One of the most important variables in shoreline fumigation is the TIBL
height, which is defined according to Weisman (1976):
2H X
"T
where H » surface, sensible heat flux
X » downwind distance, m
p * atmospheric density, kg/m3
c * specific heat at constant pressure
(d*/dz) = potential temperature gradient over water, K/m
W
U, * mean wind speed within the TIBL, m/s
As shown in the equation, the height of the TIBL is directly proportion-
al to the surface turbulent sensible heat flux. Higher wind speeds and
greater stability of the over-water air mass tend to dampen the TIBL height.
In a shoreline environment, the TIBL height is the actual mixed layer height.
2-4
-------
In Equation 2-2, the atmospheric variables are commonly combined and termed
the TIBL "A" factor for convenience:
HT - A X* (Eq. 2-3)
2.2.3 Plume Rise (H)
While in the transitional phase from the stack to final plume height,
the height of the plume is determined by the distance-dependent formula:
I 2
H = Hst|( + 1.6(f-) (}-) (Eq. 2-4)
where H t- » stack height, m
4 3
F » plume buoyancy, m /s
Us • mean wind speed at stack height, m/s
X « distance downwind, m
The equation and value of the coefficient reflect the Briggs (1975) method
for estimating gradual plume rise.
Generally, a buoyant plume initially rises in stable air, overshoots,
and then settles to some equilibrium height. Neither the gradual plume rise
nor the final plume rise equation applies in the transition (overshoot)
region. In the model, the equation for gradual plume rise is used up to the
point of final plume rise. Based on observations of plume trajectories
plotted by Briggs (1975), the distance downwind at which the plume levels off
may be given by the quantity (4.5/N) U , where N is the Brunt-Vaisala
frequency. The expression for N is as follows:
N - [f (£) 1* (Eq. 2-5)
2-5
-------
2
where g = acceleration due to gravity at the earth's surface, m/s
* * the mean potential temperature over water, K
w
(d$/dz) = the potential temperature gradient over water, K/m
W
The value of the final plume rise reflects the method of Briggs, where H » 2.6
(F/N2US).1/3
2.2,4 Dispersion Coefficients for a Buoyant Plume
Vertical —
The dispersion of the plume in the stable air is treated independently
of Its dispersion within the TIBL. In the stable air, the buoyant plume
spreads only because of its internal turbulence; whereas within the TIBL,
plume dispersion is dominated by the presence of convective turbulence. The
vertical dispersion coefficient in stable air is given by:
1 2
• az - > <*»• 2-7)
4 3
where F » plume buoyancy, m/s
U * mean wind speed at stack height m/s
X * downwind distance, m
In these equations, 4.5/N represents the time after which the plume has
leveled off; it is also the time when the internal turbulence of the plume is
completely dissipated (Briggs 1975). At this time, a is believed likely to
approach an asymptotically constant value, given by a«*
I
a
2 = l.lt-^-y) (Eq, 2-8)
I
2-6
USN*
-------
which is obtained by setting Equations 2-6 and 2-7 equal and substituting
4.5/N for X/U$ and 0.4 for ar
Horizontal —
The horizontal dispersion coefficient in stable air is given by the
equation:
1 2
F X
^S S S
where all terms are as defined for Equations 2-6 and 2-7. Once the plume
intercepts the TIBL, it fumigates into the unstable air within the TIBL and
the horizontal dispersion coefficient is then calculated based on the work of
Lamb (1978):
,HTU, ^
- X1) (X - X') <^r^ (Eq. 2-10)
w*
and
2
"5 ( T^L)
•>-——L (Eq. 2-11)
w*
y
In these equations, w* is the convective velocity and U, is the mean
wind speed within the TIBL. As stated earlier, when the plume impacts the
TIBL, it creates an area source on the top surface of the TIBL. As a method
of calculating the complete contribution of this area source to the ground-
level concentration, the area source is divided into many small area sources.
The total concentration is obtained by summing the contributions of all small
area sources. The distance (X - X1) may be considered the distance affected
by a given small area source at a stage in the calculation of the overall
concentration. In the development of the model, it was found that using only
2-7
-------
Equation 2-10 produced similar results to those obtained by the use of both
Equations 2-10 and 2-11; thus, the singular use of Equation 2-10 was adopted.
The convective velocity is defined as follows:
1
9 HQHT 3
** • (rc^> <*«• 2-12)
2
where H « surface, sensible heat flux, W/m
HT • TIBL height, m
$. = mean potential temperature over land, k
The other terms are as defined previously. The value of w^ is calculated for
each hour of input.
The constants a, and a^ have been determined experimentally from data
obtained from the Nanticoke Environmental Management Program (Misra 1980,
Portelli 1982, Kerman et al. 1982, Hoff et al. 1982, Anlauf et al. 1982).
Use of these constants is retained in the version of the model provided (a, =
0.4 and a^ s 0.67) because the plume observed in the Nanticoke studies is
probably representative of the behavior of all plumes under similar
circumstances.
Finally, the horizontal dispersion coefficient a'(x,x') is expressed as
follows:
1
01 • [a? (x1) + o2 (x,x')]? (Eq. 2-13)
ys yL
This equation is a consequence of the integration between -« and « over y1 in
the derivation of Equation 2-1 (Misra and Onlock 1982).
2-8
-------
2.2.5 Calculation of Pollutant Concentration
The equation for pollutant concentration at a receptor point (Equation
2-1) is solved by Simpson's Rule, a numerical technique designed to evaluate
the definite integral of a continuous function with finite limits of integra-
tion. The geometric interpretation of Simpson's Rule is that of replacing
the curve of some function f(x) by arcs of parabolas through three adjacent
points of the integration interval (Fox 1963). The general expression for
Simpson's Rule is as follows:
J f(x) dx - £3^-i[f(x0) + 4f(Xj) + 2f(x2) + 4f(x3)
a
+ ...+ 2f(x 9) + 4f(xn ,) + f(x )]
n-t n-i n
In this equation, a and b designate the endpoints of the interval over which
integration is to be performed, and n is the number of subintervals into
which the interval from a to b is divided. In this application, the function
f(x) is naturally the concentration equation evaluated over the interval from
x equals some small initial value to x equals the downwind distance of the
receptor point. (This initial value of x is set at 10, which avoids the
problem of singularity presented by x = 0.) In the model, the value of n is
equal to 2, which reduces Equation 2-14 to the expression [f(a) +
6
2
In the model program, the concentration equation was broken into parts
to facilitate computation. The general sequence of steps used is identified
in the following paragraphs.
2-9
-------
2.3 MPTER SUBMODEL
The following information is provided to give the user background on
assumptions made in the MPTER model. Additional information on MPTER is
contained in the User's Guide for MPTER (EPA-600/8-80-016, April 1980).
2.3.1 MPTER OVERVIEM
The MPTER Model is based on the steady-state Gaussian algorithm. In
MPTER the following assumptions are made: 1} upon release, continuous plumes
are diluted by the wind speed at the stack top; 2) dispersion from continuous
plumes results in time-averaged Gaussian distributions in both the horizontal
and vertical directions through the dispersing plume; 3) concentration esti-
mates may be made for each hourly period by using the mean meteorological
conditions appropriate for each hour; 4} the total concentration at a recep-
tor is the sum of the concentrations estimated at the receptor from each
source, i.e., concentrations are additive; and 5) concentrations at a
receptor for periods longer than an hour can be determined by averaging the
hourly concentrations over the period.
The upwind distance x and the crosswind distance y of the source from
the receptor is determined as a function of the mean hourly wind direction.
Dispersion parameter values are determined as functions of stability class
and upwind distance. Selections of equations to estimate concentration
depend on stability class and, for neutral or unstable conditions, on the
relation of the dispersion parameter value to mixing height. The location of
the receptor relative to the plume position is a dominant factor in the
magnitude of the concentration.
2.3.2 Dispersion Parameter Values
The dispersion parameter values used in MPTER are the Pasquill-Gifford
(P-G) parameters (Pasquill 1961; Gifford 1960) representative for open coun-
try (a roughness of approximately 0.03 m). The subroutines used to determine
2-10
-------
the parameter values are the same as in the UNAMAP programs PTDIS, PTMTP, and
RAMR.
Except for stable layers aloft, which inhibit vertical dispersion, the
atmosphere is treated as a single vertical layer with the same rate of ver-
tical dispersion throughout. Complete eddy reflection is assumed both from
the ground and from the stable layer aloft, which is given by the mixing
height.
2.3.3 Plume Rise
Plume rise is calculated by using Briggs (1975) methods. Although the
plume rise from point sources is usually dominated by buoyancy, plume rise
because of momentum is also considered. (Merging of nearby buoyant plumes is
not considered.) Stack-tip downwash is an optional consideration. Building
downwash cannot be considered.
2.3.4 Input Data
Input data must be representative of the geographical area and sources
being modeled. Consideration of emission variations is possible in MPTER,
which allows such variations to be calculated in the concentration estimates
because they are directly proportional to emissions. MPTER has the option to
use variable hourly emissions. The meteorological data, which consist of
wind direction, wind speed, temperature, stability class, and mixing height
for each hour, should be representative of the region being modeled.
2.3.5 Mixing Height
The entire plume is assumed to be completely reflected if the effective
plume height is below the mixing height. The entire plume is assumed to be
within the stable layer aloft if the effective plume height is above the
mixing height. For this case, no ground-level concentration is calculated.
2-11
-------
KPTER does not include calculations for the transitional phenomenon of
shoreline fumigation (which causes mixing of pollutants downward, resulting
in uniform concentrations with height beneath the original plume centerline).
The SFM submodel accounts for this phenomenon.
2.3.6 Removal or Depletion
Transformations of a pollutant resulting in loss of that pollutant
throughout the entire depth of each plume can be approximated by MPTER. If
the loss to be simulated is realistic, occurs throughout the whole plume, and
does not depend on concentration, this exponential loss may provide a reason-
able simulation. If, however, the loss mechanism is selective, the loss
mechanism built into the model will not approximate the atmospheric chemistry
very well. Examples of selective loss mechanisms include impaction with
features on the ground surface, reactions with materials on the ground, or
dependence on a given small parcel of air for concentration (requiring con-
sideration of contributions from all sources to this parcel).
2.3.7 Mind Speeds and Wind Directions
Wind speeds and wind directions should be hourly averages. (National
Weather Service hourly observations are actually averages of a few minutes at
the time of the observation, usually 5 to 10 minutes prior to the hour.)
Input wind data should be representative of the entire region being modeled.
Emissions from continuous sources are assumed to be stretched along the
direction of the wind by the speed of the wind at the stack top. Thus, the
stronger the wind, the greater the dilution of the emitted plume. In MPTER,
the input wind speed is assumed to be representative of the input anemometer
height above the ground. The wind speed u, at the physical stack height h is
calculated from:
uh = uz (h/za)P
2-12
-------
where u is the input wind speed for this hour, z, is the anemometer height,
Z 3
and the exponent p is a function of stability. If u, is determined to be
less than 1ms" , it is set equal to 1.
The P-G dispersion parameters used in MPTER are most valid for a surface
roughness of approximately 0.03 m (Pasquill 1976). Table 2-2 shows wind
speed power law exponents for each stability class for rural conditions that
correspond best to this surface roughness (U.S. EPA 1980).
TABLE 2-2. WIND PROFILE POWER LAW EXPONENTS
CORRESPONDING TO A 0.03-METER ROUGHNESS
Stability
A
B
C
0
E
F
Exponent
0.07
0.07
0.10
0.15
0.35
0.55
As stated earlier, directional shear with height 1s not included, which
means that the direction of flow is assumed to be the same at all heights
over the region. The taller the effective height of a source, the larger the
expected error in direction of plume transport. Although the effects of
surface friction are such that wind direction usually veers (turns clockwise)
with height, the thermal effects (in response to the horizontal temperature
gradient in the region) can overcome the effect of friction and cause backing
(turning counterclockwise with height) instead of veering.
In the program RAWIET, which processes National Weather Service hourly
observations, the wind directions (reported tc the nearest 10 degrees) are
altered by a randomly generated number from 0 to 9 used to add -4 to +5
degrees to the wind vector. An extreme overestimate of concentration is thus
prevented at a point downwind of a source during a period of steady wind,
2-13
-------
when sequential observations are from the same direction. Rather than allow
the plume centerline to remain in exactly the same position for several
hours, the changing wind allows for some variation of the plume centerline
within the 10-degree sector. Although this step can in no way simulate the
actual sequence of hourly events (wind direction to 1-degree accuracy cannot
be obtained from wind direction reported to the nearest 10 degrees), such
variations can be expected to produce more representative concentrations over
a period of record than those obtained by the use of winds to only the 10-
degree increments. (Sensitivity tests of this alteration for single sources
have indicated that, where a few hours of unstable conditions are critical to
producing high concentrations, the resulting concentrations are extremely
sensitive to the exact sequence of random numbers used. Such a sequence
might be two wind directions 1 degree apart versus two wind directions 9
degrees apart. Differences of 40 to 50 percent in 24-hour concentrations
from a single source have appeared in the sensitivity tests as a result of
the random wind direction variation alone.) Use of the most accurate wind
information available for input is therefore necessary.
2.3.8 Gaussian PIume Equat i ons
The upwind distance, x, of the point source from the receptor and the
crosswind distance, y, of the point source from the receptor are calculated
by Equations 2-15 and 2-16 (presented in the next subsection) for each
source-receptor pair per simulated hour. Both dispersion parameter values a
and a are determined as functions of this upwind distance x and stability
class.
One of three equations (Equations 2-17, 2-18, and 2-19, also presented
in the next subsection) is used to estimate concentrations under various
conditions of stability and mixing height. Equation 2-17 is used for stable
2-14
-------
conditions or for unlimited mixing; eddy reflection at the ground is assumed.
For unstable or neutral conditions during which vertical dispersion is so
great that uniform mixing is assured beneath an elevated inversion, Equation
2-18 is used. Finally, for unstable or neutral conditions in which vertical
dispersion is still small compared with the mixing height, Equation 2-19 is
used. This equation incorporates multiple eddy reflections from the ground
and the base of the stable layer aloft. Simplifications to these equations,
valid if the height of the receptor z is assumed at ground level, are incor-
porated into the appropriate subroutines.
2.3.9 Pojnt Sou_rce_C_omputatlons_
Siven an east-north coordinate system (R, S), the upwind distance, x,
and the crosswind distance, y, of a point source from a receptor are calcu-
lated by:
x = (S -Sr) cos 8 + (Rp-Rr) sin 0 (Eq. 2-15)
y - (S -Sr) sin 0 + (Rp-RrJ cos e ^- 2~16)
where R , S are the coordinates of the point source; R , S are the coordi-
nates of the receptor; and 6 is the wind direction (the direction from which
the wind blows). The units of x and y will be the same as those of the
coordinate system R, S. To determine plume dispersion parameters, distances
must be in kilometers or meters. A conversion may be required to convert x
and y in these equations to the appropriate units.
The various forms of the Gaussian equation presented here are based on
the coordinate scheme with the origin at the ground, and x upwind from the
receptor, y crosswind, and z vertical. The Gaussian equations for continuous
releases have four components: 1} concentrations are proportional to the
emission rate; 2) the released effluent is diluted by the wind passing the
point of release; 3) the effluent is spread horizontally resulting in a
2-15
-------
Gaussian or normal (bell-shaped) crosswind distribution at downwind dis-
tances; and 4) the effluent is spread vertically. The latter component alsc
results in a normal vertical distribution near the source, which at greater
downwind distances is modified by eddy reflection at the ground and, if
appropriate, by eddy reflection at the mixing height. Equations 2-17 through
2-19 are broken into these four components.
The following are definitions of the individual parameters:
x_ = concentration, g m"
Q = emission rate, g s"
u = wind speed, m s"
o = standard deviation of plume concentration horizontal distribu-
y tion (evaluated at the distance x and for appropriate stabili-
ty), m
a = standard deviation of plume concentration vertical distribu-
tion (evaluated at the distance x and for appropriate stabili-
ty), m
L = mixing height, m
H s effective height of emission, m
z = receptor height above ground, m
y = crosswind distance, m
The contribution to the concentration, XD» from a single point source to
a receptor is given by one of the three following equations:
Component: (1)
Xp • Q 7, ' —TT- • .i (Eq. 2-17)
2)
1
u
I
u
(3)
Si
g
lr> \i
(4)
92
I
xp - Q • * • -£-4- • f (Eq- 2-18)
2-16
-------
i 9i 93
x . Q . I . L— . 3 (Eq. 2-19)
P U (2»)*ay (2»)*az
Equation 2-17 is used for stable conditions or unlimited mixing.
Equation 2-18 is used for unstable or neutral conditions, where a is
equal to or greater than 1.6 L.
Equation 2-19 should be used for unstable or neutral conditions, where
a is less than 1.6 L, provided that both H and z are less than L.
Sensitivity tests using Equation 2-19 have indicated that for all H and
all z between the ground and the mixing height, the vertical distribution of
concentration with height is uniform when a has increased to 1.6 L. There-
fore, when a is equal to or greater than 1.6 L for neutral or unstable con-
ditions, Equation 2-18 is used. For special cases such as z = 0, Equation
2-18 may give appropriate concentrations for o that are much less than 1.6
L. The preceding recommendation covers the more general case, however.
[Note that this recommendation differs from that of Pasquill (1976) and the
Stability Workshop (Hanna 1977), which indicate that a should not be allowed
to increase beyond 0.8 L.] For ground-level receptors, z * 0, the use of a
* 0.8 L in Equation 2-17 reduces to Equation 2-18. This recommendation
allows az to increase beyond the value of L, specifically as large as 1.6 L;
it also allows for a smooth transition to a uniform vertical profile for
receptors above the ground, z / 0, and for effective heights of emissions
approaching the mixing height.
2-17
-------
Definitions for expressions g^ g,,, and g3 are as follows:
2 2
gj • exp (-0.5 y /o• )
g2 = exp [-0.5(z-H)2/o2] + exp [-0.5(z+H)2/a2]
g, • I { exp [-0.5(z-H+2NL)2/a*,j + exp [-0.5(z+h+2NL)2/a2]}
J H * - » z z
(This infinite series converges rapidly and evaluation
with N varying from -4 to +4 is usually sufficient.)
2-18
-------
SECTION 3
PROGRAM NARRATIVE
3.1 SDM PROGRAM DESCRIPTION
The SDM program consists of three basic components:
1. SFM program
2. MPTER program (regulatory version)
3. Interface program
The original MAIN and PTR subroutines in MPTER were modified to call external
subroutines when necessary to read additional data, calculate TIBL formation,
and use the SFM program. This section provides a brief overview of each
subroutine in SDM and their function. Also noted for each subroutine is the
origin of each, i.e., ^lPTER» SFM, or interface.
MPTER Routines
MAIN - The MAIN Program reads and checks input parameters, initializes
variables, writes out initial information, determines significant
sources, calls PTR for point-source concentrations, reads and
writes tapes/discs, and calls OUTHR to print concentration con-
tributions and summaries.
PTR - This subroutine is called by MAIN to calculate the point source
contribution to each receptor. Briggs (1975) plume rise equations
are solved in this routine. It calls INTERF for the SFM applica-
bility and concentrations and writes the SFM concentration card for
special output.
RCP - This subroutine is called by PTR; it returns values of relative
concentrations.
PSYZ - This subroutine is called by RCP; it calculates 0 and 0 for a
given downwind distance and stability classification.
EXPOS - This block of data contains coefficients and exponents used in
determining ground-level concentrations that are used to rank the
significant sources.
3-1
-------
ANSARC - This function determines the appropriate arctan of each resultant
wind component over the north resultant wind component with the
resulting angle between 0 and 360 degrees.
OUTHR - This subroutine arranges and then prints tables of concentration.
The number of tables output depends on the option combination
specified.
RANK - This subroutine, called by MPTER, ranks concentrations for four or
five averaging times so that the highest five concentrations are
printed for each receptor.
SFM Subroutines
SFM - This subroutine calls CALC and then returns. It has been modified
extensively from the original so it can be used with MPTER but
retains all original SFM Model features and capabilities.
CALC - This subroutine calculates plume leveling distances, determines
when to use the entire x interval and when to split the interval
into level and nonlevel plume segments. It then calls SIMP the
appropriate number of times, adds calculated value, and converts to
proper units.
SIMP - This subroutine 1s called by CALC either once or twice. It uses
Simpson's 1/3 law to evaluate the concentration integral. It
splits the x interval in two and processes the left half until the
error is acceptable or number of splits is too great. It also
calls the function EVAL to get the value of the integral along the
current interval.
EVAL - This function calculates the current value of the function to be
integrated.
Interfacing Subroutines
INTERF - This subroutine, which is called by PTR, reads in shoreline mete-
orological data, tests for shoreline fumigation applicability, and
calculates inputs for SDM.
XSHORE - This function calculates distance from source to shoreline.
Figure 3-1 is an abbreviated flow diagram of SDM showing the relation-
ships of the subroutines to each other and to the main program.
The MAIN subroutine in SDM initiates model arrays and subroutines and is
used primarily for input and bookkeeping; most technical calculations are
performed by subroutine PTR. PTR calls Subroutine RCP, which in turn obtains
dispersion parameter values from Subroutine P6YZ and then selects and solves
3-2
-------
BLOCK DATA
MAIN
ANGARC
PTR
RANK
OUTHR
OUTAVG
INTERF
RCP
XSHORE
SFM
PGYZ
CALC
SIMP
EVAL
FUNCTION OR
BLOCK DATA
CALLS
SUBROUTINE
CALLS
Figure 3-1. SDM subroutines map.
3-3
-------
the appropriate Gaussian equation. As shown in Figure 3-1, each case where
the TIBL is determined to be a factor involves the subsequent calling of
subroutines INTERF, SFM, CALC, and SIMP, and the functions EVAL and XSHORE.
Thus, an individual source is modeled using MPTER or SFM if TIBL formation
takes place and is applicable to the source. The MPTER/SFM concentrations
calculated for each hour are saved in a temporary array and passed to sub-
routine RANK. Subroutine RANK orders the highest five concentrations for
each averaging time for each receptor. Subroutine OUTHR essentially provides
the printed output.
3.2 EXTERNAL SUPPORT PROGRAMS
Two sets of meteorological data must be accessed to allow the proper
execution of SDM. The first set is the meteorological preprocessor for tower
data at two levels and the other is the RAMMET preprocessor, which has had
wide use with the RAM, CRSTER, and ISCST Models. The use of these programs
is described in the user instructions in Sections 5 and 6. Figure 3-2
describes the generalized input flow by major required input files or pro-
grams.
3-4
-------
SHORELINE
TOWER
METEORO-
LOGICAL DATA\
REQUIRED
SOURCE
DATA
HOURLY
EMISSIONS
RLE (UNIT 15
REQUIRED
/ SDMTOWER/
INPUT
I (UNIT 19) \
SDM INPUT
FILE
(UNIT 5)
f SURFACE
(AND UPPER AIR j
I METEORO-
\LOGICAL FILES
OPTIONAL
OPTIONAL
RAMMET
f
PRE-
I PROCESSOR
I FILE (UNIT 11)'
Figure 3-2. Generalized input flow to SDM.
3-5
-------
SECTION 4
SDM INPUT
This section describes the SDM input requirements for the user. The
section is divided into four parts: 1} input variable formats; 2) input
variable definitions and discussion; 3) shoreline definition cards including
complex shoreline modeling; and 4} required meteorological data. Figure 4-1
shows all input and output files and their relationship to the SDM program in
terms of the appropriate options.
4.1 INPUT FORMAT
Tables 4-1 through 4-13 list the input necessary to execute SDM in an 80
column card format. Because some input types are read in free format, indi-
vidual values on a card must be separated by either a comma or a space.
Other inputs must be entered in the formats indicated. Up to 250 point
sources and 180 receptor cards are allowed; more than this number will result
in runstream termination. Meteorological data can be input in card image
format or through a preprocessed file of the same type as used for RAM and
CRSTER. Hourly emissions can also be read in as an input for each source. A
description of each input follows the tables in Section 4.2 including cross-
referencing.
TABLE 4-1. SDM CARDS 1, 2, AND 3 - TITLE (THREE CARDS)
Variable Format Description Units
LINE1 20A4 80 alphanumeric characters for heading
LINE2 20A4 80 alphanumeric characters for heading
LINE3 20A4 80 alphanumeric characters for heading
4-1
-------
AVG. PERIOD
CONC.
LISTING
OF
INPUT.
.r*'
EMISSIONS
WITH
HEIGHT
TABLE
OPTION 9-0
HOURLY
PARTIAL
CONC.
OPTION 11.0
HOURLY
MET
DATA
OPTION 12-0
FINAL
PLUME
HEIGHT
AND
DISTANCE
OPTION 13-0
CARD
INPUT
STANDARD
INPUT FILE
(Section 4.2)
SDM
TEMP.
HIGH-FIVE
INFO.
SHORELl
FUMIGATION
OUTPUT
UNIT 20
HOURLY
SUMMARY
OPTION 14.0
HOURLY
MET
DATA
OPTION 15-0
FINAL
PLUME
HEIGHT
AND
DISTANCE
OPTION 16-0
SFM
HOURS
AVG. PERIOD
PARTIAL
CONG.
OPTION 17-0
AVG. PERIOD
SUMMARY
OPTION 18-0
HIGH-FIVE
TABLE
OPTION 19-0
MANDATORY FLOV\
OPTIONAL FLOW
Figure 4-1. System flow for SDM.
4-2
-------
TABLE 4-2. SDM CARD 4 - CONTROL AND CONSTANTS (ONE CARD)
Variable3
IDATE(l)
IDATE(2)
IHSTRT
NPER
NAVG
1POL
Description
2-digit year (see Section 4.2.1.1)
Starting Julian day for this run (see Section 4.2.1.1)
Starting hour for this run (see Section 4.2.1.1)
Number of averaging periods to be run (see Section 4.2.1.2)
Number of hours in an averaging period (see Section 4.2.1.2)
Pollutant indicator: (see Section 4.2.1.3)
3 = S02
Units
-
-
-
-
-
-
4 = Suspended particulates
MUOR Urban/rural mode indicator: (see Section 4.2.1.4))
1 = Urban (should not be selected in SDM)
2 = Rural
NSIGP Number of significant point sources, maximum = 25 (see
Section 4.2.1.5)
NAV5 Number of hours in the user-specified period for which a
high-five concentration table is generated (see Section
4.2.1.6)
CONONE Multiplier constant, user units to km (see Section 4.2.1.7)
CELM Multiplier constant, user height units to m (see Section
4.2.1.8)
HAFL Pollutant half-life (see Section 4.2.1.9)
a All input variables are free format.
4-3
-------
TABLE 4-3. SDM CARD 5—OPTIONSa (ONE CARD)
Variable
b,c
Description
TECHNICAL OPTIONS (see Section 4.2.2.1)
IOPT(l)d Use terrain adjustments in MPTER submodel
IOPT(2) No stack downwash
IOPT(3) No gradual plume rise
IOPT(4) Include buoyancy-induced dispersion
INPUT OPTIONS (see Section 4.2.2.2)
IOPT(5) Meteorological data on cards
IOPT(6) Read hourly.emissions
IOPT(7) Specify significant sources
IOPT(8) Input radial distances and generate polar coordinate receptors
PRINTED OUTPUT OPTIONS (see Section 4.2.2.3)
IOPT(9) Delete emissions with height table
IOPT(10) Delete averagine-time meteorological summary
IOPT(11) Delete hourly contributions
IOPT(12) Delete meteorological data on hourly contributions
IOPT(13) Delete final plume height and distance to final rise on hourly
contributions
IOPT(14) Delete hourly summary
IOPT(15) Delete meteorological data on hourly summary
IOPT(16) Delete final plume height and distance to final rise on hourly
summary
IOPT(17) Delete averaging-time contributions
IOPT(18) Delete averaging-time summary
IOPT(19) Delete average concentrations and high-five table
OTHER CONTROL AND OUTPUT OPTIONS (see Section 4.2.2.4)
IOPT(20) Run is part of a segmented run
IOPT(21) Write partial concentrations to disk or tape
IOPT(22) Write hourly concentrations to disk or tape
IOPT(23) .Write averaging-time concentrations to disk or tape
IOPT(24) Punch averaging-time concentrations on cards
IOPT(25) Set default values (used for regulatory applications of NPTER)
a All options are selected as integer values: 0 indicates not to use the
option;
1 indicates to use the option.
IOPT * Options are interchangeable.
c All options are referred to by their variable name in this table, e.g.
Option 1 - IOPT(1).
All options are free format, e.g.: 1,0,1, etc.
4-4
-------
TABLE 4-4. SDM CARD 6—WIND AND TERRAIN (ONE CARD)
Variable3
HANE
Anemometer hei<
Description
jht
Units
Meters
PL(I), I = 1, 6 Wind increase with height exponents for each sta-
bility class (see "Values of Variables Related to
Increase of Wind with Height")
CONTER(I), Terrain adjustment factors for each stability class
I = 1, 6 (real numbers from 0 to 1)
a All input variables are free format.
b See Section 4.2.3.
TABLE 4-5. SDM CARD 7—POINT SOURCE3'b (UP TO 250 SOURCES)
Variable
RNAME
SOURCE(l.NPT)
SOURCE(2,NPT)
SOURCE(3,NPT)
SOURCE(4,NPT)
SOURCE (5, NPT)
SOURCE(6,NPT)
SQURCE(7,NPT)
SOURCE (8, NPT)
ELP(NPT)
Format
3A4
F8.2
F8.2
F8.2
F8.2
F8.2
F8.2
F8.2
F8.2
F4.0
Description
12 alphanumeric characters for
source identification
East coordinate of point source
North coordinate of point source
Sulfur dioxide emission rate
Parti cul ate emission rate
Physical stack height
Stack gas temperature
Stack inside diameter
Stack gas exit velocity
Source ground-level elevation
Units
-
User units
User units
g/s
g/s
meters
Kelvin
meters
m/s
User height units
Card with ENDPOINTS in
source.
See Section 4.2.4.
Columns 1 through 9 is read in after the last point
4-5
-------
TABLE 4-6. SDM CARD 7A—SHORELINE DEFINITION (ONE SOURCE)
Variable3
SNAME
XSL
YSL
BA
EA
FETCH
Format
3A4
F8.0
F8.0
F8.0
F8.0
F8.0
Description
12 alphanumeric shoreline descriptors
East coordinate of shoreline point
North coordinate of shoreline point
Beginning angle of shoreline (0 to 360)
Ending angle of shoreline (greater than
BA, less than 720)
Degrees of acceptable wind fetch for on-
shore wind determination
Units
-
User units
User units
Degrees
Degrees
Degrees
See Section 4.4,
TABLE 4-7. SDM CARD 8—METEOROLOGICAL DATA IDENTIFIERS'
Variable Format
ISFCD
ISFCYR
IMXD
IMXYR
Description0
SFC meteorological station identifier
Year of SFC meteorological data
Upper-air station identifier
Year of mixing-height data
Units
5 digits
2 digits
5 digits
2 digits
Used with Option 5 « 0', skip if Option 5 = 1.
All input variables are free format.
See Section 4.2.5.
TABLE 4-8. SDM CARD 9—SPECIFIED SIGNIFICANT SOURCES3 (ONE CARD)
Variable Format
Description
Units
NPT 13 Number of user-specified significant point sources
MPS 2513 Point source numbers user wants to be considered
significant
Used with Option 7=1.
See Section 4.2.6.
4-6
-------
TABLE 4-9. SDM CARD 10—POLAR COORDINATE RECEPTORS3 (ONE CARD)
Variable
Format
Description
Units
RADIL(I), I = 1, 5 5F4.0
Up to five radial distances, each
of which generates 36 receptors
around Points CENTX, CENTY on
azimuths to to 360 degrees
User units
CENTX
CENTY
F8.3
F8.3
East coordinate, about which
radial s are centered
North coordinate, about which
radial s are centered
User units
User units
Used with Option 8=1.
See Section 4.2.7.
TABLE 4-10. SDM CARD 11—POLAR COORDINATE RECEPTOR ELEVATIONS (36 CARDS)
Variable Format
Description
Units
IDUM 12 Azimuth indicator (1 to 36)
8X (8 blank columns)
ELRDUM 5F10.0 Receptor ground-level elevations for
this azimuth for up to five distances
User heiaht units
Used if Options 1 and 8 are both 1; otherwise skip these cards.
See Section 4.2.7.
TABLE 4-11. SDM CARD 12—RECEPTOR3 (UP TO 180 CARDS)
Variable
RNAME
RR.EC
SREC
ZR
ELR
Format
2A4
F10.3
F10.3
F10.0
F10.0
Description
8 alphanumeric characters for station
identification
East coordinate of receptor
North coordinate of receptor
Receptor height above local ground
level
Receptor ground-level elevation
Units
-
User units
User units
Meters
User height units
card (a maximum of 180 receptors is allowed input to MPTER for both those
generated by Option 8 and those entered on CARD TYPE 12).
See Section 4.2.7.
4-7
-------
TABLE 4-12. SDM CARD 13—SEGMENTED RUN3 (ONE CARD)
Variable
Description
Units
I DAY
LDRUN
Number of days already processed
Last day to be processed in this run
Used if Option 20 equals 1; see Section 4.2.2.4.
TABLE 4-13. SDM CARD 14—METEOROLOGICAL DATA
a,b
Variable0
JYR
DAY1
JHR
IKST
QU
QTEMP
QTHETA
QHL
Description
Year of meteorological data
Julian day of meteorological data
Hour of meteorological data
Stability class for this hour
Winds peed for this hour
Ambient air temperature for this hour
Wind direction for this hour
Mixing height for this hour
Units
2 digits
3 digits
2 digits
-
m/s
Kelvin
degrees azimuth
meters
a See Section 4.2.9.
b Used with Option 5-1.
c All input variables are free format.
4-8
-------
4.2 STANDARD SDM CONTROL AND SOURCE INPUT FILE
A standard input file in the format of Tables 4-1 through 4-13 must be
created as input to SDM. Thus, these tables describe all input variables for
one input file. Other optional files are described in Section 4.3. The
remainder of this section describes the variables listed in Table 4-2 through
4-13.
4.2.1 Control and Constants (Card 4, Table 4-2)
4.2.1.1 Starting Date and Time—IDATE, IHSTRT--
The two-digit year and three-digit Julian day for the start of the run
are entered in the two portions of the indexed variable IDATE. The hour for
the start of the run (between 1 and 24) is entered in IHSTRT. These data are
used somewhat differently, depending upon whether the meteorological data are
entered through a file prepared by RAMMET or on hour-by-hour punched cards.
If data are entered on cards, all three values are replaced and are relative-
ly unimportant. If data are read from the preprocessed file, these variable
values are used to position the file so that the first meteorological data
read are for the proper day.
4.2.1.2 Number of Periods, Number of Hours—NPER, NAVG--
Any run of SDM will be for a given simulated length of record, from
1 hour to 1 year. The simulation is done hour-by-hour, with an optional
printout of concentration estimates at each receptor for each hour (see
"Printed Output Options" later in this section). A printout of concentration
estimates for one other averaging period is also available, including the
length in hours that the data entry represents, the variables, and the NAVG.
The number of these averaging periods in the run is the value entered for
NPER.
4-9
-------
Example—Simulation is desired of a 3-day (72-hour) length of record, in
which 24-hour averages are obtained as part of the run. The NPER will equal
3, and the NAV& will equal 24.
Example—Simulation is desired of a 1-year (not a leap year) length of
record, in which 8-hour averages are obtained as part of the run. The NPER
will equal 2920 (365 x 8), and the NAVG will equal 8.
4.2.1.3 Pollutant Indicator—IPOL—
The variable IPOL (see Table 4-2) is set on the point source card either
to 3 for use of the emission rate in Columns 29 to 36, or to 4 for use of
Columns 39 to 44. The IPOL is also used to select the proper headings, "S02"
or "PART," on output. The SDM was primarily intended for S02 modeling but
may be used for any pollutant that may be treated as a nonreactive, gaseous
emission. The dispersion is treated identically for the two pollutants whose
emissions are on the point-source card. Calculations may be made for pollu-
tants other than sulfur dioxide and particulate matter by substituting their
emissions in either of these fields. Unless the program is altered, however,
all headings will read "S02" or "PART". Pollutants whose emissions are
substituted should be relatively nonreactive (treat as particulate), or have
a loss rate describable by an exponential loss with time similar to SOp.
4.2.1.4 Urban/Rural Mode Indicator—MUQR—
On the rural setting should be selected through the input variable MUOR.
The urban dispersion parameter values do not apply to SDM. For rural condi-
tions when MUOR = 2, the P-G dispersion values are exercised. When the
regulatory option is chosen [IOPT(25) = 1], MUOR also determines the set of
wind profile power law exponents used for the rural mode.
4-10
-------
4.2.1.5 Number of Significant Sources—NSIGP--
The variable NSIGP is specified primarily to obtain printed information
on contributions to the concentration at each receptor from up to 25 individ-
ual sources. The value entered is the number of sources for which contribu-
tions will be printed for each hour and for each averaging time. The output
is printed so that the same number of pages is required for 1 to 10 signif-
icant sources; twice this number is required for 11 to 20 significant
sources; and three times this number, for 21 to 25 sources. Thus, care
should be exercised to specify only the number of sources that are actually
necessary.
4.2.1.6 Fifth Averaging Time for High-Five Concentration Table—NAV5—
The value of the variable NAV5 is significant only if the run is lengthy
(e.g., a simulation of 5 days or more). If the option to produce and write
the high-five table is used, this value will be the length in hours of an
additional averaging time that will be used to list the five highest con-
centrations over the period of this run. Because high-five tables are al-
ready produced for 1-, 3-, 8-, and 24-hour averaging times, none of these
values will be used if entered for NAV5. Also, the value entered should be
evenly divisible into 24. Only 2, 4, 6, and 12 meet all these criteria.
Therefore, if a need should exist to know the highest five concentrations for
any of these averaging times (2, 4, 6, or 12), the proper value should be
entered; otherwise, zero should be entered.
4.2.1.7 Multiplier Constant — CONONE--
The multiplier constant CONONE is used to convert distances in the user
units to distances in kilometers. These units are subsequently used to
obtain dispersion parameters and to relate receptors to plume locations. If
4-11
-------
the user coordinate system is in kilometers, CONONE * 1. If the user coordi-
nate system is in miles, CONONE » 1.609344.
4.2.1.8 Multiplier Constant — CELM--
The multiplier constant CELM will convert the user height units to
meters. If the elevations are reported in meters, CELM = 1; if the eleva-
tions are in feet, CELM * 0.3048. This constant is used only when terrain
adjustments are made with Option 1. In this option, heights are entered for
both the source ground-level elevations and the receptor ground-level eleva-
tions in height units convenient to the user,
4.2.1.9 Pollutant Half-Life — HAFL--
An exponential loss of the considered pollutant with travel time is in-
cluded in the model. At a travel time equal to the half-life, 50 percent of
the pollutant will remain. Although this view of chemical or physical deple-
tion processes is overly simplistic, it may be useful under certain circum-
stances. Note that the half-life is entered in seconds. If the user wants
no depletion to be considered, entering zero for the half-life will cause
those portions of the code calculating pollutant loss to be skipped.
4.2.2 Options (Card 5, Table 4-3)
There are 4 technical options, 4 input options, 11 print options, and 6
other options, either for control or for output to files. To use a partic-
ular option, the user enters 1 as input on Card 5 in the appropriate option
location. Otherwise, a zero should be entered for this variable. Values of
0 or 1 are entered for all options on Card 5.
4.2.2.1 Technical Options—IOPT(1) - IOPT(4)~
Option 1: Terrain adjustment—Terrain adjustment is a major feature of
the MPTER submodel, but will not be considered by the SFM fumigation
4-12
-------
submodel. The use of IOPT(1) « 1 will direct the SDM to internally produce a
terrain adjustment when the MPTER submodel is used and to produce no adjust-
ment when the SFM submodel is used. The use of this option requires input of
source ground-level elevation on Card 7 and receptor ground-level elevation
on Card 12. If Option 8 for generation of polar coordinate receptors is
used. Card 11 with elevations for the polar coordinate receptors are also
read (one card for each of 36 azimuths). This option also requires the entry
of six terrain adjustment factors, one for each stability class, on Card 6.
These values must be real numbers between 0 and 1. This allows the model to
be used for research with various values. The user should note that certain
values may be required for these parameters if the run results are to be
submitted in response to regulatory requirements. If O's are entered for all
six stabilities, the terrain adjustment will be done in the same manner as it
is by CRSTER. If 1's are entered for all six stabilities, the concentration
estimates will be the same as if terrain is not considered (the option not
employed), as 1's will cause the plumes to rise fully over the terrain, which
is equivalent to elevated plumes over a level surface. Therefore, if the use
of 1's for all stabilities is contemplated, applying the terrain option is
unnecessary.
Option 2: No stack downwash—With IQPT(2) » 0, stack downwash is used
(if applicable) in accordance with the procedure given in Appendix B. With
IOPT(2) = 1, stack downwash is not estimated.
Option'3; Nogradual plume rise—With IOPT(3) » 0, gradual plume rise
from stack top to the distance of final rise is determined by using the
procedures developed by Briggs (1975). With IOPT(3) » 1, only the final
plume height is.used for effective height.
Option 4; Use buoyancy-induced dlspe.rsjon—Hith IOPT(4) = 0, sources
are treated as point sources. With IOPT(4) a 1, buoyancy-induced plume size
4-13
-------
is determined in both the horizontal and vertical, dependent on plume rise,
by applying the techniques suggested by Pasquill (see Section 2). Even if
Option 3 is used, which results in the use of only the final plume height for
effective height of emission, the gradual plume rise is determined internally
to ascertain the buoyancy-induced plume size. (It would be entirely inappro-
priate tc use the final plume rise to determine the initial size close to the
stack.)
4.2.2.2 Input Options—IOPT(5) - IOPT(8) —
For the following four input options, specific action is taken if the
value of 1 is entered.
Opt ion 5: Hetegrologi cal data on cards—If IOPT(5) = 1, meteorological
data are entered on cards, with one card for each simulated hour. If IOPT(5)
- 0, meteorological data are entered by using records on Unit 11. (The
specification of the records or, this input file is given in Section 4.3.)
When the default option [IQPT(25) « 1] is used, IOPT(5) is set equal to
0, which restricts the use of this option. This is done to avoid conflict
with the calms processing procedure. If onsite or other than RAMMET data are
to be used, they must correspond to the format of the RAMMET file and be read
into the model on Unit 11.
Option 6: Read hourly emissions—If IOPT(6) * 1, hourly emissions for
each point source are read from Unit 15 in the main program, they are com-
pared with the emissions Input on the point source card for scaling the exit
velocity. Subroutine PTR performs these tasks; Subsection 4.3 and Table 4-14
specify the records on this input file.
Option 7: Specify significant sources—The number of significant sourc-
es, given as NSIGP or Card 4, is ranked when the emissions data are processed
according to the expected ground-level impact under B stability, with a wind
4-14
-------
of 3 m/s at the stack top. This option can be employed if the contribution
of a source is sought for a subsequent run that is outside this list or too
far down on it to be included among the significant sources, NSIGP on Card 4.
When IOPT(7) = 1, an additional input card is read (Card 9) that indicates
how many sources will be specified (NPT) and then gives their source numbers
(the array MRS) corresponding to the source numbers in the printed output
list. Source numbers are assigned according to the order of the source
input. For example, consider an application having 30 sources, for which a
run is deemed useful that shows contributions from 10 sources (NSIGP on Card
4 will be set to 10). Specifically, the contributions from Sources 7 and 22
are desired. The 12 most significant of the 25 sources, in order, are 3, 8,
23, 11, 2, 15, 4, 27, 1, 5, 28, and 14. Because 7 and 22 are not among these
12 and neither are they in the first 10, Option 7 is set equal to 1, and Card
9 contains 2 for NPT and 7 and 22 for the two entries to MPS. Sources 7 and
22 will occupy the first two columns in the contribution table. The program
will fill the other eight positions of the significant source list (to total
10) with the first eight sources of the list of 25 (i.e., 3, 8, 23, 11, 2,
15, 4, and 27).
When the default option [IOPT(25) = 1] is used, IOPT(7) is set equal to
0, which restricts the use of this option. This is done to avoid confusion
between estimates of zero concentration and hours with missing data because,
except in the high-five tables, flags are not used to identify concentrations
calculated for periods of calm winds.
Option 8: Input radial distances and generate polar coordinate recep-
tors—For the user's convenience in making computations at an array of recep-
tors that are positioned about a specific source or some other point, Option
8 provides for reading an additional input card (Card 10) with from one
4-15
-------
to five nonzero distances in user units. In addition, the east and PC; *h
coordinates (also in user units) of a center position are provided. >,,*
program generates the east and north coordinates of each receptor in a polar
coordinate array, which generates 36 receptors for each nonzero distance (one
for each 10 degrees of azimuth). A five-value distance array is read from
the card, and distances are entered for the number of distances desired.
Zeros are added to fill the array. For example, to produce a receptor array
with two distances, one must enter two distances and three zeros. This step
will generate 72 receptors (36 for each distance). Putting nonzero values
for all five distances will generate 180 receptors, which is the maximum
number that MPTER can compute. Thus, using Option 8 in this manner will not
allow the input of any additional receptor cards with positions specified by
the user.
The user should note that if both Option 8 and Option 1 are used for
terrain adjustment, elevations of the polar coordinate receptors must be read
when using Card 11. These elevations can best be obtained by drawing 36
radials from the designated center point on a topographical map and drawing
circles for each distance. The elevations can then be determined from the
map by reading them outward from the center, starting with the 10-degree
azimuth radial. If all five distances are used so that 180 receptors are
generated, a card with ENDREC 1n Columns 1 through 6 must be read after Card
10 (or the last card of Card 11, if used).
4.2.2.3 Printed Output Options—IOPT(9) - IOPT(19)--
When used (set equal to 1), the 11 printed output options will cause
portions of the computer output to be skipped. A normal run will generally
set most of these options equal to 1, and only those set to 0 will give
output.
4-16
-------
Option 9: Delete emissions with height table—Option 9 will be left at
0 only if it is desirable to look at the distribution of physical stack
heights of the sources being modeled. This table is printed at the end of
the main program.
Option 10: Delete averaging-timeL meteorological summary—Option 10 will
be left at 0 when the user desires to obtain a listing of the hourly meteoro-
logical data for each simulated averaging time and the resultant or average
conditions for that period. If the run is for a long period of record (e.g.,
1 year), a similar record probably has already been made for the meteorologi-
cal data. One output page for each averaging time will be required; the main
program prints this table.
Option 11: Delete hour!y contribytions—Option 11 will be left at 0
only when the value of NSIGP on Card 4 is 1 or more and when the user wishes
to examine on an hour-by-hour basis the contributions to the receptor concen-
trations of significant sources.
Option ll^^Deljte
-------
at each receptor. In addition to this sum, two components of the concentra-
tion are given: 1) that due to all significant sources, and 2) that due to
all other sources (i.e., those not considered in the sources selected as
significant for this run).
Option 15: Delete meteorological data onhourlysummary—Option 15 will
be left at 0 when the meteorological data are required for the hour printed
with the hourly summary. This information is the same as discussed under
Option 12. The meteorological data should seldom be needed on both of these
outputs.
Option16:Delete final plume height and distance to final rise on
hourly summary—Option 16 will be left at 0 when the final plume height and
distance to final rise are needed on the hourly summary. This information is
the same as on the contributions and should not be needed on both outputs.
Option 17; Delete averaging-time contributions—Option 17 will be left
at 0 when examination of the contributions from the significant sources is
desired for each averaging time.
Option 18; Delete averaging-time sjjmmary—Option 18 will be left at 0
when printout of the averaging-time summary is needed. This table is similar
to the hourly summary (see Option 14), except for the simulation period
covered. If averaging over these hours would be meaningless because a run is
being made for several independent hourly periods, Options 1? and 18 should
both be set to 1.
Option 19: Deleteaverage concentrations and high-fivetable—Option 19
will bi left at 0 to produce average concentrations for the duration of the
run and to list the five highest concentrations for four or five averaging
times. For this table to be useful, at least two periods of the concentra-
tion averaging period should be run. Any run less than 5 days will have some
4-18
-------
O's in the output table because one output will be the highest five concen-
trations for the 24-hour averaging time.
4.2.2.4 Other Control and Output Options—IOPT(20) - IOPT(25) —
The five other control and output options cause portions of the code to
be executed only if the option is used.
Option 20: Run is part of a segmented run—Option 20 is used to segment
a run into several pieces. Card 13 is read, and appropriate input and output
files are set to the correct record. Also, data for the average concentra-
tion and high-five are read from the previous segment and written for the
next segment by using Unit 14.
Properly breaking a large run into segments requires setting the number
of averaging periods, NPER on Card 4, to the total number for the sum of the
segments. This step will allow the variable LDRUN, from Card 13, to control
the program flow and temporarily store the proper data on Unit 14. For
example, to break a 1-year run into two segments, let NPER equal 366 and NAVG
equal 24 for both segments. On Card 13 for the first segment, IDAY is 0 and
LDRUN can be 180; for the second segment, IDAY is 180 and LDRUN is 366 (for a
leap year). The proper date and time should be entered on CARD 4 for each
run.
Option 21: Write partial concentrations to disk or tape—Option 21
provides for all concentration contributions from each source to each recep-
tor for each hour by using Unit 10. One record is written in Subroutine PTR
for each receptor for each hour; thus, a large number of records will be
written even for a relatively short length of simulated period. The specif-
ications for these records are given in Section 5. The user should have
knowledge of the amount of data generated before using this option.
4-19
-------
Option 22; Write hourly concentrations to disk or tape—Option 22
provides for writing a record once each hour (on Unit 12) that contains the
concentrations for each receptor. This option is written at the end of the
MAIN program. The specifications for these records are given in Section 5.
Option 23: Write averaging-time concentrations to disk or tape—Option
23 provides for writing a record once each averaging period (on Unit 13) that
contains the concentration for each receptor. This option is written at the
end of Subroutine OUTHR; specifications for these records are given in Sec-
tion 5.
Option 24: Punch averaging-time concentrations on cards—Option 24
provides for punching cards at the end of each averaging period of the con-
centration for each receptor for the averaging time (one card per receptor).
Unit 1 is used for punching. The format for these output cards is given in
Section 5.
Option 25: Set default values (used for regulatory app1ications)--The
default option [IOPT(25) = 1] sets several inputs that override other user-
input selections. Currently, the default option sets features required for
regulatory applications using MPTER. No regulatory defaults are applicable
to the SFM portion of SDM. Exercising this option results in the following:
0 Final plume rise is used (gradual or transitional plume rise is not
considered); that is, IOPT(3) is set to "1".
0 Buoyancy-induced dispersion is used [i.e., IOPT(4) is set to "1"].
For distances less than the distance to final rise, the gradual
plume rise is used to determine the buoyancy-induced dispersion,
regardless of the setting of IOPT(3).
0 Terrain adjustment factors are set to "C" for all stabilities.
0 Stack tip downwash (Briggs 1974) is considered [i.e., IOPT(2) is
set to "C"].
c Default urban or rural wind profile exponents are used, depending
on the value of MUOR; appropriate mixing heights are set.
0 Calms are treated according to methods developed by the EPA (EPA
1984), as discussed herein.
4-20
-------
0 Decay half-life is set to 4.0 hours for S02 for the urban option,
and infinite half-life (no decay) is set for all other cases.
It is possible to operate in either the urban or rural mode when the
default option is selected.
Table 4-14 contains a listing of the subsequent settings for other
options and the values for specific variables that will result when the
default option is selected.
One result of exercising the default option is that calm conditions are
handled according to methods developed by the EPA (EPA 1984). A calm hour
can be identified in the model as an hour with a windspeed of 1.0 m/s and a
wind direction equal to the previous hour. When a calm is detected in the
meteorological data, the concentrations at all receptors are set to 0 and the
number of hours being averaged is reduced by 1; however, the divisor used in
calculating the average is never less than 75 percent of the averaging time.
For any simulation, this results in the following:
0 Three-hour averages are determined by always dividing the sum of
the hourly contributions by 3.
0 Eight-hour averages are calculated by dividing the sum of the
hourly contributions by the number of noncalm hours or 6, whichever
is greater.
0 Twenty-four-hour averages are determined by dividing the sum of the
hourly contributions by the number of noncalm hours or 18, which-
ever is greater.
0 Period-of-record averages, regardless of length, are calculated by
dividing the sum of all the hourly contributions by the number of
noncalm hours during the period of record.
Concentration calculations that are affected by calms are flagged in the
printed output by placing the letter C next to the concentration value. This
treatment of calm cases is always used when the default option is selected,
but cannot be used if the default option is not selected.
4-21
-------
TABLE 4-14. DEFAULT OPTION—SUBSEQUENT SETTINGS
Employmentofthedefault option [IOPT{25)=1]will cause the input option
switches and specified variables to be set to the following:
IOPT(2) = 0
IOPT(3) « 1
IOPT(4) = 1
IOPT(5) • 0
IOPT(7) = 0
lOPT(lO) « 1
lOPT(ll) - 1
!OPT(12) - 1
10PT(13) = 1
IOPT(14) - 1
IOPT(15) » 1
IOPTU6) * 1
IOPT(17) « 1
IOPT(18) • 1
10PT(19) « 0
IOPT{20) * 0
IOPT(21) - 0
IOPT(22) - 0
!OPT{23) - 0
IOPT(24) - 0
HAFL * 14,400 seconds (for IPOL - 3, MUOR - 1)
HAFL - 0 (for IPOL ?3 or MUOR j«l)
IHSTRT - 1
NAVG « 24
NSIGP « 0
NAV5 - 0
PL « 0.07, 0.07, 0.10, 0.15, 0.35, 0.55 for MUOR « 2 (rural)
CONTER = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0 (see Card 6, Section 4.2.3)
4-22
-------
This procedure for calms is not available in MPTER outside of the de-
fault option. The user can employ this procedure, however, through the use
of the CALMPRO postprocessor program (EPA 1984). CALMPRO is available as
part of UNAMAP Version 6.
4.2.3 Wind and Terrain (Card 6. Table 4-4)
The anemometer height (HANE) in meters for the meteorological data used
is entered on Card 6. Six values (one for each stability class) for the wind
profile power law exponent (PL) are also entered on Card 6. Table 2-2 in
Section 2 includes appropriate values for the rural mode.
If Option 1 is used to make terrain adjustments, six terrain adjustment
factor values (CONTER, one for each stability class) are read from Card 6 and
are used in subsequent computations. The values must be real numbers between
0 and 1. These values are set by the regulatory default Option 25 as shown
in Table 4-14.
4.2.4 Point Source (Card 7, Table 4-5)
The alphanumeric name (RNAME) and eight variables of point-source infor-
mation are the same as those used in other dispersion models. Only one of
the two emission rates (S0« or particulate) will be used in a given run. If
only one pollutant is of interest, the other field may be left blank. If the
Option 6 hourly emission rate is not used, the emission rate should provide
the best estimate of emissions for the length of source operation and simula-
tion. If maximum or design emissions are used, concentration estimates may
be somewhat larger than actual concentrations; however, Irwin and Cope (1979)
have demonstrated that maximum operating conditions may not necessarily
produce the highest modeled concentrations. If the option is exercised to
input hourly emissions from a separate file (see Table 4-15 and Section 4.3)
4-23
-------
the input emission on each source card can either bt average (normal) emis-
sion or maximum design emission, with the exit velocity appropriate for that
condition. In MPTER, the hourly emissions input are compared with the emis-
sions initially input on Card 7, and that comparison is used to scale the
exit velocity upward if the hourly emission is greater, or downward if the
hourly emission is less. In MPTER, no provision exists for altering the
stack gas temperature. The value entered on the point-source card is used
throughout, even if hourly emissions are entered.
TABLE 4-15. SDM OPTIONAL INPUT FILE—EMISSION DATA2 (UNIT 15)
Variable Dimensions
Record Type 1
(one each for
each hour of
simulation)
IDATP
Source (IPOL. 1) 1=1, NPT
Description
Date-time indicator consisting of:
Year
Julian day
Hour
Emission rate for the pollutant
IPOL for each source
Units
2 digits
3 digits
2 digits
g/s
Input if Option 6=1.
If Option 1 for terrain adjustments is employed, the ground-level eleva-
tion of each point source, ELP (NPT) is input in units chosen as convenient
by the user (refer to Section 4.2.1.7).
4.2.5 Meteorological Data Identifiers (Card 8, Table 4-7)
If Option 5 equals 0, the user must specify the meteorological station
identifer for both the surface and upper air data. The last two digits of
the year of the data must also be specified for each station. The station
number is a five-digit code specified by the National Oceanic and Atmospheric
Administration.
4-24
-------
4.2.6 Specified Significant Sources (Card 9. Table 4-8)
The user may specify up to 25 sources as significant. This specifica-
tion will direct the SDM program to specify the individual contributions for
each period of analysis. The user selects the number of significant sources
(NPT) as well as which sources are to be considered by selecting individual
source identification numbers (MPS),
4.2.7 Receptor Data (Cards 10, 11. and 12. Tables 4-9. 4-10. and 4-11)
If Option 8 is employed, polar coordinate receptor positions are gener-
ated internally in SDM around a specified location (CENTX, CENTY) for one to
five radial distances (RADIL). Thirty-six receptors are generated for each
distance. If all five distances are used, 180 receptors are generated—the
maximum number of receptors allowed in SDM. Note that the distances (and
also the center of the polar coordinate grid) are specified in user units.
If Option 8 is used to generate the polar coordinate receptors and Option 1
is used to include terrain adjustments, the ground-level elevations of these
receptors must be entered with Card 11. A separate card is used for each
azimuth, with from one to five elevations per card.
An alternative method of entering receptors into an SDM run is to spec-
ify receptor locations (again, in user units) on individual cards for each
receptor (Card 12).
The receptor height above local ground level must be in meters. Al-
though in many applications the height will be zero (receptor at the ground),
in other situations determining concentrations above the ground may be desir-
able, such as at plume centerline. Although no restriction exists for this
height, careful thought should be given to the assignment of receptor heights
far removed from the ground surface. A cautioning statement will be gener-
ated if both the effective plume height and the receptor height are above the
mixing height.
4-25
-------
Values for receptor elevations are required only if Option 1 is used for
terrain adjustments in the MPTER submodel. Elevations are entered in the
user height units. Estimations in SDM are limited to receptors whose ground-
level elevation is lower than the lowtst elevation of all the stack tops 1n
the run. A receptor whose elevation is above this lowest stack height will
not have a calculated concentration estimate; instead, multiple asterisks
will appear on the concentration output for this receptor. Also, two aster-
isks will appear beside the receptor listing in the initial input section of
the SDM printed output for receptors higher than the lowest stack height.
Single asterisks will appear beside receptor numbers whose elevations are
below the ground-level elevation of the source having the highest ground-
level elevation. When two sources are treated independently by the SFM
submodel ind by the MPTER submodel with terrain, caution should be used in
interpreting the concentration estimates for combined source concentrations
where elevated receptors were used.
4.2.8 Segmented Run (Card 13, Table 4-12)
See Section 4.2.2.4.
4.2.9 Meteorological Data (Card 14, Table 4-13)
Meteorological data files prepared for the CRSTER, MPTER, and RAMR
models are acceptable by SDM. Proper running of the RAMR or CRSTER pre-
processor programs results in a 1-year period of record with one record for
each calendar year. This record contains 24 values of each of the following
parameters: Pasquill-Gifford Stability Class, wind-speed (at anemometer
height), ambient air temperature, wind flow vector (wind direction ±180
degrees), and mixing height. The user should keep in mind that the use of
these programs to process meteorological data requires the input of a
4-26
-------
complete set of hourly surface and mixing height data. When these data are
used for input to SDM, one record is read for each simulated day. If a run
is being made for a period of record of less than a year and starts after Day
001 (January 1), SDK will skip records to arrive at the proper day based on
the variable IDATE(2) on Card 4.
If meteorological data from the preprocessed file are used, Option 5
will be zero. Also, the four variables on Card 8 should be read in and
checked against the data on the input file.
Alternatively, when Option 5 is equal to 1, meteorological data are read
froir cards (see Card 14) with one record for each simulated hour in the run.
The wind speed on this card is for the anemometer height. The wind direction
is the direction from which the wind blows.
Appendix D provides an example input file including cards and inputs
listed in the order shown above.
4.3 OTHER INPUT FILES
As shown in Figure 4-1, a number of additional input files are required
to run SDM. These are separate from the standard input file in Section 4.2.
Input specifications for each additional file are given in Tables 4-15 through
4-17. Table 4-15 shows the formats for specifying the hourly emission rates
for individual sources. This file is only required if Option 6 is equal
to 1. Table 4-16 shows the input format for the preprocessed meteorology.
This format is the standard format from RAMMET. These data are required if
Option 5 equals 0. Table 4-17 shows the input format for the shoreline tower
meteorological data. These data are required for running the SDM model. A
supplemental program, SDMMET, prepares the user's tower data for use as SDM
meteorological data input. Use and requirements of this program are given in
Section 7.
4-27
-------
TABLE 4-16. SDH OPTIONAL INPUT FILE - METEOROLOGICAL DATA (UNIT ll)j
Variable
Dimensions
Description
Units
Record Type 1
ID
IYEAR
I DM
IYR
Record Type 2
(one for each
day of year)
SCF station identifier 5 digits
Year of surface data 2 digits
Mixing height station 5 digits
identifier
Year of mixing height data 2 digits
JYR
IMO
DAY1
IKST
QU
QTEMP
DUMR
QTHETA
HLH
24
24
24
24
24
2, 24
Year
Month
Julian day
Stability class
Wind speed
Ambient air temperature
Flow vector to nearest 10
degrees
Randomized flow vector
Mixing height
m/s
Kelvin
degrees-azimuth
degrees-azimuth
meters
Required if Option 5 equals 0.
TABLE 4-17. SDM MANDATORY SHORELINE TOWER METEOROLOGICAL DATA (UNIT 19}j
Variable
I DAY
IHR
UL
US
PTMOL
PTMOW
DTHDZ
HO
Description
Julian day
Hour
Wind speed in TIBL
Wind speed at stack height
Mean potential temperature, over land
Mean potential temperature over water
Over-water potential temperature
Surface, sensible heat flux
Units
-
.
m/s
m/s
Kelvin
Kelvin
K/m
W/m2
One card per hour; see Section 7 for the SDMMET program that generates this
file.
4-28
-------
4.4 TREATMENT OF SHORELINE ORIENTATION
An Important consideration in the modeling of coastal areas is the
location and orientation of the shoreline. Of primary concern in SDM is the
development of the TIBL with onshore winds. The wind direction for shoreline
fumigation, the TIBL height, and the source distance to the shoreline are a
function of the location and orientation of the shoreline. The user should
specify the shoreline carefully, paying full attention to location of sources,
receptors, and irregularities in the land-sea interface.
SDK uses a series of shoreline definition cards to identify the shore-
line for each source. Each shoreline definition card uniquely identifies the
nearest shoreline for each source. This input allows flexibility in the
modeling of a shoreline for different sources.
4.4.1 General Use of Shoreline Definition Card (Card 7A,Table 4-6}
The shoreline definition card is used to define the relationship between
a point source and the nearby shoreline. This relationship is specified by
selecting a point on the shoreline and drawing two lines away from the loca-
tion of this point that follow the shoreline. Figure 4-2 gives four examples
of shoreline point selection and the accompanying shoreline definition lines.
The shore point is selected by examining the shoreline for any place where
two straight or near straight shorelines come together. In Figure 4-2,
source SI is on a shoreline with a gradual bend. The shore point is located
at the approximate intersection of this bend and two lines are drawn to
follow the shore on either side of the bend. Source S2 shows a more acute
bend with the corresponding point and lines drawn. Source S3 has an inverted
bend and is handled the same way. Source S4 has a virtually straight shore-
line. The location of the shore point in this case is arbitrary and is
chosen at the source located on the shoreline. In all cases the angle, 6, as
shown in Figure 4-2, is the inclusive angle of the shorelines over water,
4-29
-------
g
UJ
UJ
METERS
Figure 4-2. Use of the shoreline definition cards.
4-30
-------
The remaining angle (360-9) represents the wind fetch over land. The wind
angles beginning (BA) and ending (EA) and the applicable upwind fetch for
onshore flow are determined from the shore point and shorelines as defined
above. Figure 4-2 shows various values of BA and EA for different shore-
lines.
The variable FETCH is generally assigned a value of 20 degrees (this is
the default value). FETCH limits the wind angles of consideration for on-
shore wind flow to within 20 degrees of the actual shoreline. For example,
in Case a in Figure 4-2 the shoreline was defined from 25 degrees through 245
degrees. By designating FETCH as 20 degrees* the wind angles that will apply
to onshore wind flow are 45 degrees through 225 degrees. Examples of the
shoreline definition cards for Figure 4-2 are as follows:
SNAME__ : _XLS YSL_ BA EA FETCH
SOURCE SI 2000 6000 2§ 245 20
SOURCE S2 5000 6000 60 325 20
SOURCE S3 1000 2000 355 495 20
SOURCE S4 5000 3000 205 395 20
See Table 4-6 for specific format of the shoreline definition cards.
4.4.2 Complex Shoreline Modeling
Complex and irregular shorelines represent a unique situation. The
fumigation submodel of SDM is generally applicable to a relatively smooth
shoreline. Very irregular shoreline configurations may or may not be associ-
ated with TIBL formation, e.g., shallow or narrow bays and peninsulas. In
these cases, the user should evaluate the entire area being modeled based on
the shoreline, source locations, and receptor locations. Examples of complex
shoreline models are described and shown in Figure 4-3.
4-31
-------
9)11
SHORELINE DESCRIPTION
a) SIMPLE TRANSITION
b) SHALLOW BAY
C) SOURCE DIRECTLY INLAND
OF PENINSULA
d) SOURCE LOCATED
ON PENINSULA
6) DEEP BAY
f) SIMPLE LINEAR
SHORELINE
0) SIMPLE TRANSITION,
BEGINNING
h) SIMPLE TRANSITION,
MIDDLE
t) LAND IN
SHORELINE
j) HIGHLY ERRATIC
SHORELINE
WITH ISLANDS AND
JETTING PENINSULA
Figure 4-3. Complex shoreline.
4-32
-------
SECTION 5
SDM OUTPUT
Output for the SDM program consists of a standard printed output and
additional optional output on Units 10, 12, 13, 14, and 20. Table 5-1 de-
scribes the type of output obtained from an SDM run on the standard printed
output device. The standard output includes the special shoreline fumigation
applicability report for each day and source. This portion of the output is
arranged by day and source and hour-of-day such that a "1" is printed when
shoreline fumigation is applicable and "0" when it is not applicable. Also,
the high-five tables on the standard output show an "F" next to the concen-
tration if that averaging period's concentration includes an hour when a
shoreline fumigation event developed.
Each of the optional output file formats (Units 10, 12, 13, 14, and 20)
is given in Tables 5-2 through 5-7. These external files are a direct func-
tion of the original MPTER Model and represent various formats and data
combinations that may be obtained. The newest external file is that de-
scribed in Table 5-7 for Unit 20. Table 5-7 shows the shoreline fumigation
output format that contains concentrations and meteorological conditions for
all applicable hours when a TIBL developed and a source was subject to fumi-
gation.
5-1
-------
TABLE 5-1. SDM STANDARD PRINTED OUTPUT
Output
Mandatory output on all runs
Fumigation submodel selection report
Emissions with height table
Meteorological data for averaging period
No. of
Number of lines pages
3-6
5-15
i
1
Meteorological data on hourly contributions or
hourly summaries
Final plume rise and distance to final rise
Less than 10 sources
250 sources (1 line plus 2 lines for each 10
sources or fraction of 10 sources)
Hourly contributions (for each hour
For 1 to 10 significant sources
About 30 receptors
About 31 to 83 receptors
About 84 to 136 receptors
About 137 to 180 receptors
For 11 to 20 significant sources
For 21 to 25 significant sources
Hourly summaries (for each hour)
(See above for number of lines to add for
meteorological and plume dita)
About 45 receptors
About 46 to 98 receptors
About 99 to 151 receptors
About 152 to 180 receptors
Averaging period contributions (for each period)
For 1 to 10 significant sources
46 receptors
47 to 99 receptors
100 to 152 receptors
153 to 180 receptors
For 11 to 20 significant sources
For 21 to 25 significant sources
Averaging period summary (for each period)
44 receptors
45 to 78 receptors
99 to 151 receptors
152 to 180 receptors
Average concentrations and high-five table for
180 receptors (proportionally less for fewer
than 180 receptors)
3
51
Twice that for
1 to 10
Three times that
for 1 to 10
Twice that for
1 to 10
Three times that
for 1 to 10
2
3
4
3
4
2
3
4
1
2
3
4
17
5-2
-------
TABLE 5-2. SOM OPTIONAL OUTPUT PUNCHED CARDS—AVERAGE CONCENTRATIONS3
Variable
RREC
SREC
GWU
K
ZR
ELR
IDATE(l)
IDATE(2)
NB
Card
columns
1-4
5
6-15
16-25
26-35
36-45
46-50
51-60
61-70
72-73
75-77
79-80
Description
Word CNTL punched
Blank
East coordinate of receptor
North coordinate of receptor
Concentration for averaging time
Blank
Receptor number
Receptor height above ground
Receptor ground-level elevation
Year
Julian day
Beginning hour of this period
Units
User units
User units
ug/m3
-
meters
User height
units
•
-
-
Punched if Option 24
time.
; one card for each receptor for each averaging
TABLE 5-3. SDM OPTIONAL OUTPUT FILE—PARTIAL CONCENTRATIONS (UNIT 10)'
Variable Dimensions
RECORD lb
NRECEP
NPT
RREC(I) 1=1, NRECEP
SREC(I) 1=1, NRECEP
RECORD 2C
I DATE
LH
K
PARTC(J) J - 1, NPT
Description
Number of receptors
Number of receptors
East coordinate of receptor
North coordinate of receptor
Year and Julian day
Hour
Receptor number
Concentration at Receptor K
from Source J
Units
Ml
User units
User units
9/nf3
a Output if Option 21 » 1.
c One record for each receptor for each simulated hour, from PTR,
5-3
-------
TABLE 5-4. SDH OPTIONAL OUTPUT FILE-HOURLY CONCENTRATIONS (UNIT 12)a
Variable
RECORD 1
NPER
NAVG
LINE1
LINE2
LINES
RECORD 2
NRECEP
RREC(I)
SREC(I)
RECORD 3b
IDATE(2)
LH
PHCHI(I)
Dimensions
14
14
14
1=1, NRECEP
I - 1, NRECEP
1=1, NRECEP
Description Units
Number of periods
Number of hours in averaging period
80 alphanumeric characters for title
80 alphanumeric characters for title
80 alphanumeric characters for title
Number of receptors
East coordinate of receptor User units
North coordinate of receptor User units
Julian day
Hour
Hourly concentration for each g/m3
receptor
a Output if Option 22 » 1.
One for each simulated hour.
TABLE 5-5.
Variable
RECORD 1
NPER
NAVG
LINE1
LINE2
LINES
RECORD 2
NRECEP
RREC(I)
SREC(I)
RECORD 3b
IDATE(2)
NB
PCHI(K)
a Output if
SDM OPTIONAL OUTPUT FILE— AVERAGING PERIOD CONCENTRATIONS (UNIT 13}a
Dimensions
14
14
14
1*1, NRECEP
1=1, NRECEP
K - 1, NRECEP
Option 23 * 1.
Description Units
Number of periods
Number of hours in averaging period
80 alphanumeric characters for title
80 alphanumeric characters for title
80 alphanumeric characters for title
Number of receptors
East coordinate of receptor User units
North coordinate of receptor User units
Julian day
Ending hour of period
Averaging period concentration for g/m3
each receptor
5-4
-------
TABLE 5-6. SON OPTIONAL TEMPORARY FILE—VALUES FOR HIGH-FIVE TABLES (UNIT 14);
Variable
Dimensions
Description
Units
ONE RECORD
IDAY (on write)
IDAYS (on read)
SUM
NHR
DAY1A
HR1
HMAXA
Number of days processed
Number of days previously processed
180 Cumulation of long-term concentration
Number of hours processed
Julian day number of start of period
of record
Start hour of period of record _3
3, 5, Highest five concentrations (g/m" ),
180, 5 and associated day and hour, for each
receptor, for five different averag-
ing times
Output if Option 20 = 1.
TABLE 5-7. SDM SPECIAL SHORELINE FUMIGATION OUTPUT (UNIT 20)
Variable
Format
Description
Units
RECORD 1
Identifier A5
IDAY 13
IHR 12
HO F7.2
UL F13.1
US F13.1
DTNDZ F10.4
PTMOL F8.1
PMTOLV F8.1
RECORD 2
Identifier A5
SNAME 3A4
SREC F13.3
RREC F13.3
CONC F10.3
"TIBL:"
Day of year
Hour of day
Sensible heat flux
TIBL windspeed
Stack windspeed
Over-water potential temperature
gradient
Over-land mean temperature
Over-water mean temperature
"CONC"
Source identifier
East receptor coordinate
North receptor coordinate
Concentration at receptor
1/nT
m/s
m/s
Kelvin/m
K
K
User units
User units
micrograms/m3
5-5
-------
SECTION 6
MODEL EXECUTION
Execution of the SDM Model may be performed through job control language
(JCL) on an IBM-3090 mainframe system. The user must generate the appropri-
ate input files, as described in Section 4, and specify all input and output
file names. This section reviews the appropriate JCL for running the model
on an IBM-3090 mainframe computer.
Following is a listing of the JCL to execute SDM using catalogued parti-
tioned data sets for all model input and output. Refer to the "IBM VS FOR-
TRAN Programming Guide" for more information on executing FORTRAN programs
and run time options. The lower case characters "nnn" and "uuu" should be
replaced by an account name and a user 10.
//SDM JOB (nnnnSPCLD, Muuu),PRTY=2, TIME=(0,30)
/* ROUTE PRINT HOLD
//*
//* EXECUTE PROGRAM
//*
//STEP1 EXEC P6M=SDM
//STEPLIB DO DSN=VGDTIER.Q.LOAD,DISP=SHR
//*
//* INPUT FILES
//*
//FT05F001 DD DSN=VGDTIER.SDM.INPUT(FILENAME),DISP=SHR
//FT11F001 DD DSN=OAMS.PREPYY.$#####.U#####,DISP=SHR
//FT19FOC1 DD DSN=VGDTIER.SDM.TOWER(FILENAME),DISP=SHR
//*FT15F001 DD DSN=VGDTIER.SDM.HOURLY(FILENAME),DISP=SHR
//*
6-1
-------
//* OUTPUT FILES
//*
//FT06F001 DD SYSQUT=A
//FT20F001 DD DSN=VGDTIER.SOM,SHORE(FILENAME),DISP=SHR
//*FT10F001 DD OSN=VGDTIER.SDM.PARTIAL(FILENAME),DISP*SHR
//*FT12F001 DD DSN=VGDTIER.SDM.HOURCONC(FILENAME)»DISP=SHR
//*FT13F001 DD DSN=VGDTIER.SDM.AVEPER(FILENAME),DISP=SHR
//*FT14F001 DD DSN-VGDTIER.SDM.TEMP(FILENAME),DISP=SHR
//SYSPRINT DD SYSOUT=A
/*
The inclusion/exclusion of data files and JCL above is, of course, contingent
upon the options selected for the input variables in File FT05F001. For
detailed information on executing Fortran programs or possible JCL options
see:
'IBM VS FORTRAN Programming Guide1 (publication SC26-4118-1)
'OS/VS2 MVS OCL1 (publication GC28-0692-5)
'Messages and Codes' (publication GC28-6631-13).
Appendix D provides an SDK input file. The JCL listing for a one-year
run and the output for this example are provided 1n Appendix E. The example
case is described 1n more detail in Section 8.
6-2
-------
SECTION 7
SDMMET PROGRAM
SDMKET is an Interactive program that creates the tower data meteorology
file for the Shoreline Dispersion Model. SDMMET requires two input files and
from these files generates an unformatted FORTRAN output file. The program
internally calculates sensible heat flux, overwater lapse rate, and mean
temperatures. The program can be run on an IBM-3090 mainframe.
The input files required to run the program are the raw tower data file
and the data format definition file. The raw file is the hourly values at
the tower. Table 7-1 lists all necessary input data. Minimum data require-
ments are two overland temperature measurements, water temperature, and wind
speed. For this case, the 10-meter overland temperature is used as the
overwater temperature and the wind speed is used for all wind speed measure-
ments. Full measurements should be made whenever possible.
The data definition file is set up to define the order and format of the
raw tower data and to provide important information about the measurements
and surrounding terrain. The inputs are given in Table 7-2. The first card
provides SDMMET with the tower measurement heights and surface roughness
length. Table 7-3 gives example surface roughness lengths for various ter-
rain. Card 2 allows the user to specify the order that the SDMMET input
variables occur in the raw tovier data file. Variable overlap can be accom-
plished by using the same position for two or more variables. For example,
if the TIBL and stack height windspeeds were measured at the same height, the
7-1
-------
TABLE 7-1. SDMMET VARIABLES'
ZO Surface roughness (meters). See Table 7-3.
II Height of 1st tower measurement station. The 10-meter height is
recommended for use.
Z2 Height of 2nd tower measurement. The use of 60-meter measurements
is recommended.
ZOW Height of over-water measurement. If no over-water measurements
were made, the 10-meter overland measurements are recommended.
TEMPI The temperature (in Kelvin) at the first measuring height.
Ul The windspeed (m/s) at the first measuring height.
TEMP2 The temperature (in Kelvin) at the second measuring height.
UL The windspeed (m/s) within the TIBL. The value at 60 meters is
recommended.
USTACK The windspeed (m/s) at stack height. If no measurement is made at
stack height, the closest height on the tower is recommended (i.e.,
60 meters).
TEMPQW The over-water temperature (in degrees Kelvin). The overland
temperatureat 10 meters is recommended if no over^water
measurements are made.
TEMPWT The water temperature (in degrees Kelvin). This can be from the
environmental water monitoring done at the plant or from nearby
facilities.
Format specified by user as described in text and Table 7-2.
7-2
-------
T/iBLE 7-2. SDMMET INPUT FILE
Columns
CARD 1
1-10
11-20
21-30
31-40
CARD 2
1-4
5-8
9-12
13-16
17-20
21-24
25-28
CARD 3
1-80
Format
F10.0
F10.0
F10.0
F10.0
14
14
14
14
14
14
14
ASO
Variable
Z+
Zl
Z2
zow
ORD(l)
ORD(2)
ORD(3)
ORD(4)
ORD(5)
ORD(6)
ORD(7)
FMT
Descriptor
Surface roughness length
1st tower level height
2nd tower level height
Overwater temperature height
Position of 1st tower level
temperature
Position of 1st tower level
windspeed
Position of 2nd tower level
temperature
Position of TIBL windspeed
Position of stack height
windspeed
Position of over-water
temperature
Position of water temperature
Format of tower data using
fortran format editing
characters enclosed in
parentheses
7-3
-------
TABLE 7-3, SURFACE ROUGHNESS LENGTHS CATEGORIZED BY TERRAIN3
Class
1
2
3
4
5
6
7
8
Terrain descriptions
Open sea, fetch at least 5 km
Mud flats, snow; no vegetation, no obstacles
Open flat terrain; grass, fw isolated obstacles
Low crops; occasional large obstacles, x/h >20
High crops; scattered obstacles, 15 < x/h <20
Parkland, bushes, numerous obstacles, x/h -v 10
Regular large obstacles coverage (suburb, forest)
City center with high- and low-rise buildings
Zo , m
0.0002
0.0050
0.030
0.10
0.25
0.50
1.0
user defined
NOTE: Here x Is a typical upwind obstacle distance and h the height of the
corresponding major obstacles. Class 8 is theoretically intractable
within the framework of boundary layer meteorology and can better be
modeled in a wind tunnel.
a
Classification is from Davenport (1960) and Wieringa (1980).
7-4
-------
position of these data would be the same for the TIBL and the stack height.
The final card of this data file is the FORTRAN format statement that will
read in the file. This format statement should be enclosed by parentheses.
For more information on FORTRAN format statements, consult a FORTRAN users'
guide or a FORTRAN textbook.
Following is a listing of the JCL to execute the model using catalogued
partitioned data sets for all model inputs and outputs. Refer to the "IBM VS
FORTRAN Programming Guide" for more information on executing FORTRAN programs
and run time options. The lower case characters 'nnn1 and 'uuu' should be
replaced by an account name and user ID.
//SDMMET JOB (nnnnSPCLD.Muuu) ,PRTY*2JIME=0,20)
/* ROUTE PRINT HOLD
//*
//* EXECUTE PROGRAM
//*
//STEP1 EXEC PGM=SDMMET
//STEPLIB DD DSN=VGDTIER.Q.LOAD,DISP=SHR
//*
//* INPUT FILES
//*
//FT03F001 DD DSN=VGDTIER.SDMMET.INPUT(FILENAME),DISP=SHR
//FT04F001 DD DSN=VGDTIER.SDMMET.TOWER(FILENAME),DlSP=SHR
//*
//* OUTPUT FILES
//*
//FT11F001 DD DSN*VGDTIER.SDM.TOWER{FILENAME),DISP=SHR
//*
//SYSPRINT DD SYSOUT=A
/*
For detailed information on executing FORTRAN programs or possible JCL
options see:
'IBM VS FORTRAN Programming Guide1 (publication SC26-4118-1)
'OS/VS2 MVS JCL1 (publication GC28-0692-5)
'Messages And Codes' (publication GC28-6631-13).
7-5
-------
SECTION 8
EXAMPLE CASE
An example case output of the SDM Model has been included in this user's
manual to allow the user to insure a good comparison with a test case. The
input and output files have been included in Appendixes D and E, respectively.
This example is based on a hypothetical shoreline, randomly-generated
tower meteorological data, and surface and mixing height meteorological data
(processed in the RAMMET meteorological preprocessor program). This test
case was for a one-year analysis.
Nine sources are positioned in three locations along a hypothetical
shoreline. To model this scenario, 37 receptors were located south of the
nine sources with the shoreline at various distances to the north. Sources 1
through 3 are located 70 meters from the shore, Stacks 2 through 6 are 560
meters from the shore, and Stacks 7 through 9 are 280 meters from the shore.
Appendix D presents the input data file including the option switches,
source characteristics, and model specifications. Appendix E presents the
output from such a test run and includes the input/output options, the shore-
line fumigation applicability indicators, and the 1-h, 3-h, 8-h, and 24-h
high-five tables. The appearance of an "F" after a concentration in these
high-five tables indicates that at least one hour of the subject averaging
period was subject to fumigation and the appropriate SFM portion of SDM was
used for this hour. No "F" indicates that the MPTER submodel was used exclu-
sively.
8-1
-------
REFERENCES
Anlauf, K. G., P. Fellin, H. A. Wiebe, and 0. T. Melo. 1982. The Nanticoke
Shoreline Diffusion Experiment. Part IV. A. Oxidation of Sulphur Dioxide in
Powerplant Plume. B. Ambient Concentrations and Transport of Sulfur Di-
oxide, Particulate, Sulphate and Nitrate, and Ozone. Atmos. Environ. 16,
455-466.
Briggs, G. A. 1975. Plume Rise Predictions. In: Lectures on Air Pollution
and Environmental Impact Analysis, Duane A. Haugen, ed. American Meteoro-
logical Society, Chapter 3 (pp. 59-111). Boston, MA 296 pp.
Briggs, G. A. 1974. Diffusion Estimation for Small Emissions. In ERL, ARK,
U.S. AEC Report ATDL-106. U.S. Atomic Energy Commission. Oak Ridge, Ten-
nessee.
Environmental Protection Agency. 1980. Recommendations on Modeling. Appen-
dix G to: Summary of Comments and Responses on the October 1980 Proposed
Revisions to the Guideline on Air Quality Modeling. Meteorology and Assess-
ment Division, Office of Research and Development. Research Triangle Park,
NC.
Environmental Protection Agency. 1984. Calms Processor (CALMPRO) User's
Guide. EPA-901/9-84-001. Air Management Division. Boston, MA.
Fox, A. H. 1963. Fundamentals of Numerical Analysis. The Ronald Press
Company, New York.
Gamo, M. S., S. Yamamoto, 0. Yokoyama, and H. Yashikado. 1983. Structure of
the Free Convective Internal Boundary Layer Above the Coastal Area. Journal
Meteorological Society - Japan, 61, 110-124.
Gifford, F. A., Jr. 1960. Atmospheric Dispersion Calculations Using the
Generalized Gaussian Plume Model. Nuclear Safety 2 (2): 56-59.
Gifford, F. A. 1976. Turbulent Diffusion-Typing Schemes: A Review, Nuclear
Safety, 17 (1): 68-86.
Hanna, S. R., G. A. Briggs, J. Deardorff, B. A. Egan, F. A. Gifford, and F.
Pasquill. 1977. AMS Workshop on Stability Classification Schemes and Sigma
Curves - Summary of Recommendations. Bulletin - Americal Meteorological
Society, 58: 1305-1309.
R-l
-------
Hoff, R. M., N. B. A. Trivett, M. M. Millan, P. Fellin, K. A. Anlauf, H. A.
Wiebe, and R. Bell. 1982. The Nanticoke Shoreline Diffusion Experiment.
Part III. Ground Based Air Quality Measurements. Atmospheric Environment,
16, 439-454.
Irwin, J. S., and A. M. Cope. 1979. Maximum Surface Concentration of S0?
from a Moderate-Site Steam-Electric Power Plant as a Function of Power Plant
Load. Atmospheric Environment 13: 195-197.
Kerman, B. R., R. E. Mickle, R. V. Portelli, and P. K. Misra. 1982. The
Nanticoke Shoreline Diffusion Experiment. Part II. Internal Boundary Layer
Structure. Atmospheric Environment, 16, 423-437.
Misra, P. K., and McMillan. 1980. On the Dispersion Parameters of Plumes
from Tall Stacks in a Shoreline Environment. Boundary-Layer Meteorology, 19,
175-185.
Misra, P. K., and R. Onlock. 1982. Modeling Continuous Fumigation of the
Nanticoke Generating Station. Atmospheric Environment, 16, 479-489.
Pasquill, F. 1961. The Estimation of the Dispersion of Windborne Material,
Meteorological Magazine, 90 (1063): 33-49.
Pasquill, F. 1976. Atmospheric Dispersion Parameters in Gaussian Plume
Modeling. Part II. Possible Requirements for Change in the Turner Workbook
Values. EPA-600/4-76-030b, U.S. Environmental Protection Agency, Research
Triangle Park, NC. 44 pp.
Pierce, T. E., and D. B. Turner. 1980. User's Guide for MPTER a Multiple
Point Gaussian Dispersion Algorithm with Optional Terrain Adjustment. EPA-
600/8-80-016, U.S. Environmental Protection Agency, Research Triangle Park,
NC.
Portelli, R. V. 1982. The Nanticoke Shoreline Diffusion Experiment. Part
I. Experimental Design and Program Overview. Atmospheric Environment, 16,
413-421.
SethuRaman, S. 1987. Analysis and Evaluation of Statistical Coastal
Fumigation Models. EPA-450/4-87-002, U.S. Environmental Protection Agency,
Research Triangle Park, NC.
Weisman, B. 1976. On the Criteria for the Occurrence of Fumigation Inland
from a Large Lage - A Reply. Atmospheric Environment, 12, 172-173.
R-2
-------
APPENDIX A
USER'S GUIDE FOR SHORELINE
FUMIGATION MODEL (SFM)
A-l
-------
USER'S GUIDE FOR
SHORELINE FUMIGATION MODEL
(SFM)
Suzanne Templeman and Sethu Raman
Marine, Earth and Atmospheric Sciences Department
North Carolina State University
Raleigh, NC 27695-8208
Developed for PE1 Associates, Inc.
under EPA Contract No. 68-02-4351
EPA Project Officer
Jawad S. Touma
July 1988
A-2
-------
Abstract
This user's guide describes the Shoreline Fumigation Model (SFM) developed by
Misra (19SO). Also included in this guide is a listing of the model program, sample input
and output files and a discussion of how the input data required by the model should be
obtained. The information contained herein is intended to facilitate use of the model in
conjunction with a multiple point Gaussian dispersion model (e.g., the EPA regulatory
model MFTER). The combined model will be applicable to modeling dispersion in
shoreline environments during both fumigation and non-fumigation events.
SFM predicts ground level concentrations at user-defined receptor points based on
hourly meteorological and source data. The meteorological input required by the model
includes: mean wind speed at stack height and within the thermal internal boundary layer;
mean potential temperature over land and over water; vertical potential temperature gradient
overwater, and surface, sensible heat flux over land. Source data include plume buoyancy,
emission rate and stack height In order to apply the model, the wind must be onshore, the
lapse race overwater must be stable and there must be sufficient surface healing over land to
trigger the establishment of a thermal internal boundary layer.
A-3
-------
Actaowledgments
Support of North Carolina State University by PEI Associates, Inc. of Cincinnati, Ohio
under EPA Contract No. 68-02-4351 is gratefully acknowledged.
A-4
-------
CONTENTS
Page
Abstract
List of Symbols
1. Introduction
2. Shoreline Fumigation Model (SFM)
2.1 Description
2.1.1 TIBL Height
2.1.2 Plume Rise
2.1.3 Dispersion Coefficients for a Buoyant Plume
2.1.4 Evaluation of Pollutant Concentration
2.2 Operating Conditions
2.3 Input Data Requirements
2.3.1 Methods for Calculating Surface, Sensible Heat Flux
2.3.2 Determination of Other Meteorological Input
2.3.3 Input Data Format
2.4 Output Data Description
3. Future Considerations
4. References
Appendix Program Flowchart and Source Code
Appendix Sample Input and Output Files
Appendix Surface Roughness Lengths
A-5
-------
Last of Symbols
A collective term for atmospheric variables involved in
TffiL growth (m1/2)
ai, ai, as empirically determined constants
cp specific heat at constant pressure (JK4kg-1)
es saturation vapor pressure (mb)
F plume buoyancy (n^s-3)
g acceleration due to gravity at the earth's surface (ms'2)
G ground heat flux (Wm-2)
H plume height (m)
H0 surface, sensible heat flux (W m-2)
Hstk stack height (m)
HT TBL height (m)
k von Karman's constant (0.4)
L Monin-Obukhov length (m)
Le latent heat of evaporation (Jkg*1)
mw mean molecular weight of water vapor (kgmoH)
N Brunt-Vaisala frequency (s-1)
P atmospheric pressure (mb)
Q source strength (g s'1)
Rj gradient Richardson number
Rib bulk Richardson number
RN net radiation (Wnr2)
R* universal gas constant (8.31432 JK^moH)
T air temperature (K)
U (z) wind speed at tower level z over land (m s'1)
A-6
-------
List of Symbols, continued.
UL mean wind speed within the TIBL (m s'1)
Us mean wind speed at stack height (ms'1)
u* friction velocity (ms-1)
w* convective velocity (m s-1)
X, x downwind distance (m)
x' downwind distance on the TIBL interface
also point downwind at which the plume begins to intersect
the TIBL (m)
Y, y horizontal or off-centerline distance (m)
y1 horizontal distance on the TIBL interface (m)
z vertical distance (m)
Zj, 7.2 vertical distance at levels 1 and 2 (m)
ZQ surface roughness length (m)
A slope of the saturation vapor pressure versus
temperature curve (mbK-1)
Y psychrometric constant used in energy balance
calculations (mbK-1)
p atmospheric density (kgnr3)
o* effective horizontal dispersion coefficient
1^
o* as a (x) + a (x, x1) (m)
CyL horizontal dispersion coefficient in the unstable air within the TIBL (m)
Oys horizontal dispersion coefficient in stable air above the TIBL (m)
a2s vertical dispersion coefficient in stable air above the TIBL (m)
0 (z) potential temperature over land (K)
A-7
-------
List of Symbols, continued.
0L mean potential temperature at tower level z over land (K)
9W mean potential temperature over water (K)
0* friction temperature scale used in similarity theory (K)
YH universal function in the diabatic surface layer
temperature profile
VM universal function in the diabatic surface layer
wind profile
A-0
-------
1. INTRODUCTION
Coastal environments vary from inland environments in several ways which affect
the dispersion of atmospheric pollutants. The occurrence of sea or lake breezes, a more
moderate climate and the continuous presence of an internal boundary layer while air flows
across the shoreline are some of the noted distinctions (Raynor et al., 1980). The internal
boundary layer is of particular importance to understanding the meteorological processes
that influence atmospheric dispersion. An internal boundary layer forms whenever the air
flow crosses the surface discontinuity between the land and water (Raynor et al., 1980).
These two surfaces commonly differ in temperature and nearly always differ in roughness,
which leads to the creation of an interface between the air whose properties were
determined by passage over the upwind surface and the air modified by passage over the
downwind surface (Raynor et al., 1980). The internal boundary layer due to the roughness
change is dominated, for the most part, by the affects of the thermal discontinuity and is
generally known as the Thermal Internal Boundary Layer, or T1BL (Raynor et al., 1979).
The TlBL interface grows parabolically with downwind distance until it reaches an
equilibrium height which is the height of the inland mixed layer. The rate of growth
depends primarily on the wind speed, the original (upwind) stability of the air and the
magnitude of the surface, sensible heat flux over land. An example of internal boundary
layer and stack locations for a complex shoreline is shown in Figure 1.
Water
Land
Water
Mainland
Figure 1. Example of internal boundary layer and stack locations for onshore flow at a
complex shoreline (from Raynor et al., 1980).
A-9
-------
Basically, two situations may be experienced with onshore flow. Either the land
will be warmer and rougher than the water or the land will be colder and rougher than the
water. In the former situation, which is the case under consideration here, the air mass
cools from below as it crosses the water surface and becomes stable. TTBLs characterized
by stable overwater lapse rates initiate growth at the shoreline and reach an equilibrium
height at some distance downwind. In die latter situation the flow over land may become
more stable. A water surface warmer than the adjacent land may be associated with an
overwater stability that is near-neutral or unstable. In this situation the TIBL grows out of
the mixed layer overwater and dius begins with some initial height (this case, however, is
not considered).
Of interest here and of concern because of the potential for high inland
concentrations is the case of onshore flow from colder water to heated land in which a
plume, emitted from a tall stack at the shoreline, initially travels in the stable air with
relatively little diffusion and impacts the TIBL at some distance downwind. As long as this
situation exists, fumigation may occur continuously, resulting in high ground level
concentrations. In contrast is the situation inland in which fumigation is usually transitory
(Raynor et aL, 1980). Given the nocturnal cooling which occurs over land, the conditions
for fumigation will rarely continue past the hours of daylight (Raynor et al.f 1980).
Typically, the land temperature is warmer than the water temperature in the spring and early
summer seasons in the temperate climate zones; hence these axe periods during which the
TIBL is likely to form (Misra, 1980). An illustration of plume behavior in a shoreline
environment is given in Figure 2.
Wtter
Land
Figure 2. Plume behavior on a sunny, spring day as a function of location relative to the
TIBL. The plume emitted at the inland location essentially remains trapped
within the TIBL (after Oke, 1978).
A-10
-------
Sensitivity studies have shown that the ability to determine the TlBL height is vital
to the accuracy of model predictions (Stunder and SethuRaman, 1985). Depth of the TIBL
affects both the location and magnitude of ground level concentrations from elevated
sources. For onshore flow from a stable overwater air mass, a shallow TIBL will generally
lead to lower ground level concentrations which occur at a farther distance downwind. A
steep TIBL generally results in relatively higher concentrations which occur closer to the
shoreline (EPA, 1987). Figure 3 illustrates the impact of different TTBL shapes on the
location of ground level concentration.
HT,
U
X
Land
Figure 3. Impact of the variation in TIBL shape upon the location of ground level
concentration downwind (after EPA, 1987). Air flow (U) is onshore and the
land is warmer than the water surface upwind. The fumigation zone which
occurs closest to the stack is associated with TIBL height H-r^ while the
fumigation zone occurring farthest from the stack corresponds to TIBL height
Several models described in the literature address the conditions associated with
dispersion in shoreline environments (Lyons and Cole, 1973; Van Dop et al., 1979; Misra,
1980). A statistical evaluation of the shoreline fumigation model developed by Misra,
based on two sets of data from a shoreline location, indicates that the output of this model
compares favorably with observations (EPA, 1987).
To extend the application of the Shoreline Fumigation Model (SFM) it will be
merged with a multiple point Gaussian dispersion model (e.g., the EPA regulatory model
A-ll
-------
MPTER). The combined model will be applicable to modeling dispersion in shoreline
environments during both fumigation and non-fumigation events. The appropriate routine
in this combined model will be executed on the basis of the meteorological data for each
hour of analysis. Limitations in the application of SFM are identified in Section 3.
2. SHORELINE FUMIGATION MODEL (SFM)
2.1 Description
The Shoreline Fumigation Model estimates ground level concentrations for user-
defined receptor points downwind of an elevated source situated near a shoreline. The
model operates under certain assumptions of the ambient atmospheric conditions and of
plume behavior. Inherent in the development of the model are the assumptions identified
below:
Physical .assumptions:
onshore gradient or sea breeze flow on warm, sunny days
inland high temperature exceeds mean surface water temperature
stable overwater lapse rate
Model assumptions:
plume is released in the stable air and is Gaussian in nature
mean wind direction in the stable air is the same as the mean wind direction in the
TBBL
plume has not begun to meander significantly before impacting the TTBL
plume impacts the top of the TTBL creating an area source from which pollutants are
dispersed downward into the TIBL
uniform, instantaneous mixing downward of the plume upon TIBL impaction
pollutants corresponding to the elevated area source have horizontal Gaussian and
uniform vertical distributions within the TIBL
horizontal dispersion coefficient in the unstable air within the TTBL is parameterized
in terms of the convective velocity w* instead of being characterized by the
Pasquill-Gifford curves with Turner's correction factor
receptors are located in flat terrain
A-12
-------
shoreline is essentially straight-line
An illustration of the model operating scenario is given in Figure 4. Note that the
area shown is divided into two general zones, that of plume behavior in stable and unstable
air. By definition, the unstable air corresponds to the air within the TIBL. The area over
which the plume impacts the TIBL may be visually thought of as a "window" of dimension
dx'dy', where x1 and y1 denote source locations on the top surface of the TIBL. Distance
downwind is represented by the variable x and horizontal (off-centerline) distance by the
variable y. As depicted, ground level concentrations are insignificant until the plume
impacts the TIBL.
Zone I
Zone II
•* X
H
area source
dx'
*. •
Yv\
V '•
\ , *
* .
•\l
' ' .
,•._•
;
•
_•
••'.
*
m m
:'.
-------
The ground level concentration field inside the TIBL is first thought of in terms of
the contribution at (x, y, z=0) of an elemental source of area dx'dy' located at [x', y',
HT (x1)], where HT is the TIBL height (Misra, 1980; Misra and Onlock, 1982). Integrating
over y1 between -<» and <» and over x' between 0 and x, the net contribution at (x, y, 0) is
obtained (Misra, 1980; Misra and Onlock, 1982):
C(x,y) =
2?c HT(X)
_d_
dxT °yx')
where Q is the source strength (gs-1);
HT is the TIBL height (m);
UL is the mean wind speed within the TIBL (m s*1);
o1 is the effective horizontal dispersion coefficient;
tf2 = oy2s(x') + oy2L(x,x');
oys is the horizontal dispersion coefficient in the stable air above the TIBL (m);
GyL is the horizontal dispersion coefficient in the unstable air within the TIBL (m);
H is the plume height (m);
is the vertical dispersion coefficient in the stable air above the TIBL (m);
x ' is the point downwind at which the plume begins to intersect
the TIBL (m); and
y is the horizontal distance perpendicular to the downwind direction (m).
To conceptualize how SFM operates, the following points should be noted. Consider the
TIBL interface as a porous, curved surface which a plume impacts from above. In the
A-14
-------
model plume impaction with this surface is not explicitly defined. Instead it is implicitly
expressed in the derivation of Equation 1. Some portion of the plume is thought of as
intersecting the TfflL and dispersing downward within it at all times; initially only a small
portion of the plume will be intersecting and with increased distance downwind more and
more of the plume will intersect. One may consider a source existing at each point (x1, y')
on HT% The terms in Equation 1 are described more completely through the remainder of
this section.
2.1.1 TIBL Height
The most important variables in shoreline fumigation include the height and shape
of the TIBL. Height of the TffiL is defined according to Weisman (1976):
/ *• "o ** \~
HT . 7— (2a)
where HO is the surface, sensible heat flux; X is downwind distance; p is atmospheric
density; Cp is specific heat at constant pressure; (d0/dz)w is the potential temperature
gradient over water, which indicates atmospheric stability; and UL is the mean wind speed
within the TIBL (refer also to Gamo et aL, 1983). As is evident by the equation, height of
the TIBL is directly proportional to the surface, sensible heat flux. Higher wind speeds and
greater stability of the over water air mass serve to dampen the TIBL height. In a shoreline
environment as illustrated in Figure 4, the TTBL height is the actual mixed layer height. In
Equation 2a the atmospheric variables are commonly combined and termed the TDBL "A"
factor for convenience:
HT - AX1/r . (2b)
2.1.2 Plume Rise
Figure 4 illustrates that the plume emitted from a stack initially rises due to its own
buoyancy. While rising its height is determined by the distance dependent formula:
A-15
-------
H = Hstk+
where Hstk is stack height, F is plume buoyancy, Us is the mean wind speed at stack height
and X is distance downwind. The equation and value of the coefficient reflect the method
of Briggs (1975) for estimation of gradual plume rise. (Note that the equation does not
reflect the contribution of plume momentum.)
A buoyant plume is generally observed to initially rise in stable air, overshoot and
then settle to some equilibrium height Neither the gradual plume rise nor final plume rise
equation applies in the transition (overshoot) region. In the model, the equation for gradual
plume rise is used up to the point of final plume rise. Based on observations of plume
trajectories plotted by Briggs (1975), the distance downwind at which the plume levels off
may be given by:
where U, is the mean wind speed at stack height and N is the Brunt- Vaisala frequency.
The expression for N is:
(5)
where g is the acceleration due to gravity at the earth's surface, 6W is the mean potential
temperature over water and (d6/dz)w is the potential temperature gradient over water. The
value of N serves as an indicator of the stability or buoyancy of the air. The value of final
plume rise reflects the method of Briggs, where H * 2.6
2,1.3 Dispersion Coefficients for a Buoyant Plume
Vertical
Dispersion of the plume in the stable air above the TTBL is treated independently of
its dispersion in the unstable air within the TIBL. In the stable air the buoyant plume
spreads only because of its internal turbulence, while within the TEBL plume dispersion is
A-16
-------
dominated by the presence of convective turbulence. In the initial stages of the plume the
dispersion coefficients are proportional to plume rise (Misra, 1980; Misra and McMillan,
1980). The vertical dispersion coefficient in stable air is given by:
1 2
'Yf—Y x 4-5
«/ \ v us N
where F is plume buoyancy, Us is the mean wind speed at stack height, X is downwind
distance and ai is an empirically determined constant Here 4.5/N represents the time after
which the plume has leveled off and is, then, the time when the internal turbulence of the
plume is completely dissipated (Briggs, 1975). Once the plume has leveled off o~z is
considered likely to approach an asymptotically constant value, given by:
which is obtained by substituting 4.5/N for X/Us and setting ai equal to 0.4 in Equation 6,
Horizontal
The horizontal dispersion coefficient in stable air is given by the equation:
l 2
/TJ>
0 = a
wys
where as is an empirically determined constant and the other terms are as defined above.
Once the plume intercepts the TIBL it fumigates into the unstable air within the TIBL and
the horizontal dispersion coefficient is then calculated based on the work of Lamb (1978):
(9a)
and
for . (9b)
A-17
-------
Here w* is the convective velocity and UL is the mean wind speed within the TIBL. Recall
that when the plume impacts the TIBL it creates an area source on the top surface of the
TIBL. As a method of calculating the complete contribution of this area source to the
ground level concentration, the area source is divided into many small area sources. The
total concentration is obtained by summing the contribution of all these small area sources.
The distance (X - X1) may be thought of as the distance affected by a given small area
source at a stage in calculation of the complete concentration. In development of the model
it was found that using only Equation 9a produced similar results to employing both
Equations 9a and 9b, so singular use of Equation 9a was adopted. The convective velocity
is defined as:
(10)
where HQ is the surface, sensible heat flux, HT is the TIBL height, 9 L is the mean potential
temperature over land and the other terms are as defined previously. The value of w* is
calculated for each hour of input
The constants ai and a$ have been determined experimentally from data obtained
from the Nanticoke Environmental Management Program (Misra, 1980; Portelli, 1982;
Kerman et al., 1982; Hoff et aL, 1982; Anlauf et aL, 1982). Use of these constants is
retained in the version of the model provided (ai — 0.4 and as = 0.67, respectively). The
reasoning for this is that the plume observed in the Nanticoke studies is likely representative
of the behavior of all plumes under similar shoreline fumigation conditions.
Finally, the effective horizontal dispersion coefficient o'Cx^c') is expressed:
1
^ (X,X')J .
o- - o-; (X-) + CT; (x,x-) . ai)
L s L J
This equation is a consequence of the integration between -«» and «*» over y' in the
derivation of Equation 1 (Misra and Onlock, 1982).
A-1G
-------
2.1.4 Evaluation of Pollutant Concentration
The equation for pollutant concentration at a receptor point (Equation 1) is solved
using Simpson's Rule, a numerical technique designed to evaluate the definite integral of a
continuous function with finite limits of integration. The geometrical interpretation of
Simpson's Rule is that of replacing the curve of some function f(x) by arcs of parabolas
through three adjacent points of the integration interval (Fox, 1963). The general
expression for Simpson's Rule is (Fox, 1963):
f "f(x)dx = ^[f(xo)
•/1 on
(12)
Here a and b designate the endpoints of the interval over which integration is to be
performed and n is the number of subintervals into which the interval from a to b is
divided. In this application the function f(x) is, naturally, the concentration equation,
evaluated over the interval from x equal some small, initial value to x equal the downwind
distance of the receptor point (This initial value of x is set equal to 10 m, which avoids the
problem of singularity with x = 0.) In the model the value of n is equal to 2, which reduces
Equation 12 to the expression: —^ [f(a) + 4f f^r—} + f(b)].
In the model program the concentration equation is broken into parts to facilitate
computation. The general sequence of steps used is identified in the following paragraphs
and is labeled in italics in the source code (Appendix A).
Step 1 The model first computes the quantity:
1 (13)
27tHT(x)UL •
Here the TIBL height (H-r) is evaluated at the x coordinate of the receptor point. The wind
speed (UL) was moved outside the integral since it is constant for any given hour of
computation.
A-19
-------
Step 2 The model compares the value of X/U, with the value of 4.5/N. If the plume has
not leveled off (i.e., X/US £ 4.5/N) then a^ is determined by Equation 6 and the value of
the derivative in the concentration equation is given by:
1 AULX* :
_ r»3 -r-3
ai r aiF
If the plume has leveled off (ie., X/US > 4.5/N), then o^, is calculated by Equation 7 and
the derivative part of the concentration equation takes the much simpler form:
d A!T(x') -H(xT
«.oo
Step J The exponential term is now calculated:
2
y
2o-2
(HT(x') -
y
(16)
Referring here to the right hand sides of Equation 14 or 15 as "DEETV" and to
Equation 16 as "Cl," respectively, the model continues evaluation of the concentration
equation as follows:
C - ln(DERIV) + Cl - l^lnCtf2) (17)
and
EVAL * exp(Q . (18)
The term -1/2 In (tf2) represents the last term not yet accounted for inside the integral of
Equation 1 [a"1 = (rf2)-1/2 and In (tf2)4'2 = -1/2 In (rf2)].
Step 5 Finally, the program multiplies Equation 18 by Equation 13, and this product by
the source strength Q:
-------
which yields the solution for ground level concentration at a particular receptor point The
units for Equation 19 are g nr3, which are converted to (ig nr3.
2.2 Operating Conditions
The operating scenario of the Shoreline Fumigation Model involves that of an
elevated plume, released at the shoreline in stable marine air, which impacts a growing
TIBL over land at some distance downwind. In order to apply the algorithm for shoreline
fumigation, the following conditions must be met:
1) the hourly wind direction at the shoreline source must be onshore.
Since the accuracy of wind direction measurement is generally ± 10 degrees and wind
direction may fluctuate for lower wind speeds, it is recommended that only those
measurements outside of 20 degrees from the shoreline be used (i.e., use only those
cases with winds from a 140 degree sector centered on a line perpendicular offshore).
The diagram below illustrates this situation.
.-source
Land
2) the hourly wind speed should be greater than 2 m s*1
3) it must be daytime so that unstable atmospheric conditions exist over land.
Specifically, the overland, surface, sensible heat flux must be at least +5 W nr2 to
insure formation of a TIBL.
4) the overwater lapse rate must be stable (i.e., the vertical potential temperature gradient
must be greater than zero).
A-21
-------
As long as all these conditions are satisfied, then SFM is applicable.
Concentrations for the receptor grid will be determined as discussed in the Model
Description.
2.3 Input Data Requirements
As with other air quality models, the Shoreline Fumigation Model operates on
hourly input of certain meteorological variables and source characteristics. The following
are the fundamental input variables required by SFM:
H0 - surface, sensible heat flux (W nr2)
UL - mean wind speed within the TTBL (m s-1)
Us - mean wind speed at stack height (m S'1)
GL - mean potential temperature over land (K)
6W - mean potential temperature over water (K)
.) . vertical potential temperature gradient overwater (K m4)
dz/w
F - plume buoyancy (m4 s*3)
Q - source strength (g r1)
Hstk - stack height (m)
p - atmospheric density (kg m-3)
Cp - specific heat at constant pressure (J K'1 kg"1)
These variables are directly input or assigned in the version of the model provided. In the
absence of actual measurements, values of HO, for example, may need to be calculated
within the model. Methods of obtaining die meteorological input are explained in the
remainder of this section.
A-22
-------
2.3.1 Methods for Calculating Surface, Sensible Heat Flux
The surface, sensible heat flux is required for the determination of the TEBL height
and is also used in calculating the convective velocity. Three primary methods exist for
obtaining sensible heat flux; these methods are described below.
Eddy Correlation
The most reliable and direct way of obtaining H0 is by the eddy correlation
method, in which HO = pcpw6 and the covariance w6 is obtained from temperature and
vertical velocity fluctuations measured by research grade turbulence instrumentation, such
as a vertical-axis sonic anemometer-platinum wire thermometer assembly.
Profile
Needed Input for the Profile Method
Wind speed at one level Wind speed at two levels
Surface roughness length or Temperature at two levels
Temperature at two levels
A commonly used method employed when direct turbulence measurements are not
available is the profile method. This method for estimating surface, sensible heat flux is
based on Monin-Obukhov similarity theory for the surface layer (Berkowicz and Prahm,
1982). Under the assumptions of stationary and horizontally homogeneous conditions,
dimensionless vertical gradients of a conservative quantity are only functions of the stability
parameter z/L, where L is the Monin-Obukhov length. Under this method, the equation for
heat flux is given as:
HO = - P CpU^
where
p = atmospheric density (kgnr3)
Cp = specific heat at constant pressure (J K-1 kg-1)
u*=s friction velocity (ms-1)
kU(Zl)
U * [ln(z /Zo) - VM(Z j/L) + y^zJL)} (wind "P6*1 at one level)
or
A-23
-------
u* =
k = von Karman's constant (0.4)
U(zi) = wind speed at z\ tower level over land (m s4)
U(za) = wind speed at 22 tower level over land (ms4)
zi = 10m
Z2 = 20 m (or next closest level to zi)
ZQ = surface roughness length (m)
z/L = stability parameter
VM = 21n[(l + py2] + ln[(l + p2)/2] - 2tan-i(P) + Jt/2
P - (1 - 16Z/L)1/4
6* = friction temperature scale used in similarity theory (K)
e* -
6(zO = potential temperature at zi tower level over land (K)
8(Z2) = potential temperature at Z2 tower level over land (K)
YH = 21n[(l+p2)/2]
The above equations apply to the atmospheric surface layer, which is typically the lowest
100 m during daytime conditions. The expression shown for P is that applicable to an
unstable atmosphere, since the interest here is in obtaining the surface, sensible heat flux
over land during daytime, convecrive conditions. For an unstable atmosphere the quantity
z/L can be determined by the gradient (Rj) or bulk (R^) Richardson number (Tennekes,
1982):
fc)
R - g \
-------
R. _
* z/L
Here g is the acceleration due to gravity at the earth's surface; 6t is the mean of the potential
temperatures 0(zi) and 8(22); [d6/dz]L is the overland, potential temperature gradient
between levels z\ and zi; and [dU/dz]L is the overland, horizontal wind speed gradient
between levels zi and Z2- Suitable heights for z\ and Z2 are 10 and 20 meters, however
other levels may be used provided they are located in the atmospheric surface layer.
To calculate the ¥ functions for estimation of u* and 9*, first determine Rj or R$b.
The gradient Richardson number corresponds to the height (zA)1/2. Using this height for
z, solve the expression Rj = z/L for the Monin-Obukhov length, L. Knowing the value of
L (which is assumed constant in the surface layer, based on similarity theory), compute the
V functions using the appropriate value of z. The surface roughness length (ZQ) may be
approximated on the basis of a visual terrain description or calculated for each source site
using the logarithmic wind speed profile. Values for Zo categorized by terrain are provided
in the table in Appendix C.
Energy Balance
Needed Input for the Energy Balance Method
net radiation (e.g., from a net pyrradiometer)
wet and dry bulb temperatures at two levels
atmospheric pressure
The surface energy budget indicates that the net radiation at the surface is balanced
by a combination of sensible and latent heat fluxes to the atmosphere and by the heat flux to
the soil or subsurface medium. An energy budget equation may be used to calculate the
sum of the latent and sensible heat fluxes from measurements and/or estimates of the
remaining terms in the equation. If the ratio of sensible to latent heat fluxes (otherwise
known as the Bowen ratio) is estimated or measured, then the separate fluxes may be
determined. For wet, bare surfaces and vegetative surfaces over which evapotranspiration
is near its potential rate and both the evapotranspiration and heat flux are positive (upward),
the surface sensible heat flux may be estimated from the equation (Arya, 1988):
A-25
-------
(A+l
where Y = A 522 L *""^ ^ ** dej/dT.
Here RN is the net radiation, G is the ground heat flux, P is atmospheric pressure, Le is the
latent heat of evaporation, and de,/dT is the slope of the curve of saturation vapor pressure
versus temperature. This slope may be determined by the equation:
dT
R T2
where es is the saturation vapor pressure at level T, mw is the mean molecular weight of
water vapor, R* is the universal gas constant and T is the air temperature.
An alternate form of the equation for sensible heat flux using the energy balance
method is given by the following (Holtslag and Van Ulden, 1983; Wilczak and Phillips,
1986):
l + (e/s)
where a and £ are empirical parameters associated with the sensible and latent components
of the surface flux; £ = Cp/U.; s = 8qs/8t, where q, is the saturation specific humidity and the
other terms are as defined previously.
While the energy balance method has been shown to perform at least as well as, if
not better than the profile method, accuracy of this method is quite sensitive to the values of
a and £ (i.e., to values of the Bowen ratio; Wilczak and Phillips, 1986). In addition, the
input required by this method may be difficult to obtain or approximate. Use of the profile
method for calculating the surface sensible heat flux is therefore suggested, keeping in mind
that the accuracy of this approach will depend on the quality of the meteorological
measurements involved.
A-26
-------
2.3.2 Determination of Other Meteorological Input
Mean wind speed within the TIBL (TJi ) -
To approximate the mean TIBL wind speed, the highest tower level (e.g., 60 m)
wind speed over land may be employed.
Mean wind speed at stack height (UO -
Use the wind speed measured at stack height up to 60 m, if available.
Otherwise use the wind measured from the nearest comparable height.
Wind speed extrapolation using the power law profiles is not recommended.
Mean potential temperature over land (9i ) -
Use the arithmetic average of the over land potential temperatures 0 (zO and 0 (22),
where:
Here T is the ambient air temperature (K), P is atmospheric pressure (mb), R is the
gas constant (J K-1 kg-i) and Cp is specific heat at constant pressure (J K-1 kg-1). In
most applications T can be substituted for 6.
Mean potential temperature over water (9W) -
Use the arithmetic average of the over water potential temperatures 9 (zi) and 9 (22).
Vertical potential temperature gradient overwater [d0/dz]w -
The vertical potential temperature gradient may be defined as:
[9 (zz) - 9 (zi)]/[ z2 - zj.
For the upper level: use the 10 m potential temperature over water, if possible. If this is
not available, use the 10 m potential temperature from a tower situated at the
shoreline. If this is not available, use the 10 m potential temperature from an inland
tower, provided this tower is within 1 km of the shoreline.
For the lower level: use the water surface temperature as recorded from satellite data (value
used should be representative of the offshore water surface temperature, hence
values from the shallow, near shore waters should be avoided). An alternative to
using satellite data is to employ the water intake temperature measured by the
industry. In this case the intake should be within 2 m of the surface, unless it is
determined that the vertical water temperature gradient is not significant The intake
should also be made outside of the shallow, near shore waters.
A-27
-------
Atmospheric density (p) -
A fixed value of atmospheric density reflecting 20 C (293 K) and 1000 mb pressure
is currently employed in the model (p = 1.188 kg nr3).
Specific heat at constant pressure (Cp) -
A fixed value of Cp reflecting 20 C (293 K), 1000 mb and 50% relative humidity is
currently employed in the model (Cp = 1020 J K-1 kg-1).
Convective velocity (w*) -
The cpnvective velocity needs to be calculated for each hour of model operation.
Equation 10 identifies the formula for w*. HT should first be determined by
Equation 2 using x = 5000 m (Misra, 1988). The value for w* can then be
determined by substituting HT and the values of the other variables for the given
hour into Equation 10.
2.3.3 Input Data Format
As presently coded, the model executes in batch mode and draws on input from two
separate files, one containing the X and Y coordinates of the receptor points (XYJD AT) and
the other containing the hourly meteorological and source data (METDAT). Samples of
these files are provided in Appendix B. These files are created by the user, with the
following formats:
Variable Column Format
Mean wind speed within the TTBL - UL (m s-1) 1-5 F5.2
Mean wind speed at stack height - Us (ms*1) 7-11 F5.2
Mean potential temperature over land - OL CK) 13-18 F6.2
Mean potential temperature over water-9W (K) 20-25 F6.2
Overwater lapse rate-(d0/dz)w (Km-1) 27-33 F7.4
Surface, sensible heat flux - HO (Wm-2) 35-40 F6.2
Plume buoyancy - F (rrr^s-3) 42-48 F7.2
Source strength - Q (g s*1) 50-56 F7.2
Stack height-Hsfc (m) 58-64 F7.2
Number of receptors-NR 66-68 B
One space separates each of the variables in the input string (as indicated by the column
designation). For the sample model ran the heat flux and overwater lapse rate are
A-23
-------
considered known. Means of calculating these variables are commented in the main
program.
The format of the X and Y coordinate data is as follows:
Variable Columq Format
X coordinate (m) 1-9 F9.1
Y coordinate (m) 12-20 F9.1
Two spaces separate the X and Y variables in the input string.
A few points should be made regarding the convention of downwind distance in the
model. The X in the plume rise equation represents the distance downwind of the stack
(i.e., at the stack X = 0). In the equations for the vertical and horizontal dispersion
coefficients X is also the distance downwind of the stack. However, in the TIBL height
equation X is the distance downwind of the shoreline (i.e., at the shoreline X = 0). Thus,
if the stack is located inland, the TEBL height should be defined as HT (X + d), where d is
the downwind distance of the stack from the shoreline. The following diagram indicates
the x and y grid for a source situated at the shoreline.
source
(0,0)
2.4 Output Data Description
The Shoreline Fumigation Model (SFM) predicts hourly, ground level pollutant
concentration for user-defined receptor points. The X coordinate of the receptor may be
any value greater than zero, with increasing values representing greater downwind
distances from the source. The Y coordinate may be positive or negative in value,
signifying the horizontal or off-centerline distance of the receptor. Concentrations are
A-29
-------
output in M-g m-3 and reflect the pollutant identified by the source strength (Q). As coded in
Appendix A, the model produces an output table of the X and Y receptor coordinates along
with the corresponding pollutant concentration. Input variables are also listed for reference.
While executing SFM, output is written to an external file (SFM.OUT) and to the
terminal screen. A sample output file is included in Appendix B. What appears on the
screen as the model is running is identical to the output written to the external file. The
output to the terminal will scroll on the screen, pausing momentarily after displaying the
input variables. The length of this pause will be a function of how many receptor points are
being processed (output to the screen occurs only after all receptor points have been
processed).
3. FUTURE CONSIDERATIONS
Merging the Shoreline Fumigation Model with a more extensive, multiple point
Gaussian dispersion model introduces potential modeling situations which are beyond the
realm of continuous fumigation considered here. One such situation involves plume
penetration of the TIBL. Buoyant plumes emitted within the TIBL have been observed to
partially penetrate the inversion layer existing above it (Manins, 1984). Regardless of the
TIBL height, if a stack is located within the TIBL then provision needs to be made within
the overall shoreline dispersion model to handle plume penetration (Misra, 1988).
Investigation of this phenomenon has been conducted by Briggs (1984) and Manins (1979,
1984) which may provide useful information for the development of an appropriate
algorithm.
An additional matter to be resolved is that of the mixed layer height determination
for hours of model operation hi which a TIBL exists, but fumigation does not occur (i.e.,
the stack is located far enough inland for the plume to be trapped within the TIBL). This
situation would warrant execution of the more extensive model, but the TIBL height
expression in SFM would still be appropriate for determining the mixed layer height If the
plume were emitted in the region of rapid TIBL growth, then determining the mixed layer
height is not clearly straightforward. Using the TIBL height above a receptor point located
downwind would produce results that are optimistic, while using the height of the TIBL
above the stack would produce more conservative results. The modeling procedure for this
situation requires further development
SFM computes ground level concentrations with the understanding that pollutants
are well mixed within the TIBL; hence it is assumed that no vertical gradient in
A-30
-------
concentration exists. Ground level concentrations produced apply to receptors situated on
level terrain; however if there are only slight terrain perturbations in the receptor grid the
model may be executed in its current state. If larger surface features exist then the model
would need to be modified in terms of both definition of the TiBL height and calculation of
ground level concentration in order to produce acceptable results.
Finally, SFM does not currently address the onshore cases in which the
overwater lapse rate is neutral or unstable. In this situation the TIBL would grow out of the
mixed layer over water and begin with some initial height at the shoreline. A method of
determining this initial height needs to be incorporated.
A-31
-------
4. REFERENCES
Anlauf, K.G., P. Fellin, RA. Wiebe and O,T. Melo, 1982: The Nanticpke shoreline
diffusion experiment Part IV. A. Oxidation of sulphur dioxide in a powerplant
plume. B. Ambient concentrations and transport of sulphur dioxide, paniculate,
sulphate and nitrate, and ozone. Amos. Environ., 16,455-466.
Arya, S.P., 1988: Introduction to Micrometeorolofv. Academic Press (in press).
Berkowicz, R. and LJP. Prahm, 1982: Evaluation of the profile method for estimation of
surface fluxes of momentum and heat. Atmos. Environ., 16, 2809-2819.
Briggs, G.A., 1975: Plume rise predictions. Lectures on Air Pollution and Environmental
Impact Analyses. American Meteorological Society Lecture Series, 29 September -
3 October, Boston Massachusetts.
Briggs, G.A., 1984. Plume rise and buoyancy effects. Chapter 8 in AtmogphericScience
and Power Production. Darryl Randerson, editor. NTISDOE/TIC-2760L
Davenport, A.G., 1960: Rationale for determining design wind velocities. /. Am. Soc.
Civ. Eng. (Struct. Div.), 86, 39-68.
Fox, A.H., 1963: Fundamentals of Numerical Analysis. The Ronald Press Company,
New York, NY.
Gamo, M.S., S. Yamamoto, O. Yokoyama and H. Yashikado, 1983: Structure of the free
convective internal boundary layer above the coastal area. /. Meteor. Soc. Japan,
61, 110-124.
Hoff, R.M., N.B.A. Trivett, M.M. Millan, R Fellin, K.A. Anlauf, H.A. Wiebe and R.
Bell, 1982: The Nanticoke shoreline diffusion experiment Pan HI. Ground based
air quality measurements. Atmos, Environ., 16, 439-454.
Holtslag, A.A.M. and A.P. Van Ulden, 1983: A simple scheme for daytime estimates of
the surface fluxes from routine weather data. /. Climate and Appl. Meteor., 22,
517-529.
Kerman, B.R., RJE. Miclde, R.V. PoneUi and P.K. Misra, 1982: The Nanticoke
shoreline diffusion experiment Pan II. Internal boundary layer structure. Atmos.
Environ., 16, 423-437.
Lamb, R.G., 1978: Numerical simulation of dispersion from an elevated point source in
the convective boundary layer. Atmos. Environ., 12, 1297-1304.
Lyons, W.A. and H.S. Cole, 1973: Fumigation and plume trapping on the shores of Lake
Michigan during stable onshore flow. /. Appl. Meteor., 12,494-510.
Manins, P.C., 1979: Partial penetration of an elevated inversion kyer by chimney plumes.
Atmos. Environ., 13, 733-741.
Manins, P.C., 1984: Chimney plume penetration of the sea-breeze inversion. Atmos.
Environ., 18, 2339-2344.
A-32
-------
Misra, P.K., 1980: Dispersion from tall stacks into a shoreline environment Atmos.
Environ., 14, 397-400.
Misra, P.K. and McMillan, 1980: On the dispersion parameters of plumes from tall stacks
in a shoreline environment Boundary-Layer Meteor., 19, 175-185.
Misra, P.K. and R. Onlock, 1982: Modeling continuous fumigation of the Nanticoke
Generating Station. Atmos. Environ., 16, 479-489.
Misra, P.K., 1988: Personal communication.
Oke, T.R., 1978: Boundary Laver Climates. Methuen and Co., New York, NY.
Portelli, R.V., 1982: The Nanticoke shoreline diffusion experiment Part I. Experimental
design and program overview. Atmos. Environ., 16, 413-421.
Rayor, G.S., P. Michael and S. SethuRaman, 1980: Meteorological measurement methods
and diffusion models for use at coastal nuclear reactor sites. Nuclear Safety, 21,
749-765.
Raynor, G.S., S. SethuRaman and R.M. Brown, 1979: Formation and characteristics of
coastal internal boundary layers during onshore flows. Boundary-Layer Meteor.,
16, 487-514.
Stunder, M. and S. SethuRaman, 1986: A statistical evaluation and comparison of coastal
point source dispersion models. Atmos. Environ., 20, 301-315.
Tennekes, H., 1982: Similarity relations, scaling laws and spectral dynamics. Chapter 2
in Atmospheric Turbulence and Air Pollution Modeling. F.T.M. Nieuwstadt and
H. van Dop editors. D. Reidel Publishing Company, Boston, MA.
U.S. Environmental Protection Agency, 1987: Analysis and Evaluation of Statistical
Coastal Fumigation Models. EPA-450/4-87-002.
Van Dop, H., R. Steenkist and F.T.M. Niewstadt, 1979: Revised estimates for
continuous shoreline fumigation. /. Appl. Meteor., 18,133-137.
Van Ulden, A.P. and A.A.M. Holtslag, 1985: Estimation of atmospheric boundary layer
parameters for diffusion applications. /. dim. and Appl. Meteor., 24, 1196-1207.
Weisman, B., 1976: On the criteria for the occurrence of fumigation inland from a large
lake - A reply. Atmos. Environ., 12, 172-173.
Wieringa, J., 1980: Representativeness of wind observations at airports. Bull.Amer.
Meteor. Soc., 61, 962-971.
Wilczak, J.M. and M.S. Phillips, 1986: An indirect estimation of convective boundary
layer structure for use in pollution dispersion models. /. Clim. and Appl.
Meteor., 25, 1609-1624.
A-33
-------
Appendix
Program Flowchart
and Source Code
A-34
-------
READ IN MET AND
SOURCE DATA FOR
ONE HOUR
CALCULATE BRUNT-
VAISALA FREQUENCY,
HEAT FLUX, TIBL A
FACTOR ANDCONVECTIVE
VELOCTTY
CALL SUBROUTINE CALC
WRITE OUT RECEPTOR
COORDINATES AND
STOP
SFM program flowchart - main routine.
A-35
-------
INITIALIZE VARIABLES
LOOP I - 1,NR
J
READ IN X AND Y
COORDINATES
INITIALIZE VARIABLES
I
CALCULATE DISTANCE
WHERE PLUME
LEVELS OFF (XP1)
SFM program flowchart - subroutine CALC.
A-36
-------
©
NO
CALL SUBROUTINE SIMP
FOR THE ENTIRE INTERVAL
YES
CALL SUBROUTINE SIMP
FOR INTERVAL FROM
LEFT ENDPOINT TO XP1
CALL SUBROUTINE SIMP
FOR INTERVAL FROM
XP1 TO RIGHT ENDPOINT
SUM VALUES OF INTEGRAL
FOR SEPARATE INTERVALS
MULTIPLY BY SOURCE
STRENGTH AND CONVERT
ANSWER TO MICROG/M**3
SFM program flowchart - subroutine CALC continued.
A-37
-------
SUBROUTINE SIMP
INITIALIZE VARIABLES
FUNCTION EVAL
EVALUATE F(X) AT LEFT ENDPOINT
FUNCTION EVAL
EVALUATE F(X) AT MIDPOINT
FUNCTION EVAL
EVALUATE F(X) AT RIGHT ENDPOINT
CALCULATE ESTIMATE OF
INTEGRAL FOR ABOVE INTERVAL
FUNCTION EVAL
EVALUATE F(X) AT 1/4 POINT
SPLIT INTERVAL INTO
LEFT AND RIGHT HALVES
STORE INFO ON RIGHT HALF
OF INTERVAL FOR LATER USE
RESET INTERVAL TO LEFT HALF
FUNCTION EVAL
EVALUATE F(X) AT 3/4 POINT
CALCULATE ESTIMATE OF
LEFT AND RIGHT HALF OF
INTEGRAL AND SUM
CALCULATE ESTIMATE OF LEFT
AND RIGHT HALF OF INTEGRAL
BASED ON ABSOLUTE VALUES OF
FUNCTION EVAL AND SUM
SFM program flowchart - subroutine SIMP.
A-38
-------
RESET INTERVAL TO RIGHT HALF
NO
ADO HALF OF INTEGRAL
PROCESSED TO INTEGRAL SUM
LEVEL - LEVEL - 1
•0
SFM program flowchart - subroutine SIMP continued.
A-39
-------
CALCULATE HORIZONTAL
DISPERSION COEFFICIENTS
CALjCULATE T1BL HEIGHT
CALCULATE RRST PART
OF CONCENTRATION 60.
PLUME LEVELED OFF ?
YES
CALCULATE VERTICAL
DISPERSION COEFFICIENT
FOR A LEVEL PLUME
CALCULATE DERIVATIVE IN
CONCENTRATION EQ.
NO
CALCULATE PLUME RISE
1
CALCULATE VERTICAL
DISPERSION COEFFICIENT
FOR RISING PLUME
1
CALCULATE DERIVATIVE IN
CONCENTRATION EQ.
CALJCULATE EXPONENTIAL
IN CONCENTRATION EQ.
COMBINE TERMS TO YIELD
RECEPTOR CONCENTRATION
SFM program flowchart - function EVAL.
A-40
-------
c
C SFM
C SHORELINE FUMIGATION MODEL
C
C ORIGINAL AUTHOR: OR. P.K. MISRA
C AIR RESOURCES BRANCH
C ONTARIO MINISTRY OF ENVIRONMENT
C CANADA
C
C MODIFIED BY:
C SUZANNE TEMPLEMAN
C MARINE, EARTH AND ATMOSPHERIC SCIENCES DEFT.
C NORTH CAROLINA STATE UNIVERSITY
C RALEIGH, NC 27695-8208
C
C JUNE 1988
C
C SFM PROGRAM ABSTRACT:
C
C SFM IS AN ALGORITHM CODE WHICH PRODUCES ESTIMATES
C OP GROUND LEVEL POLLUTANT CONCENTRATION FOR USER-DEFINED
C RECEPTORS LOCATED DOWNWIND OF AN ELEVATED, SINGLE POINT
C SOURCE SITUATED AT THE SHORELINE.
C
C HOURLY SOURCE AND METEOROLOGICAL DATA AND RECEPTOR
C COORDINATES ARE REQUIRED AS INPUT.
C
C EXECUTION OF THE CODE IS APPROPRIATE PROVIDED THE
C FOLLOWING CONDITIONS ARE SATISFIED:
C
C 1) WIND DIRECTION AT THE SHORELINE SOURCE IS ONSHORE
C 2) WIND SPEED IS GREATER THAN 2 M/S
C 3) IT IS DAYTIME AND THE SURFACE, SENSIBLE HEAT
C FLUX OVER LAND IS AT LEAST +5 W/M**2
C 4) LAPSE RATE OVER WATER IS STABLE
C
C IT IS ALSO UNDERSTOOD THAT THE PLUME IS INITIALLY
C EMITTED INTO THE STABLE AIR.
C
C THE USER IS REFERRED TO THE USER'S GUIDE FOR A MORE
C DETAILED EXPLANATION OF MODEL OPERATING ASSUMPTIONS.
C
C THE PROGRAM CONSISTS OF FOUR MODULES:
C 1. MAIN MODULE
C 2. SUBROUTINE CALC
C 3. SUBROUTINE SIMP
C 4. FUNCTION EVAL
C
c**************************************************************
c
C*********************** MAIN MODULE **************************
C THE MAIN MODULE CONTROLS METEOROLOGICAL AND SOURCE INPUT
C AND OUTPUT OF THE POLLUTANT CONCENTRATIONS FOR THE
C DESIGNATED RECEPTORS. VARIABLES WHICH REMAIN CONSTANT
C FOR ANY GIVEN HOUR OF INPUT ARE COMPUTED WITHIN THIS MODULE.
C**************************************************************
C
C DEFINE VARIABLES:
C
A-41
-------
C A m TIBL A factor, given by:
C ((2*HO)/(RHO*CSUBP*DTHDZ*UL))**0.5 (M**l/2)
C B - W*/UL
C RHO - atmospheric density (KG/M**3)
C CSUBP - specific heat at constant pressure (J/K KG)
C CK » von Karman's constant (0.4)
C CN Brunt~Vaisala frequency (1/S)
C OTHDZ - potential temperature gradient overwater (K/M)
C F * plume buoyancy (M**4/S**3)
C G * acceleration due to gravity at the surface (M/s**2)
C HO - surface sensible heat flux over land (W/n**2)
C HSTK - stack height (M)
C MR - number of receptors
C OWZ2,1 * height over water at levels 2, 1 (N)
C PTOM2,1 * potential temperature over water at
C levels 2, 1 (K)
C PTMOL * mean potential temperature over land
C between levels 2, l (K)
C PTMOW « mean potential temperature over water
c between levels 2, 1 (K)
C Q * source strength (G/S)
C UL - mean wind speed in the TIBL (N/S)
C US - mean wind speed in the stable layer (N/S)
C W* - convective velocity (M/S)
C x - downwind distance (M)
c***********************************************************
REAL XP(200),YP(200),MGCM(200)
REAL A,B,CK,CN,DTHDZ,F,H,HO,HSTK,Q,PTMOL,PTMOW,UL,US
INTEGER MR
COMMON /ONE/XP,YP,A.B,UL,US,H,HSTK,CN,F,I,Q,MGCM
C
C->-> OPEN FILES FOR INPUT AND OUTPUT
C
OPEN(11,FILE»'HET.DAT',STATUS»'OLD',FORM"'FORMATTED')
OPEN(12,FILE-'XY.DAT',STATUS-'OLD',FORM-'FORMATTED')
OPEN(15,FILE-'SFM.OUT'.STATUS-'NEW')
C
C DEFINE CONSTANTS
C
CK - 0.4
CSUBP * 1020.
G - 9.8
PI * 3.1415927
RHO •* 1.188
C
C->-> READ IN METEOROLOGICAL AND STACK VARIABLES
C
20 REAO(11,22) UL,US,PTMOL,PTMOW,DTHDZ,HO,F,Q,HSTK,NR
22 FORMAT(FS.2,1X,FS.2,1X,F6.2,1X,F6.2,1X,F7.4,LX,
I F«.2,1X,F7.2,1X,F7.2,1X,F7.2,1X,I3)
C
C->-> CALCULATE BRUNT-VAISALA FREQUENCY
C
C DTHDZ - (PTOW2 - PTOH1)/(OHZ2 * OWZ1)
C PTMOW - (PTOW2 - PTOWD/2.
CN - ((G/PTMOW)*DTHDZ)**0.5
C
C
C IF THE SURFACE, SENSIBLE HEAT FLUX IS NOT
A-42
-------
C A KNOW* INPUT, USE THE FOLLOWING STATEMEKTS
C TO GENERATE AW ESTIMATE. MODIFY THE READ
C STATEMENT ACCORDINGLY.
C
C*>*> DETERMINE SURFACE, SENSIBLE HEAT FLUX USING
C THE PROFILE METHOD
C
C DEFINE VARIABLES:
C
C BETAO,1,2 - function of stability parameter z/L
C for an unstable atmosphere
C at z levels 0,1,2
C CL « Monin-Obukhov length (M)
C PTMOL » aean potential temperature over land
C between levels 2,1 (K)
C PTOL2,1 * potential teaperature over land at
C levels 2, 1 (K)
C PTOW2,! » potential temperature over water at
C levels 2, 1 (K)
C OUI2.1 * wind speed over land at level 2, 1 (M/S)
C QLZ2.1 * height over land at level 2, 1 (M)
C OMZ2.1 - height over water at level 2,1 (M)
C PSIH1,2 * universal function in the diabatic surface
C layer temperature profile
C PSIMO,! * universal function in the diabatic surface
C layer wind profile
C 81 * Richardson nunber
C USTAR « friction velocity (M/S)
C TSTAR * temperature scale (K)
C ZO * surface roughness length (M)
c ZR - height associated with RI (M)
c
C*>*> FIRST CALCULATE THE RICHARDSON NUMBER
C
C PTMOL * (PTOL2 - PTOLD/2.
C
C RI - (6/PTMOL)*
C I ((PTOL2 - PTOL1)/(OLZ2 - OL11))
C t /((OLU2 - OLU1)/(OLZ2 - OL21))**2.
C
C 28 - (OLZ1*OLZ2)**0.5
C CL - ZR/RI
C
C BETAO - (1 - 16*ZO/CL)**0.25
C BETA1 - (1 - 16*OLZ1/CL)**0.25
C BETA2 » (1 - 16*OLZ2/CL)**O.2S
C
C FSIMO - 2*ALOG((1 + BETAO)/2.) +
C I ALOG({1 + BETAO*BETAO)/2.) -
C i 2*ATAN(1ETAO) + PI/2.
C
C PSIM1 - 2*ALOG((1 + BETAl)/2.) +
C I ALOG((1 * BETAl*BETAl)/2.) -
C I 2*ATAN(BETA1) •»• PI/2.
C
C PSIH1 - 2*ALOG((1 + BETAl*lETAl)/2.)
C PSIH2 - 2*ALOG((1 * BETA2*BETA2)/2.)
C
C->-> CALCULATE FRICTION VELOCITY
C
A-43
-------
C USTAR - (CK*U1)/(ALOG(OLZ1/ZO) - PSIM1 + PSIMO)
C
C->-> CALCULATE FRICTION TEMPERATURE SCALE
C
C TSTAR - (CK*(PTOL2 - PTOL1))/
C i (ALOG(OLZ2/OLZ1) - PSIH2 + PSIH1)
C
C HO - -RHO*CSUBP*USTAR*TSTAR
C
C-*-*—A-*-*-*-*-*-*-*-*-*—*—*-*—*-*-*-*—*-*-*-*-*-*-*-*-*-*-*-*
C
C->-> DETERMINE THE TIBL A FACTOR
C
A - ((2.*HO)/(CSUBP*RHO*DTHDZ*UL))**O.S
C
C->-> DETERMINE THE TIBL HEIGHT FOR USE IN CALCULATING
C CONVECTIVE VELOCITY -> DETERMINE PART OF SIGMA Y EQUATION
C FOR THE CONVECTIVE LAYER (B - H*/UL)
C
B » (((G*HC*HT)/(RHO*CSUBP*PTMOL))**.333)/UL
C
C->-> WRITE HEADER AND VALUES OF INPUT VARIABLES USED
C
WRITE(*,25)
WRITE(15,23)
25 FORMAT(8X,'** SHORELINE FUMIGATION MODEL **')
WRITE(*,35)
35 FORMAT(IX)
WRXT£(*,45)
WRITE(15,45)
45 FORMAT(/' ORIGINALLY DEVELOPED BY')
WRITE(*,55)
WRITE(15.55)
55 FORMAT(1X,' P.K. MISRA')
WRITE(*,65)
WRITE(15,65)
65 FORMATflX,' ONTARIO MINISTRY OF ENVIRONMENT')
WRITE(*,75)
WRITE(15,75)
75 FORMAT(/' MODIFIED BY')
WRITE(*,85)
WRITE(15,85)
85 FORMAT(IX,' S. TEMPLEMAN')
WRITE(*,95)
NRITE(15,95)
95 FORMAT(IX,' NORTH CAROLINA STATE UNIVERSITY - JUNE 1988')
WRITE(*,105)
105 FORMAT(IX)
WRITE(*,115)
WRITE(15,115)
115 FORMAT(/' INPUT VARIABLES:')
WRITE (*,125) A
WRITE(15,125) A
125 FORMAT(/' THE TIBL A FACTOR IS:',F5.2,1X,'M**l/2')
WRITE (*,135) B
WRITE(15,135) B
A-44
-------
135 FORMAT(1X' THE VARIABLE B - W*/UL IS: ',F4.2)
WRITE (*,145) UL
WRITE (15,145) UL
145 FORMAT (IX' THE MEAN WIND SPEED IN THE TIBL IS:',F5.2,
IIX.'M/S')
WRITE (*,155) US
WRITE (15,155) US
155 FORMAT (IX' THE MEAN WIND SPEED AT STACK HEIGHT IS:',F5.2,
WRITE (*,165) PTMOL
WRITE (15,165) PTMOL
165 FORMAT(1X' THE POTENTIAL TEMPERATURE OVER LAND IS:',
WRITE (*,175) OTHDZ
WRITE (15,175) DTHDZ
175 FORMAT(1X' THE OVERWATER LAPSE RATE IS: ' ,F5.3 ,1X, 'K/M' )
WRITE (*,185) HO
WRITE (15,185) HO
185 FORMAT (IX' THE SURFACE, SENSIBLE HEAT FLUX IS:', IX,
*F4.0,1X,'W/M**2 ')
WRITE (*,195) F
WRITE(15,195) F
195 FORMAT(1X' THE BUOYANCY PARAMETER IS: ' ,F5.0,1X, 'M**4/S**3' )
WRITE (*,205) Q
WRITE(15,205) Q
205 FORMAT(1X' THE EMISSION RATE IS: ' ,F6.0,1X, 'C/S' )
WRITE (*,215) HSTK
WRITE (15,215) HSTK
215 FORMAT(1X,' THE STACK HEIGHT IS: ' ,F5.0,1X, 'M' )
C
C->-> CALL TO CALC SUBROUTINE TO BEGIN CALCULATION
C OF GROUND LEVEL CONCENTRATIONS
C
CALL CALC(NR)
C
C->-> WRITE CONCENTRATIONS FOB RECEPTOR LOCATIONS
C
30 WRITE (*, 225}
225 FORMAT (IX)
WRITE(*,235)
WRIT£(15,235)
235 FORMAT (//' RECEPTOR LOCATIONS AND CONCENTRATIONS' ,
i' IV MICROGRAMS/N**3')
WRITE(*,245)
WRITE(15,245)
245 FORMAT(/' X LOCATIOK' ,10X, ' Y LOCATION' , 11X,
f MICROG/M**3'/)
WRITE(*,255)
255 FORMAT(IX)
C
DO 200 1-1, NR
WRITB(*,265) XP(I),YP(I),MGCM(I)
WRITE(15,265) XP(I) ,YP(I) ,MGCM(I)
265 FORMAT(3X,F6.0,15X,F6.0,13X,F9.3)
200 CONTINUE
40 WRITE (*,275)
WRITE (15,275)
275 FORMAT (/' END OF MODEL RUN')
STOP
END
A-45
-------
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
SUBROUTINE CALC(NR)
C
C THIS SUBROUTINE ACTS AS AN INTERMEDIARY BETWEEN THE
C MAIN MODULE AND SUBROUTINE SIMP. IN THIS ROUTINE
C RECEPTOR COORDINATES ARE REA0 IN AND GROUND LEVEL
C CONCENTRATIONS EVALUATED BY SUBROUTINE SIMP ARE
C MULTIPLIED BY THE SOURCE STRENGTH AND CONVERTED TO
C MICROG/M**3. CONCENTRATIONS ARE STORED IN THE COMMON
C BLOCK FOR OUTPUT IN MAIN.
C
C DEFINE VARIABLES:
C
C ACC m desired accuracy of answer
C ANS - approximate value of the integral of F(X)
C for interval fro* left endpoint to XPl
C ANSI * approximate value of the integral of F(X)
C for the interval fro« XPl to right endpoint
C AREA - approximate, absolute value of the integral of
C F(X) for the entire interval
C F(X) - function whose integral is desired
C IFLAG * 1 for nornal return
C 2 If it is necessary to go to 30 levels.
C Srror nay be unreliable in this cas*.
C 3 If acre than 2000 function evaluations.
C Complete the computations and note that
C error is usually unreliable.
C IFLAG nay be used for diagnostics.
left endpoint (Initial X value near stack)
mean wind speed in the TIBL
Man wind speed at stack height in stable air
right endpoint (Downwind distance of receptor)
downwind distance at which plmm levels off
horizontal distance of receptor
C LB
C UL
C US
C XP
C XPl
C YP
C
ccccccc«cccc«cccccccccccccccccccccccxrc-> INITIALIZE VARIABLES
C
ACC - 10.0E-6
LB * 10.00
IFLAG » 0.0
C
C->-> LOOP THROUGH RECEPTOR POINTS
C
DO 100 I-1,NR
C
C->-> READ IN RECEPTOR COORDINATES
C
READ(12,15) XP(I),YP(I)
15 PORMAT(F9.1,2X,F9.1)
C
C->-> IF X COORDINATE IS TOO SMALL, GO TO
C NEXT RECEPTOR
C
IF(XP(I).GT.0.001) GOTO 10
A-46
-------
GOTO 100
C
C->-> INITIALIZE VALUES OF THE INTEGRAL FOR LEFT
C AND RIGHT HALVES OF THE INTERVAL
C
10 ANS -0.0
ANSI -0.0
C
C->-> DETERMINE TRAVEL DISTANCE UNTIL PLUME LEVELS OFF
C
XP1 « (4.50/CN)*US
C
C->-> DETERMINE WHETHER DISTANCE OF RECEPTOR DOWNWIND OF
C SOURCE EXCEEDS TRAVEL DISTANCE UNTIL PLUME LEVELS OFF
C
IF(XP(I).GE.XP1) GOTO 20
C
C->-> APPLY SIMPSON'S RULE OVER THE INTERVAL FROM LEFT
C ENDPOINT (LB) TO RIGHT ENDPOINT (XP)
C
CALL SIMP(EVAL,LB,XP(I),ACC,ANS,ERROR,AREA,IFLAG)
C
GOTO 30
C
C->-> RECEPTOR POINT IS IN REGION WHERE PLUME HAS LEVELED
C OFF. APPLY SIMPSON'S RULE IN TWO STEPS. FIRST APPLY
C OVER THE INTERVAL FROM LEFT ENDPOINT TO XP1. SECOND
C APPLY OVER THE INTERVAL FROM XP1 TO RIGHT ENDPOINT.
C USING TWO CALLS TO SIMP HERE SAVES ON COMPUTATION TIME.
C
20 CALL SIMP(EVAL,LB,XP1,ACC,ANS,ERROR,AREA,IFLAG)
CALL SIMP(EVAL,XP1,XP(I),ACC,ANSI,ERROR,AREA,IFLAG)
C
C->-> SUM VALUES OF THE INTEGRAL FOR THE LEFT AND
C RIGHT HALVES OF THE INTERVAL
C
30 ANS - ANS+ANS1
C
C->-> MULTIPLY BY SOURCE STRENGTH AND CONVERT ANSWER
C TO MICROGRAMS PER M**3
C
MGCM(I) - ANS*Q/1.E-06
C
100 CONTINUE
200 RETURN
END
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
SUBROUTINE SIMP(EVAL,EA,EB,ACC,ANS,ERROR,AREA,IFLAG)
C
C SIMP IS AN ITERATIVE CODE BASED ON SIMPSON'S RULE,
C A NUMERICAL TECHNIQUE DESIGNED TO EVALUATE THE
C DEFINITE INTEGRAL OF A CONTINUOUS FUNCTION WITH
C FINITE LIMITS OP INTEGRATION.
C
C DEFINE VARIABLES:
C
C ACC - desired accuracy of answer
C ANS - approximate value of the integral of F(X)
C frOH EA to EB
C AREA - approximate, absolute value of the integral
A-47
-------
C F(X) from EA to EB
C EA,EB * lower and upper limits of integration
C ERROR * estimated error of answer
C EVAL(X) * value of the integral evaluated at X
C IFLAG * 1 for normal return
C 2 If it is necessary to go to 30 levels or
C use length. Error may be unreliable
C in this case.
C 3 If more than 2000 function evaluations
C then complete the computations. Error
C is usually unreliable.
C IFLAG may be used for diagnostics.
C U • unit round-off
C
ccccccccccccccccccxcccoxcccccccccccccccxrccccccccccccccccccccc
DIKEMSIOM FV(5),LORR(30),FIT(30),F2T(30),F3T(30),
|DAT(30},ARESTT(30},ESTT(30),EPST(30),PSUM(30)
REAL SVAL
C
C->-> SET 0 TO APPROXIMATELY THE UNIT ROUND-OFF
C
U « 9.0E-7
C
C->-> INITIALIZE VARIABLES
C
FOURU - 4.0*U
IFLAG - 1
EPS « ACC
ERROR » 0.0
AREA * 0.0
AREST - 0.0
LVL • 1
LORR(LVL) - 1
PSUM(LVL) - 0.0
ALPHA - EA
DA - EB-EA
C
C->-> DETERMINE VALUES OF THE FUNCTZOH AT THE ENDS
C AND MID-POINT OF THE INTERVAL
C
FV(1) - EVAL(ALPHA)
FV(3) - EVAL(ALPHA+0.5*DA)
FV(5) - EVAL(ALPHA+DA)
C
C->-> START SUMMATION OF NUMBER OF FUNCTION EVALUATIONS
C
KOUNT » 3
WT - DA/6.0
C
C->-> DETERMINE ESTIMATE OF THE INTEGRAL FOR THE INTERVAL
C BETWEEN THE DESIGNATED ENDPOINTS
C
EST - WT*(FV(l)-f4.0*FV(3)+FV(5))
10 DX - 0.5*DA
C
C->-> DETERMINE VALUES OF THE FUNCTION AT THE ONE QUARTER
C AND THREE QUARTER POINTS OF THE INTERVAL
C
FV(2) - EVAL(ALPHA+0.5*DX)
FV(4) - EVAL(ALPHA+1.5*DX)
A-48
-------
KOUMT • KOUNT+2
WT » DX/6.0
C
C->-> DETERMINE ESTIMATES OF THE AREA UNDER THE LEFT HALF
C AMD RIGHT HALF OF THE CURVE THEM SUM
C
ESTL - WT*(FV(1)+4.0*FV(2)+FV(3))
ESTR - WT*(FV(3)+4.0*FV(4)+FV(5))
SUM - ESTL+ESTR
DIFF - EST-SUM
C
C->-> DETERMINE ESTIMATES OF THE AREA UNDER THE CURVE
C BETWEEN THE DESIGNATED ENDPOINTS BASED ON THE
C ABSOLUTE VALUES OF THE FUNCTION EVALUATIONS
C
ARESTL • WT*(ABS(FV(1))+ABS(4.0*FV(2))+ABS(FV(3)))
ARESTR - WT*(ABS(FV(3))+ABS(4.0*FV(4))+ABS(FV(5)))
AREA « AREA+((ARESTL+ARESTR)-AREST)
C
C->-> IP WITHIN DESIRED ACCURACY GO TO 20. IF INTERVAL IS TOO
C SMALL OR TOO MANY LEVELS OR TOO MANY FUNCTION
C EVALUATIONS, SET A FLAG AND GO TO 20 ANYWAY.
C
IF(ABS(DIFF).LE.EPS*ABS(AREA)) GOTO 20
IF(ABS(DX).LE.FOURU*ABS(ALPHA)) GOTO 50
IF(LVL.GE.30) GOTO 50
IF(KOUNT.GE.2000) GOTO 60
C
C-J—> STORE INFORMATION TO PROCESS RIGHT HALF OF THE
C CURVE. NOW, USING A GREATER NUMBER OF SUB-INTERVALS,
C RECALCULATE AREA UNDER THE LEFT HALF OF THE CURVE.
C
LVL - LVL+1
LORR(LVL) - 0
FIT(LVL) » FV(3)
F2T(LVL) * FV(4)
F3T(LVL) - FV(5)
DA - DX
DAT(LVL) - DX
AREST * ARESTL
ARESTT(LVL) - ARESTR
EST « ESTL
ESTT(LVL) * ESTR
EPS - EPS/1.4
EPST(LVL) - EPS
FV(S) - FV(3)
FV(3) - FV(2)
GOTO 10
C
C->-> ACCEPT APPROXIMATE INTEGRAL SUM. IF LEFT HALF
C OF CURVE WAS PROCESSED, MOVE TO RIGHT HALF.
C IF RIGHT HALF OF CURVE WAS PROCESSED, ADD RESULTS
C TO FINISH. LORR (A MNEMONIC FOR LEFT OR RIGHT)
C TELLS WHETHER INTERVAL IS RIGHT OR LEFT AT EACH
C LEVEL.
C
20 ERROR - ERROR-l-DIFF/15.0
30 IF(LORR(LVL).EQ. 0) GOTO 40
SUM - PSUM(LVL)+SUM
LVL • LVL-1
A-49
-------
IF(LVL.GT.l) GOTO 30
ANS - SUM
RETURN
C
C->-> MOVE RIGHT. RESTORE SAVED INFORMATION TO PROCESS
C RIGHT HALF OF INTERVAL.
C
40 PSUM(LVL) - SUM
LORR(LVL) - 1
ALPHA - ALPHA+DA
DA - DAT(LVL)
FV(1) - FIT(LVL)
FV(3) - F2T(LVL)
FV(5) « F3T(LVL)
AREST - ARESTT(LVL)
EST » ESTT(LVL)
EPS » EPST(LVL)
GOTO 10
C
C->-> ACCEPT 'POOR' VALUE. SET APPROPRIATE FLAGS.
C
90 IFLAG - 2
GOTO 20
60 IFLAG - 3
GOTO 20
END
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
FUNCTION EVAL(X)
C
C FUNCTION EVAL RETURNS A VALUE OF THE INTEGRAL FOR (X),
C THE DESIGNATED POINT ON THE INTERVAL OF INTEGRATION.
C THE FUNCTION RETURNS THE VALUE TO SUBROUTINE SIMP
C THROUGH THE FUNCTION NAME.
C
C DEFINE VARIABLES:
C
C CA - coefficient in plume rise equation
C CYS * constant for SIGMA Y in stable air
C CZS - constant for SIGMA Z in stable air
C FN - tine after which plume has leveled off (4.5/N)
CD* travel tine - X/US
C H - plume height
C HT » TIBL height at designated point on
C interval of integration
C HTl - TIBL height at receptor point
C VARYL - SIGMA Y in convective layer
C VARYS - SIGMA Y in stable layer
C VARZ - SIGMA Z in stable layer
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
REAL XP(200),YP(200),MGCM(200),EVAL.MF
COMMON/ONE/TCP,YP,A,B,UL,US,H,HSTK,CH,P,I,Q,MGCM
C
C->-> DEFINE CONSTANTS
C
CA - 1.6
CYS - 0.67
CZS - 0.40
C
C->-> REEXPRESS FREQUENTLY USED CALCULATIONS
C
A-50
-------
FU - F/US
FN - 4.50/CN
IF(X.LE. 0.001) GOTO 100
0 - X/US
C
C->-> DETERMINE SIGMA Y IN THE STABLE AIR
C
VARYS - CYS*(D**(2./3.))*(FU**(W3.))
C
C->-> DETERMINE SIGMA Y IN THE UNSTABLE AIR
C
VARYL - B*(XP(I)-X)/3.0
C
C->-> DETERMINE TIBL HEIGHT AT EVALUATION POINT (X)
C AND AT RECEPTOR POINT (XP)
C
HT - A*SQRT(X)
HT1 - A*SQRT(XP(I))
C
C->-> DETERMINE FIRST PART OF CONCENTRATION EQUATION
C
MF - l./(2.*3.14159*HTl*UL)
C
C->-> DETERMINE IF TRAVEL TIME IN STABLE AIR EXCEEDS
C TIME AFTER WHICH PLUME HAS LEVELED OFF. IF YES,
C FINAL PLUME RISE CALCULATIONS APPLY.
C
IF(D.GT.FN) GOTO 10
C
C->-> DETERMINE PLUME HEIGHT USING GRADUAL PLUME
C RISE EQUATION
C
H - (CA*(FU**(l./3.))*(D**(2./3.))) + HSTK
C
C->-> INSURE THAT FINAL PLUME HEIGHT IS NOT OVERESTIMATED
C BY TAKING THE LOWEST VALUE OF H. FINAL, STABLE PLUME
C RISE, ACCORDING TO BRIGGS, IS:
C 2. «*(FU/(CN*CN) )**(!. /3.) + HSTK
C
H - AMINlfH, 2. 6*(FU/(CN*CN) )**(!. /3.) + HSTK)
C
C->-> DETERMINE SIGMA Z IN STABLE AIR FOR GRADUALLY
C RISING PLUME
C
VAR2 - CZS*(D**(2./3.))*(FU**(l./3.))
C
C->-> DETERMINE VALUE OF DERIVATIVE IN
C CONCENTRATION EQUATION FOR RISING PLUME
C
DERIV - (-l./6.)*(A*UL)/(CZS*(F**(l./3.)))
/(HSTK * UL)/(CZS*(F**(l./3.)))*(2./3.)*(X**(-5./3.))
C
GO TO 20
C
C->-> PLUME HAS LEVELED OFF IN STABLE AIR
C
C->-> DETERMINE SIGMA Z IN STABLE AIR FOR A LEVEL
C PLUME
C
A-51
-------
10 VARZ - l.l*(FU/(CN*CN))**(l./3.)
C
C->-> DETERMINE VALUE OF DERIVATIVE IN
C CONCENTRATION EQUATION FOR LEVEL PLUME
C
DERIV - A/(2.*SQRT(X)«VARZ)
C
20 VARZS - VARZ*VARZ
SIGS - (VARYS*VARYS+VARYL*VARYL)
BLDIFS - (HT-H)*(HT-H)
C
C->-> DETERMINE VALUE OF EXPONENTIAL
C IN CONCENTRATION EQUATION
C
Cl - -.5*(BLDIFS/VARZS+YP(I)*YP(I)/SIGS)
C
C->-> TAKE ALOG OF EXPRESSION INSIDE
C INTEGRAL OF CONCENTRATION EQUATION
C
C - ALOG(DERIV)+C1-(ALOG(SIGS))/2.0
C
IF(ABS(C).GT.?0.0) GOTO 100
C
C->-> TAKE EXPONENTIAL OP EXPRESSION
C INSIDE INTEGRAL OF CONCENTRATION EQUATION
C
EVALL - EXP(C)
C
C->-> DETERMINE VALUE OF THE CONCENTRATION
C EQUATION (MINUS MULTIPLICATION BY
C THE SOURCE STRENGTH)
C
EVAL - EVALL*MF
GOTO 30
100 EVAL - 0.
30 CONTINUE
END
A-52
-------
Appendix
Sample Input and Output Files
A- 53
-------
A. Sample Input Files
The two input files shown here were used to create the model output which
follows. The input in the first file relates to a buoyant plume emitted from a 198 m stack
under meteorological conditions in which onshore flow, a stable overwater lapse rate and a
moderate upward, surface, sensible heat flux overland exist The second file contains the x
and y coordinate data. The first fifteen points indicated denote centeriine receptors while
the remaining five points provide some off-centerline locations for comparison. The user is
referred to Section 2.3.3 for further explanation of the input data format.
Values of Meteorological and Source Data Used ii| thq Sample Input Hie:
Mean wind speed within the TTBL - UL (m r1) 4.70
Mean wind speed at stack height - Us (mrl) 4.70
Mean potential temperature over land - BL (K) 294.0
Mean potential temperature over water - 9W (K) 292.0
Overwater lapse rate - (d8/dz)w (K m-1) 0.008
Surface, sensible heat flux - HO (Wnr2) 184.0
Plume buoyancy - F (nr^s*3) 564.0
Source strength - Q (g rl) 6550.0
Stack height -H^ (m) 198.0
Number of receptors-NR 20
Meteorological and source data as they appear in the program input file METJDAT:
4.70 4.70 294.0 292.0 0.008 184.0 564.0 6550.0 198.0 20
A-54
-------
X and Y Coordinate Data
Data as they appear in the program input file XYDAT (the first column contains the X
coordinates and the second contains the Y coordinates):
1000.0
2000.0
3000.0
4000.0
5000.0
10000.0
12000.0
14000.0
16000.0
18000.0
20000.0
25000.0
30000.0
40000.0
50000.0
10000.0
15000.0
15000.0
20000.0
20000.0
0000.0
0000.0
0000.0
0000.0
0000.0
0000.0
0000.0
0000.0
0000.0
0000.0
0000.0
0000.0
0000.0
0000.0
0000.0
500.0
-200.0
200.0
-400.0
400.0
B. Sample Output File
The sample output file illustrates the change in ground level concentration with
downwind distance from the source.
A-55
-------
** SHORELINE FUMIGATION MODEL **
ORIGINALLY DEVELOPED BY
P.KL MISRA
ONTARIO MINISTRY OF ENVIRONMENT
MODIFIED BY
S.TEMPLEMAN
NORTH CAROLINA STATE UNIVERSITY - JUNE 1988
INPUT VARIABLES:
THE TTOL A FACTOR IS: 2.84 M**l/2
THE VARIABLE B = W*/UL IS: 2\
THE MEAN WIND SPEED IN THE TIBL IS: 4.70 M/S
THE MEAN WIND SPEED AT STACK HEIGHT IS: 4.70 M/S
THE POTENTIAL TEMPERATURE OVER LAND IS: 294.0 K
THE OVERWATER LAPSE RATE IS: .008 K/M
THE SURFACE, SENSIBLE HEAT FLUX IS: 184.W/M**2
THE BUOYANCY PARAMETER IS: 564. M**4/S**3
THE EMISSION RATE IS: 6550. G/S
THE STACK HEIGHT IS: 198. M
RECEPTOR LOCATIONS AND CONCENTRATIONS IN MICROGRAMS/M**3
X LOCATION Y LOCATION MICROG/M**3
1000. 0. 0.164
2000. 0. 14.410
3000. 0. 32.580
4000. 0. 56.945
5000. 0. 88.709
10000. 0. 349.763
12000. 0. 479.400
14000. 0. 604.000
16000. 0. 712.281
18000. 0. 796.722
20000. 0. 853.932
25000. 0. 885.255
30000. 0. 807,289
40000. 0. 568.004
50000. 0. 385.945
10000. 500. 213.982
15000. -200. 632.572
15000. 200. 632.572
20000. -400. 763.026
20000. 400. 763.026
END OF MODEL RUN
A-56
-------
Appendix
Surface Roughness Lengths
A-57
-------
Table 1. Surface roughness lengths categorized, by terrain. Classification is from
Davenport (1960) and Wieringa (1980).
Class Terrain Description ZQ (m)
1
2
3
4
5
6
7
8
Open sea, fetch at least 5 km
Mud flats, snow; no vegetation, no obstacles
Open flat terrain; grass, few isolated obstacles
Low crops; occasional large obstacles, x/h > 20
High crops; scattered obstacles, 15 < x/h < 20
Parkland, bushes; numerous obstacles, x/h - 10
Regular large obstacles coverage (suburb, forest)
City center with high- and low-rise buildings
0.0002
0.0050
0.030
0.10
0.25
0,50
(1.0)
7
Notes: Here x is a typical upwind obstacle distance and h the height of the corresponding
major obstacles. Class 8 is theoretically intractable within the framework of boundary layer
meteorology and can better be modeled in a wind tunnel
A-5S
-------
APPENDIX B
FLOW CHARTS FOR THE
SDM MODEL
B-l
-------
MPTER
UNITIALIZE
DATA
READ
INPUTS
CALCULATE
CONCENTRATIONS
WRITE
OUTPUT
Figure B-1. Modified MPTER flow efiagram.
B-2
-------
SUBROUTINE INTERF
READ IN
TOWER DATA
IS
THE WIND
OWING FROM
WATER?.
IS
INLAND
TABIUTYCLAS
.B, OR C2
CALCULATE
T1BL
HEIGHT
ATSOURCE
N
N
N
IS
STACK ABOVE
TIBL?
CALCULATE
CN. A. AND B
CALL
MSFM
RETURN
-------
APPENDIX C
SOURCE CODE FOR SDM
C-l
-------
IKJ52827I Q.FORT(SDM)
C
<;->_>_>_> SECTION C - COMMON, DIMENSION, AND DATA STATEMENTS.
C
C /EXPOS/ BETWEEN MAIN PROGRAM AND BLOCK DATA
COMMON /EXPOS/ PXUCOF(6,9),PXUEXP(6,9),HC1(10),BXUCOF(6,9),BXUEXP (
*6,9)
C /MPOR/ BETWEEN MAIN, PTR, OUTHR, AND RCP
COMMON /MPOR/ IOPT(26)
C /MPO/ BETWEEN MAIN, PTR, AND OUTHR
COMMON /MPO/ NRECEP,NAVG,NB,LH,NPT,IDATE(2),RREC(180),SRSC(18Q),ZR
1(180) ,ELR(180) ,PHCHI(180) , PHSIGS (180,26) ,HSAV(250) ,DSAV(250) , PCHI (
2180),PSIGS(180,26),IPOL
C /MPR/ BETWEEN MAIN, PTH, AND RCP
COMMON /MPR/ UPL,Z,H,HL,X,Y,KST,DELH,SY,SZ,RC,MUOR
C /MP/ BETWEEN MAIN PROGRAM AND PTR
COMMON /MP/ SOURCE(9,250),CONTWO,PSAV(250),IPSIGS(250),U,TEMP,SINT
1,C05T,PL(6),ELP(250),ELHN,HANE,TLOS,CELM,CTER
C /MO/ BETWEEN MAIN PROGRAM AND OUTHR
COMMON /HO/ QTHETA(24),QU(24),IXST(24),QHL(24),QTEMP(24),MPS(25),N
1SIGP,IO/LINE1(20),LINE2(2C),LINE3(20),RKAME{2,180),IRANK(180) , STAR
2(5,180)
C /MR/ BETWEEN MAIN PROGRAM AND RANK
COMMON /MR/ HMAXA(5,180,5),NDAY(5,180,5),IHR(5,180,5),CONC(180,5),
1JDAY,NR
C
C SHORELINE COMMON - ADDED BY JEFF WINGET (6-88) TO HANDLE SHORE
C LINE DEFINITION CARDS
C
COMMON /SHORE/XSL(250),¥SL(250),BA(250),EA(250),FETCH(250),
& INDEX(250),SNAME(3),THETA
CHARACTER*4 SNAME,ENDS
COMMON /MSFM/ MSFMFL,MSFMHR
INTEGER MSFMFL(50,.24) ,MSFMHR(8784)
CHARACTER*5 CRADIL
CHARACTER*4 RNAME, PNAME, ANAME,BLNK, ENDP,ENDR, DUM,STAR, STR, CF, C,
& FUME
DIMENSION PNAME(3,250), IFREQ(7), DUMR(24), HLH(2,24), IMPS(25), T
1ITLE(2), TABLE(2,21), CONTER(6), RADIL(5), ANAME(36),PLL(6, 2)
DIMENSION SUM(180), ELRDUM(5), NTIME(5), ATIME(5), MODEL(2,2)
DIMENSION CF(5),IDUMR(24)
C
CHARACTER*4 TITLE,MODEL
C
C
DATA IFREQ /7*0/ ,BLNK /' «/
DATA TITLE /'S02 ','PART«/
DATA MODEL /'URBA','N','RURA1,»L»/
DATA ENDP /'ENDP1/ ,ENDR /'ENDR1/,ENDS /'ENDS1/
DATA MAXP /250/ ,STR /'*'/
C MAXP EQUALS SECOND DIMENSION OF THE ARRAY NAMED: SOURCE.
DATA ANAME /' 10,',' 20,•, « 30, • , • 40,',' SO,1,' 60,',' 70,',' 80,
1«,« 90,«,'100,','110,',I120,I,'130/I,«140,«,'150,•,•160,','170, ' , •
2180, ','190,','200,','210,','220,','230,«,'240,«,«250,', '260, ', '270
SfVZSO, I,I290,',I30T),I,I310,1, '320, ', '330,', '340,', '350, ', ' 360, •/
4
C
DAT21 MTTMT? /t i o •* * « i «•»—«-~
-------
DATA ITMIN1 /9999/,IDIV8 /O/, IDIV24 /O/, ICALM /O/
DATA C/ • C' / , ICFL3/ O/, ICFL8/ O/, ICFL2 4/ O/, CF/ 5 * ' ' /
DATA FUME/'F1/
DATA LI/I/,L2/2/,L3/3/,L4/4/,L5/5/
C
C DEFAULT POWER LAW EXPONENTS AND TERRAIN ADJUSTMENT FACTORS.
C
DATA PLL/.15,.15,.20,.25,.30,.30,.07,.07,.10,.15,.35,.55/
DATA CONTER/0.,0.,0.,0.,0.,0./
C
C CALL WSTCLK
C
WRITE (6,5432)
5432 FORMAT ('1',34X,'SDM (DATED 88204)'/
1 29X,'AN AIR QUALITY DISPERSION MODEL '/
1 32X,'COMBINING MPTER AND SHORELINE FUMIGATION'/
4 22X, 'SOURCE: UNAMAP FILE ON EPA"S IBM 3090, RTP. NC.1)
C
C->->->->SECTION D - FLOW DIAGRAM
C
C
C->->->->SECTION E - RUN SET-UP AND READ FIRST 6 INPUT CARDS.
C
C INITIALIZATIONS
C THE FOLLOWING 18 STATEMENTS MAY BE DELETED FOR USE ON
C COMPUTERS THAT ZERO CORE LOCATIONS USED BY A PROBLEM
C PRIOR TO EXECUTION.
NRECEP»0
NP*0
NHR=-0
NP3*0
NP8=0
NP24-0
NPX=0
DO 10 1-1,21
TABLE(1,I)-0.
10 TABLE(2,I)-0.
DO 40 1-1,180
SUM(I)=0.
DO 30 J-1,5
CONC(I,J)-0.
DO 20 K*l,5
20 HMAXA(J,I/K)»0.
30 CONTINUE
40 CONTINUE
C I/O DEVICE INITIALIZATIONS
IN»5
10-6
C UNIT 11 - DISK INPUT OF MET DATA—USED WHEN IOPT(5)=1.
C UNIT 10 - DISK OUPUT OF PARTIAL CONCENTRATIONS
C AT EACH RECEPTOR—USED WHEN IOPT(21) » 1.
C UNIT 12 TAPE/DISK OUTPUT OF HRLY CONCENTRATIONS-IF IOPT(22)=1.
C UNIT 13 TAPE/DISK OUTPUT OF CONCENTRATIONS FOR AVERAGING PERIOD
C USED IF IOPT(23) - 1.
C UNIT 14 TAPE/DISK STORAGE FOR SUMMARY INFO, USED IF IOPT(20)=1.
C UNIT 15 - TAPE/DISK INPUT OF HOURLY POINT SOURCE EMISSIONS
C — USED IF IOPT(6) = 1.
C
C READ CARDS 1-3 (SEE DESCRIPTION, SECTION B).
-------
READ (IN, 1180) LINE1,LINE2,LINE3
C
C READ CARD TYPE 4 (SEE DESCRIPTION, SECTION B).
C
READ (IN,*) IDATl(l),IDATE(2),IHSTRT,NPER,NAVG,IPOL,MUOR,NSIGP,
1NAV5,CONONE,CELM,HAFL
C THE ABOVE FORMAT IS IBM'S FREE FIELD INPUT.
C VARIABLES MUST BE SEPARATED BY COMMAS.
C THIS IS SIMILAR TO IBM'S LIST DIRECTED IO.
WRITE (IO,1395)(MODEL(K,MUOR),K-1,2),LINE1,LINE2,LINE3
IF (NSIGP.LE.25) GO TO 50
WRITE (10,1250) NSIGP
C CALL WAUDIT
STOP
50 IP-IPQL-2
CONTWO-CONONE
C READ CARD TYPE 5 (SEE DESCRIPTION, SECTION B).
C
READ (IN,*) (IOPT(I),1-1,25)
C
IF(IOPT(25).NE.l) GO TO 55
C
C DEFAULT SELECTION RESULTS IN THE FOLLOWING: USE STACK DOWNWASH
C (2)? USE FINAL PLUME RISE (3) ; USE BUOYANCY-INDUCED DISPERSION
C (4)? WRITE HXGH-5 TABLES (19) BUT DELETE ALL OTHER OUTPUT (10,
C 11,12, 13, 14, 15, 16, 17, 18, 21, 22, 23, AND 24).
C
IOPT(2)*0
IOPT(3)=1
IOPT(4)»1
IOPT(5)-0
IOPT(7)»0
IOPT(10)«1
IOPT(11)*1
IOFT(12)*1
IOPT(13)»1
IOPT(14)-1
IOPT(15)*1
IOPT(16)-1
IQPT(17)-1
IOPT(18)-1
IOPT(19)*0
IOPT(20)-0
IOPT(21)»0
IOPT(22)-0
IOPT(23)-0
IOPT(24)»0
C
C SET HALF-LIFE FOR DEFAULT OPTION
C
IF(IPOL.EQ.3.AND.MUOR.EQ.1)HAFL-14400.
IF(IPOL.NE.3.0R.MUOR.NE.1)HAFL-0.
C
C SET START HOUR AND AVERAGING PERIOD?
C SET THE NUMBER OF SIGNIFICANT POINT AND
C AREA SOURCES.
C
IHSTRT-1
NAVG-24
-------
c
55 CONTINUE
C
C WRITE GENERAL INPUT INFORMATION
WRITE (IO,1410) TITLE(IP) ,NPER,NAVG, IHSTRT, IDATE(2) ,IDATE(1) , CONTW
10,NSIGP
DAY1A=»IDATE(2)
HR1-IHSTRT
IF (HAFL.GT.0.0) GO TO 60
TLOS-0 .
WRITE (IO,1420)
GO TO 70
60 WRITE (10,1430) HAFL
TLOS=693./HAFL
70 IF (IOPT(19) .EQ.l) GO TO 80
NAVT=5
C FOR DEFAULT OPTION
C ADDITIONAL AVERAGING PERIOD SET TO ZERO.
IF(IOPT(25) .EQ.l) NAV5-0
IF (NAV5.EQ.1.0R.NAV5.EQ.3.0R.NAV5.EQ.8.0R.NAV5.EQ.24,OR.NAV5.EQ.O
1) NAVT»4
NTIME(5)»NAV5
ATIME(5)*NAV5
WRITE (10,1440) NAVT
80 IF (IOPT(1) .EQ.O) GO TO 90
WRITE (10,1450) CELM
ELHN-99999.
ELOW-99999.
90 IF (NSIGP.GT.O) GO TO 100
IOPT(17)»1
100 WRITE (10,1460) (I, IOPT(I) , 1-1, 13)
WRITE (10,1470) (I, IOPT(I) ,1=14,25)
C
C READ CARD TYPE 6 (SEE DESCRIPTION, SECTION B) .
C
C SWITCH TO SELECT DEFAULT POWER LAW EXPONENTS,
C TERS.RAIN ADJUSTMENT FACTOR
C
IF(IOPT(25) .NE.O)READ(IN,*)HANE
IF(IOPT(25) .EQ.O)READ(IN,*)HANE,PL,CONTER
IF(IOPT(25) .EQ.O) GO- TO 105
DO 104 11-1,6
PL(I1)»PLL(I1,MUOR)
104 CONTINUE
105 CONTINUE
C
IF (IOPT(1) .EQ.l) GO TO 110
WRITE (IO,1480) HANE,PL
GO TO 140
110 WRITE (10,1490) HANE , PL , CONTER
DO 120 1-1,6
IF (CONTER(I) .LT.O. .OR.CONTER(I) .GT.l.) GOTO 130
120 CONTINUE
GO TO 140
130 WRITE (10,1260)
C CALL WAUDIT
STOP
-------
C RAMQ IN THE RAM SYSTEM. THIS SECTION IS RESPONSIBLE
C FOR MAKING THE NECESSARY DATA CONVERSIONS ON THE RAW
C EMISSIONS DATA IN ORDER TO ESTABLISH A STANDARD
C DATA BANK WHICH WILL BE ACCEPTABLE. A CONVERSION FACTOR
C FROM USER UNITS TO KILOMETERS IS APPLIED WHEN NECESSARY.
C
C->->->->SECTION F - INPUT AND PROCESS EMISSION INFORMATION.
C
140 WRITE (10,1500)
NPT=0
C BEGIN LOOP TO READ THE POINT SOURCE INFORMATION
150 NPT=NPT+1
IF (NPT.LE.MAXP) GO TO 160
READ (IN,1200) DUM
IF (DUM.EQ.ENDP) GO TO 230
WRITE (10,1270) MAXP
C CALL WAUDIT
STOP
C
C READ CARD TYPE 7 (SEE DESCRIPTION, SECTION B).
C
160 READ (IN,1210) (PNAME(I,NPT),I»l,3),(SOURCE(I,NPT),1=1,8),ELP(NPT)
C CARD WITH 'ENDP' IN COL 1-10 IS USED TO SIGNIFY END OF
C POINT SOURCES.
IF (PNAME(1,NPT).EQ.ENDP) GO TO 230
C ELHN, ELEVATION OF LOWEST STACK TOP IN INVENTORY, IS DETERMINED
C IN USER HEIGHT UNITS
IF (IOPT(1).EQ.O) GO TO 170
TOM-SOURCE(S,NPT)/CELM+ELP(NPT)
IF (TOM.LT.ELHN) ELHN-TOM
C LOWPT, ELEVATION OF LOWEST SOURCE GROUND-LEVEL
C IN INVENTORY, IN USER HEIGHT UNITS.
IF (ELP(NPT).LT.BLOW) ELOW»ELP(NPT)
C CALCULATE BUOYANCY FACTOR
170 D-SOURCE(7,NPT)
C FOLLOWING VARIABLE IS BRIGGS' F WITHOUT TEMPERATURE FACTOR.
SOURCE(9,NPT)-2.45153 *SOURCE(8,NPT)*D*D
C 2.45153 IS GRAVITY OVER FOUR.
TS=SOURCE(6,NPT)
IF (TS.GT.293.) GO TO 180
HF*SOURCE(5,NPT)
GO TO 200
180 F»SOURCE(9,NPT)*(TS-293.)/TS
IF (F.GE.55.) GO TO 190
C ONLY BUOYANCY PLUME RISE IS CONSIDERED HERE.
HF=SOURCE(5,NPT)+21.425*F**0.75/3.
GO TO 200
190 HF»SOURCE(5,NPT)+38.71*F**0.6/3.
C HSAV, DSAV, AND PSAV ARE USED FOR TEMPORARY STORAGE
C (OR AS DUMMIES) FOR THE NEXT 60 STATEMENTS.
200 HSAV(NPT)»HF
C DETERMINE HEIGHT INDEX.
DO 210 IH»2,9
IF (HF.LT.(HCl(IH)-.Ol)) GO TO 220
210 CONTINUE
IH-10
220 IS=IH-1
IF(MUOR.EQ.1)GO TO 221
A*PXUCOF(2,IS)
-------
GO TO 222
221 A=BXUCOF(2,IS)
B-BXUEXP(2,IS)
222 DSAV(NPT)»(A*HF**B)*SOURCE(IPOL,NPT)/3.
C AN ESTIMATE OF THE POTENTIAL IMPACT OF EACH SOURCE IS
C DETERMINED AND STORED IN DSAV. MAX CONCENTRATION IS
C DETERMINED BY CHI(MAX)=(A*H**B)*Q/U WHERE
C A IS THE COEFFICIENT AND B IS THE EXPONENT, OF
C MAXIMUM CHI*U/Q VALUES PREDETERMINED FOR B STABILITY
C AND A SPECIFIC EFFECTIVE HEIGHT RANGE. PLUME RISE
C IS CALCULATED FOR B STABILITY AND 3 M/SEC WIND SPEED.
C
C GO BACK AND READ DATA FOR ANOTHER POINT SOURCE.
IPSIGS(NPT)-0
C LIST POINT SOURCE INFORMATION.
WRITE (10,1510) NPT,(PNAME(J,NPT),J=1,3),(SOURCE(K,NPT),K=1,8),DSA
IV(NPT),HSAV(NPT),ELP(NPT),F
GO TO 150
230 NPT=NPT-1
C CHECK FOR NPT < OR = 0
IF (NPT.GT.O) GO TO 240
WRITE (10,1280) NPT
C CALL WAUDIT
STOP
C
C->->->->SECTION G - RANK SIGNIFICANT SOURCES.
C
240 IF (NSIGP.EQ.O) GO TO 280
C RANK NSIGP HIGHEST POINT SOURCES.
IF (NPT.LT.NSIGP) NSIGP*NPT
DO 260 1-1,NSIGP
SIGMAX—1.0
DO 250 J»1,NPT
IF (DSAV(J).LE.SIGMAX) GO TO 250
SIGMAX=DSAV(J)
LMAX-J
250 CONTINUE
C IMPS IS THE SOURCE NUMBER IN ORDER OF SIGNIFICANCE.
IMPS(I)*LMAX
C PSAV IS THE CALC. CONC. IN ORDER OF SIGNIFICANCE.
PSAV(I)=SIGMAX
260 DSAV(LMAX)»-1.0
C OUTPUT TABLE OF RANKED SOURCES.
WRITE (10,1520) TITLE(IP)
DO 270 I»l,NSIGP
WRITE (10,1530) I,PSAV(I),IMPS(I)
270 CONTINUE
C
C->->->->SECTION H - EMISSIONS WITH HEIGHT TABLE.
C
280 IF (IOPT(9).EQ.l) GO TO 340
DO 320 I-1,NPT
DO 290 J=l,20
HC=J*5.
IF (SOURCE(5,I).LE.HC) GO TO 300
290 CONTINUE
C POINT SOURCES WITH PHYSICAL HEIGHTS GT 100 METERS ARE LISTED
C SEPARATELY.
WRITE (10,1540) I,SOURCE(5,I),SOURCE(IPOL,I)
-------
C ADD 1MISSIOK RATE INTO TABLE AND TOTAL.
300 TABLE(1,J)-TABLE(1,J)+SOURCE(IPOL,I)
310 TABLE(1,21)-TABLE(1,21)+SOURCE(IPOL,I)
320 CONTINUE
C OUTPUT SOURCE-STRENGTH-HEIGHT TABLE
C THIS TABLE DISPLAYS THE TOTAL EMISSIONS FOR POINT
C SOURCES AND TH1 CUMULATIVE FREQUENCY ACCORDING TO
C HEIGHT CLASS
WHIT! (IO,1550) TITLE(IP)
C HEIGHT CLASS EMISSIONS ARE IN 1
C DETERMINE CUMULATIVE PERCENT IN 2
IH1-0
IH2-5
IM1-1
TABLE(2,1)-TABLE(1,1)/TABLB(1,21)
WRITE (IQ,1560) IH1,IH2,(TABLE(J,l),J-1,2)
DO 330 1-2,20
IH2-I*5
IH1-IH2-4
IM1-I-1
TABLE(2,I)"TABLE(1,I}/TABL1(1,21)+TABLE(2,IM1)
WRITE (IO,156Q) IH1,IH2,(TABLE(J,I),J-1,2)
330 CONTINUE
WRITE (10,1570) TABLE(1,21)
340 NSIXL
3010 READ (IN,3000) (SNAME(I),1-1,3),XSL(NSL),YSL(NSL),
& BA(NSL),EA(NSL),FETCH(NSL)
IF (SNAME(l).EQ.ENDS) GO TO 3020
3000 FORMAT (3A4,5F8.0)
NSL»NSL+1
GO TO 3010
3020 CONTINUE
C
C->->->->SECTION I - EXECUTE FOR INPUT OF SIGNIFICANT SOURCE NUMBERS.
C
WRITE (10,1580)
IF (IOPT(7).EQ.O) GO TO 370
C
C READ CARD TYPE 8 (SEE DESCRIPTION, SECTION B).
C
READ (IN,1220) INPT,(MPS(I),1-1,INPT)
WRITE (10,1590) INPT,(MPS(I),I»1,INPT)
IF (INPT.L£.NSIGP) GO TO 350
WRITE (IO,1290) INPT,NSIGP
C CALL WAUDIT
STOP
350 IF (INPT.EQ.O) GO TO 370
IF (MPS(INPT).EQ.O) WRITE (IO,1300)
J-INPT+1
K-l
C ADD SIGNIFICANT SOURCES DETERMINED FROM RANKED SOURCE LIST
C IF NSIGP GREATER THAN INPT.
IF (J.GT.NSIGP) GO TO 390
DO 360 I-J,NSIGP
MPS(I)-IMPS(K)
360 K=K+1
GO TO 390
370 DO 380 1-1,NSIGP
380 MPS(I)-IMPS(I)
-------
IF (IOPT(6).EQ.O) GO TO 410
C SAVE AVERAGE EMISSION RATE
DO 400 I»1,NPT
400 PSAV(I)-SOURCE(IPOL,I)
C FILL IN SIGNIFICANT POINT SOURCE ARRAY
410 DO 420 I»1,NSIGP
J-MPS(I)
420 IPSIGS(J)=I
C
0>->->->SECTION J - CHECK MET DATA IF FROM FILE OF ONE YEAR'S DATA.
C
IF (IOPT(5).EQ.l) GO TO 450
C
C READ CARD TYPE 9 (SEE DESCRIPTION, SECTION B).
C
READ (IN,*) ISFCD,ISFCYR,IMXD,IMXYR
C READ ID RECORD FROM PREPROCESSED MET DISK OR TAPE FILE.
READ (11) ID,IYEAR,IDM,IYM
IF (ISFCD.EQ.ID.AND.ISFCYR.EQ.IYEAR) GO TO 430
WRITE (10,1310) ISFCD,ISFCYR,ID,IYEAR
C CALL WAUDIT
STOP
430 IF (IMXD.EQ.IDM.AND.IMXYR.EQ.IYM) GO TO 440
WRITE (10,1320) IMXD,IMXYR,IDM,IYM
C CALL WAUDIT
STOP
440 WRITE (10,1610) ISFCD,ISFCYR,IMXD,IMXYR
C '
C->->->->SECTTON K - GENERATE POLAR COORDINATE RECEPTORS.
C
450 NRECEP»0
WRITE (IO,1620)
IF (IOPT(8).NE.l) GO TO 520
C
C , READ CARD TYPE 10 (SEE DESCRIPTION, SECTION B).
C
READ (IN,*) RADIL,CENTX,CENTY
JA-0
DO 460 J»l,5
IF (RADIL(J).EQ.O) GO TO 460
JA=*JA+1
460 CONTINUE
WRITE (10,1630) CENTX,CENTY,RADIL
DO 480 I~l,36
C CALCULATE THE ANGLE IN RADIANS
RADIK-FLOAT(I)*0.1745329
C 0.1745329 IS 2*PI/36
SINRAD-SIN(RADIK)
COSRAD=COS(RADIK)
DO 470 J»1,JA
NRECEP*I+36*(J-1)
RREC(NRECEP)-(RADIL(J)*SINRAD)+CENTX
C CALCULATE THE EAST-COORDINATE
SREC(NRECEP)»(RADIL(J)*COSRAD)+CENTY
C CALCULATE THE NORTH-COORDINATE
RNAME(1,NRECEP)=ANAME(I)
C ALPHANUMERIC INFORMATION WHICH-INDICATES DEGREES AZIMUTH
C ENCODE (4,1640,RNAME(2,NRECEP)) RADIL(J)
C ENCODE THE FLOATING POINT VARIABLE OF RADIAL DISTANCE
-------
c
C THE IBM3090 DOES NOT SUPPORT ENCODE SO WRITE THE RADIL DISTANCE
C TO AN INTERNAL FILE TO CONVERT IT TO A CHARACTER VALUE
C
ASSIGN 2531 TO NUMF
IF (RADIL(J) .LT. 100.) ASSIGN 2532 TO NUMF
IF (RADIL(J) .LT. 0.1) ASSIGN 2533 TO NUMF
WRITE(CRADIL,NUMF) RADIL(J)
RNAM1(2,NRECEP)-CRADIL
C
ZR(NRECEP)-0.
ELR(NRECEP)»0.
470 CONTINUE
480 CONTINUE
NRECEP-36*JA
C
C->->->~>SECTION L - READ POLAR COORDINATE ELEVATIONS.
C
IF (lOPT(l).EQ.O) GO TO 520
C
C READ 36 CARDS, TYPE 11 (SEE DESCRIPTION, SECTION 8).
C
DO 510 1-1,36
READ (IN,1230) IDUM,(ELRDUM(J)»J-1,JA)
IF (IDUM.EQ.I) GO TO 490
WRITE (IO,1330) I,IDUM
C CALL WAUDIT
STOP
490 DO 500 J»1,JA
K=J-1
L-K*36+I
500 ELR(L)*»ELRDUM(J)
510 CONTINUE
C
C->->->->SECTION M - READ AND PROCESS RECEPTOR INFORMATION.
C
C NOW READ CARD TYPE 12 IF NECESSARY. MUST HAVE A CARD WITH
C 'ENDR'IN COLS 1-4 TO INDICATE END OF RECEPTOR CARDS.
C NO MORE THAN 180 RECEPTORS CAN BE INPUT TO MPTER.
C START LOOP TO ENTER RECEPTORS.
520 NRECEP-NRECEP+1
IF (NRECEP.LE.180) GO TO 540
READ (IN,1200,END-530) BUM
IF (DUM.EQ.ENDR) GO TO 550
530 WRITE (IO,1340)
C CALL WAUDIT
STOP
C
C READ CARD TYPE 12 (SEE DESCRIPTION, SECTION 1).
C
540 READ (IN,1240) (RNAME(J,NRECEP) , J-l, 2) ,RREC(NRECEP) ,SREC(NRECEP) , Z
1R(NRECEP),ELR(NRECEP)
C PLACE 'ENDR' IN COLS 1 TO 4 ON CARD FOLLOWING LAST RECEPTOR
C TO END READING TYPE 12 CARDS.
IF (RNAME(1,NRECEP).EQ.ENDR) GO TO 550
GO TO 520
550 NRECEP-NRECEP-1
IF (IOPT(1).EQ.O) GO TO 570
C IF TERRAIN OPTION IS EMPLOYER. nwroPMTMi? TT?
-------
C FOR ADDITIONAL REMARKS.
DO 560 J=l,NRECEP
IF (ELR(J).GT.ELHN.OR.ELR(J).LT.ELOW) STAR(2,J)=STR
IF (ELR(J).GT.ELHN) STARfl,J)*STR
560 CONTINUE
570 IF (NRECEP.GT.O) GO TO 580
WRITE (10,1350) NRECEP
C CALL WAUDIT
STOP
C PRINT OUT TABLE OF RECEPTORS. ***
580 WRITE (10,1650)
DO 590 K«l,NRECEP
590 WRITE (10,1660) K,STAR(1,K),STAR(2,K),(RNAME(J,K),J-l,2),RREC(K),S
1REC(K),2R(K),ELR(K)
IF (IOPT(1).EQ.O) GO TO 600
WRITE (10,1670)
C
C->->->->SECTION N - POSITION FILES AS REQUIRED.
C
600 IF (IOPT(20).EQ.O) GO TO 610
C
C READ CARD TYPE 13 (SEE DESCRIPTION, SECTION B).
C
READ (IN,*) IDAY,LDRUN
WRITE (10,1680) IDAY,LDRUN
IF (IDAY.EQ.O) GO TO 610
C READ INFO FOR HIGH-FIVE TABLE FROM LAST SEGMENT.
READ (14) IDAYS,SUM,NHR,DAY1A,HR1,HMAXA,NDAY,IHR
REWIND 14
IF (IDAY.EQ.IDAYS) GO TO 610
WRITE (10,1360) IDAY,IDAYS
C CALL WAUDIT
STOP
610 NP»IDAY*(24/NAVG)
C IF OPTION 21-1, WRITE INITIAL INFO TO UNIT 10
IF (IOPT(21).EQ.l) WRITE (10) NPER,NAVG,LINE1,LINE2,LINE3
IF (IOPT(22).EQ.O) GO TO 640
IF (IDAY.LE.O) GO TO 630
C SKIP PREVIOUSLY GENERATED HOURLY RECORDS.
ISKIP=IDAY*24+2
DO 620 I»1,ISKIP
620 READ (12)
GO TO 640
C WRITE LEAD TWO RECORDS ON HOURLY FILE.
630 WRITE (12) NPER,NAVG,LINE1,LINE2,LINE3
WRITE (12) NRECEP,(RREC(I),1-1,NRECEP),(SREC(J),J=1,NRECEP)
640 IF (IOPT(23).EQ.O) GO TO 670
IF (IDAY.LE.O) GO TO 660
C SKIP PREVIOUSLY GENERATED AVERAGING-PERIOD FILE.
ISKIP=NP+2
DO 650 I=1,ISKIP
650 READ (13)
GO TO 670
C WRITE LEAD TWO RECORDS ON AVERAGING PERIOD FILE.
660 WRITE (13) NPER,NAVG,LINE1,LINE2,LINE3
WRITE (13) NRECEP,(RREC(I),1=1,NRECEP),(SREC(J),J-lfNRECEP)
670 IF (IOPT(6).EQ.O) GO TO 690
IF (IDAY.LE.O) GO TO 690
ISKIP=IDAY*24
-------
680 READ (15)
690 IDAY-IDATE(2) -1
IF (IDAY.LE.O.OR.IOPT(5).EQ.l) GO TO 710
C SKIP PREVIOUSLY USED HOURLY EMISSION RECORDS.
DO 700 I-1,IDAY
700 READ (11)
710 CONTINUE
C
O>->->->SECTION O - START LOOPS FOR DAY AND AVG TIME; READ MET DATA.
C
720 IDAY-IDAY+1
DAY-IDAY
NHRS-0
IF (IOPT(5).EQ.l) GO TO 760
C IF OPTION 5 EQUALS ZERO, INPUT MET DATA OFF DISK (UNIT 11)
READ (11) JYR,IMO,DAY1,IKST,QU»QTEMP,DUMR,QTHETA,HLH
DO 781 JMl-1,24
IDUMR(JM1)»DUMR(JM1)+0.5
781 CONTINUE
IF (JYR,NE.IDATE(1)) GO TO 730
IF (DAY1.EQ.DAY) GO TO 740
C DATE ON MET TAPE DOES NOT MATCH INTERNAL DATE
730 WRITE (10,1370) JYR,IDATE(2),IDATE(1),IDAY
C CALL WAUDIT
STOP
C MODIFY WIND VECTOR BY 180 DEGREES. SINCE FLOW VECTORS WERE
C OUTPUT FROM RAMMET. THIS CONVERTS BACK TO WIND DIRECTIONS.
740 IDATE(2)»DAY1
DO 750 IQ-1,24
IF (IKST(IQ).EQ.7) IKST(IQ)*6
QTHETA(IQ)-QTHETA(IQ)+180.
IF (QTHETA(IQ).GT.360.) QTHETA(IQ)«QTHETA(IQ)-360.
C SELECT URBAN OR RURAL MIXING HEIGHTS AS APPROPRIATE.
IF(MUOR.EQ.1)IMX-2
IF(MUOR.EQ.2)IMX-1
750 QHL(IQ)*HLH(IMX,IQ)
760 NB-IHSTRT
NE=NB+NAVG-1
IF (NB.GT.O) GO TO 770
WRITE (10,1380) IHSTRT
C CALL WAUDIT
STOP
C START .LOOP FOR AVERAGING PERIOD.
770 U»0.0
TEMP-0.0
DELN-0.0
DELM-0.0
DO 780 1-1,7
780 IFREQ(I)-0.0
DO 800 I-NB,NE
JHR-I
DAY2=IDATE(2)
IF (IOPT(5).EQ.O) GO TO 790
C
C READ CARD TYPE 14 IF IOPT
C (SEE DESCRIPTION, SECTION B).
C
READ (IN,*) JYR,DAY1,JHR,IKST(JHR) ,QU(JHR) ,QTEMP(JHR) ,QTHETA(JH
,QHL(JHR)
-------
C REDEFINE START HOURS AND DATES AT FIRST HOUR OF EACH
C AVERAGING PERIOD IF READING HOURLY MET DATA.
IDATE(1)-JYR
IHSTRT»JHR
ISTDAY»DAY1
IDATE(2)-ISTDAY
DAY2-IDATE(2)
790 IF (IKST(JHR).EQ.?) IKST(JHR)-6
IF (IOPT(10).EQ.l) GO TO 800
C
C->->->->SECTION P - CALCULATE AND STORE FOR HIGH-FIVE TABLE.
C
IF (I.EQ.NB) WRITE (10,1690) IDATE
TRAD-QTHETA(JHR)*0.01745329
WRITE (10,1700) JHR,QTHETA(JHR),QU(JHR),QHL(JHR),QTEMP(JHR),IKST(J
1HR)
SINT=«SIN(TRAD)
COST-COS(TRAD)
C CALCULATE WIND COMPONENTS
URES-QU(JHR)
UR»URES*SINT
VR*URES*COST
DELM-DELM+UR
DELN-DELN+VR
TEMP-TEMP+QTEMP(JHR)
U-U+URES
KST-IKST(JHR)
IFREQ(KST)-IFREQ(KST)+1
C END LOOP TO READ ALL MET DATA FOR AVERAGING PERIOD.
800 CONTINUE
IF (IOPT(10).EQ.l) GO TO 860
C CALCULATE RESULTANT WIND DIRECTION THETA
DELN*DELN/NAVG
DELM-DELM/NAVG
THETA-ANGARC(DELM,DELN)
C CALCULATE AVERAGE AND RESULTANT SPEED AND PERSISTENCE.
U-U/NAVG
TEMP-TEMP/NAVG
URES-SQRT (DELN*DELN-<-DELM*DELM)
PERSIS-URES/U
C DETERMINE MODAL AND AVERAGE STABILITY
LSMAX-0
DO 810 1-1,7
LST-IFREQ(I)
IF (LST.LE.LSMAX) GO TO 810
LSMAX-LST
LSTAB»I
810 CONTINUE
IP1-LSTAB+1
KST-LSTAB
DO 820 I-IP1,7
IF (LSMAX.EQ.IFREQ(I)) GO TO 830
820 CONTINUE
GO TO 850
C IF TIE FOR MAX MODAL STABILITY CALCULATE AVERAGE STABILITY
830 KSUM=0
DO 840 J-1,7
840 KSUM=KSUM+IFREQ(J)*J
KST-FLOAT(KSUM)/FLOAT(NAVG)+0.5
-------
850 WRITE (IO,1710)
WRITE (10,1720) THETA,UR£StU,TEMP,PERSIS,KST
C REDEFINE NB AND NE IN CASE NON-CONSECUTIVE DAYS ARE BEING RUN
860 IF (IOPT(5).EQ.O) GO TO 370
NB*IHSTRT
NE-IHSTRT+NAVG-1
C
C->->->->S!CTION Q - INITIALIZE FOR HOURLY LOOP.
C
C INITIALIZE SUMS FOR CONG AND PARTIAL CONG FOR AVG PERIOD.
870 DO 890 K»1,NRECEP
PCHI(K)=0.0
DO 880 1-1,26
830 PSIGS(K,I)=0.0
890 CONTINUE
C IF SAVING PARTIAL CONCENTRATIONS, WRITE INITIAL RECEPTOR INFO.
IF (IOPT(21) .EQ.O) GO TO 900
WFITE (10) NRECEP,NPT,(RREC(I),I-1,NRECEP),(SREC(I),1=1,NRECEP)
C
C->->->->S£CTION R - BEGIN HOURLY LOOP.
C
900 DO 1020 ILH*NB,NE
LH-ILH
IF (LH.LE.24) GO TO 910
LH=MOD(ILH,24)
IF (LH.EQ.l) IDATE(2)-DAY1
C INITIALIZE SUMS FOR CONG AND PARTIAL CONG FOR HOURLY PERIODS,
910 DO 930 K=1,NREC£P
PHCHI(K)«0.0
DO 920 1-1,26
920 FHSIGS(K,I)*0.0
930 CONTINUE
C SET MET CONDITIONS FOR THIS HOUR
THETA=QTHETA(LH)
U=QU(LH)
HL-QHL(LH)
TEMP=QTEMP(LH)
KST*IKST(LH)
TRAD-THETA*0.01745329
SINT=SIN(TRAD)
COST=COS(TRAD)
CTER-CONTER(KST)
C IF OPTION 6 IS 1, READ HOURLY EMISSIONS.
IF (IOPT(6).EQ.O) GO TO 940
IDCK=IDATE(1) *100000+IDATE{2) *100-I-LH
READ (15) IDATP,(SOURCE(IPOL,I),I»1,NPT)
C CHECK DATE
IF (IDCK.EQ.IDATP) GO TO 940
WRITE (10,1390) IDCK,IDATP
C CALL WAUDIT
STOP
C CALCULATE POINT SOURCE CONTRIBUTIONS
940 CALL PTR(IDAY,PNAME)
IF (IOPT(22).EQ.O) GO TO 950
C WRITE HOURLY CONCENTRATIONS TO TAPE
WRITS (12) IDATE(2),LH,(PHCHI(I),I=1,NRECEP)
C
C->->->->SECTION S - CALCULATE AND STORE FOR HIGH-FIVE TABLE.
C
-------
C IF OPTION 19 IS 1, DELETE COMPUTATIONS FOR AVG CONG.
C FOR LENGTH OF RECORD AND HIGH-FIVE TABLE.
IF (IOPT(19).EQ.l) GO TO 1010
C CUMULATE CONCENTRATIONS FOR AVG TIMES AND LENGTH OF RECORD,
C
C FOR DEFAULT OPTION DETERMINE CALM HOURS.
C FOR CALM HOURS, CONCENTRATIONS AT EACH RECEPTOR ARE
C SET EQUAL TO ZERO.
C A CALM HOUR IS AN HOUR WITH A WIND SPEED
C OF 1.00 M/S AND A WIND DIRECTION THE SAME
C AS THE PREVIOUS HOUR.
IF(IOPT(25).EQ.l.AND.QU(LH).LT.1.009.AND.ITMIN1.EQ.
*IDUMR(LH))THEN
ICALM-ICALM+1
DO 955 K=1,NRECEP
PHCHI(K)-0.0
955 CONTINUE
GO TO 971
END IF
DO 970 K-1,NRECEP
DO 960 L-1,NAVT
960 CONC(K,L)-CONC(K,L)+PHCHI(K)
970 SUM(K)=SUM(K)+PHCHI(K)
C STORE DATE FOR WHICH CONCS. HAVE BEEN CALCULATED.
971 JDAY-IDATE(2)
C SUBROUTINE RANK IS CALLED WHENEVER A COUNTER
C INDICATES THAT ENOUGH END TO END HOURLY CONCENTRATIONS
C HAVE BEEN STORED OFF TO COMPLETE AN AVG TIME.
C NP3, NP8, NP24, NPX ARE USED AS COUNTERS FOR EACH
C AVG TIME AND ARE ZEROED AFTER EACH CALL TO RANK.
C
C FOR THE DEFAULT OPTION CALCULATE AVERAGE
C CONCENTRATION FOR APPROPRIATE AVERAGING PERIOD.
C SET UP CALM FLAG FOR ENTRY INTO SUBROUTINE RANK.
C
IF(IOPT(25).EQ.O) GOTO 979
LLl-1
IF (MSFMHR(JDAY*24+LH).EQ.l) LLl-lll
CALL RANK(LLl)
LL1»1
NP3-NP3+1
IF(QU(LH).LT.1.009.AND.IDUMR(LH).EQ.ITMIN1)ICFL3-1
IF (MSFMHR(JDAY*24+LH).EQ.l) IMFL3-1
IF(NP3.NE.3) GO TO 974
C FOR 3 HOUR AVERAGING PERIOD DIVIDE SUM BY 3.0.
DO 972 LQ-1,NRECEP
972 CONC(LQ,2)-CONC(LQ,2)/3.0
LL2-2
IF(ICFL3.EQ.1)LL2=22
IF (IMFL3.EQ.1JLL2-222
CALL RANK(LL2)
NP3-0
ICFL3-0
IMFL3=0
974 NP8=NP8+1
IDIV8-IDIV8+1
IF(QU{LH).LT.1.009.AND.IDUMR(LH).EQ.ITMIN1) THEN
IDIV8=IDIV8-1
-------
END IF
IF (MSFMHR(JDAY*24+LH).EQ.l) IMFL8=1
IF(NP8.NE.8)GO TO 976
IF(IDIV8.LT.6)IDIV8-6
DIV8-IDIV8
C FOR 8 HOUR AVERAGING PERIOD DIVIDE THE SUM OF THE HOURLY
C CONCENTRATIONS BY THE NUMBER OF NON-CALM HOURS OR 6.0
C WHICHEVER IS GREATER.
DO 975 LQ-1,NRECEP
975 CONC(LQ,3)-CONC(LQ,3)/DIV8
LL3=3
IF(ICFL8.EQ.1)LL3-33
IF (IMFL8.EQ.l)LL3-333
CALL RANK(LL3)
NP8-0
IDIV8-0
ICFL8-0
IMFL8-0
976 NP24*NP24+1
IDIV24-IDIV24+1
IF(QU(LH).LT.1,009.AND.IDUMR(LH).EQ.ITMIN1)THEN
IDIV24-IDIV24-1
ICFL24=»1
END IF
IF (MSFMHR(JDAY*24+LH).EQ.l) IMFL24-1
IF(NP24.NE.24)GO TO 1011
IF(IDIV24.LT.18)IDIV24>»18
DIV24-IDIV24
C FOR 24 HOUR AVERAGING PERIOD DIVIDE THE SUM OF THE HOURLY
C CONCENTRATIONS BY THE NUMBER OF NON-CALM HOURS OR 18.
C WHICHEVER IS GREATER.
DO 977 LQ-1,NRECEP
977 CONC(LQ,4)-CONC(LQ,4)/DIV24
LL4-4
IF(ICFL24.EQ.l)LL4-44
IF (IMFL24.EQ.1) LL4=444
CALL RANK(LL4)
NP24-0
IDIV24-0
ICFL24-0
IMFL24-0
1011 ITMIN1»IDUMR(LH)
GO TO 1010
C
C WHEN DEFAULT OPTION IS NOT USED, DETERMINE ENTRY INTO
C SUBROUTINE RANK FOR APPROPRIATE AVERAGING PERIOD.
C RANKING BASED ON HIGH AVERAGING PERIOD SUM.
C
979 IF (MSFMHR(JDAY*24+LH).EQ.l) Ll-111
CALL RANK (LI)
Ll-1
NP3»NP3+1
IF (MSFMHR(JDAY*24+LH).EQ.l) L2=222
IF (NP3.NE.3) GO TO 980
CALL RANK (L2)
L2«2
NP3-0
980 IF (MSFMHR(JDAY*24+LH).EQ.l) L3=333
NP8-NP8+1
-------
CALL RANK (L3)
L3-3
NP8-0
990 IF (MSFMHR(JDAY*24+LH).EQ.l) L4=444
NP24-NP24+1
IF (NP24.NE.24) GO TO 1000
CALL RANK (L4)
L4-4
NP24=0
1000 IF (NAVT.EQ.4) GO TO 1010
IF (MSFMHR(JDAY*24+LH).EQ,1) L5-55S
NPX-NPX+1
IF (NPX.NE.NAV5) GO TO 1010
CALL RANK (L5)
L5»5
NPX=0
C
C->->->->SECTION T - END HOURLY, AVERAGING TIME, AND DAILY LOOPS.
C
1010 IF (IOPT(11).EQ.l.AND.IOPT(14).EQ.l) GO TO 1020
C IF BOTH OPTIONS 11 AND 14 CALL FOR OUTPUT DELETIONS,
C SKIP HOURLY PRINTOUT.
CALL OUTHR
1020 CONTINUE
C
C END OF HOURLY LOOP
C
IF (NS.GT.24) IDATI(2)-ISTDAY
C OUTPUT FINAL RESULTS
CALL OUTAVG
NP-NP+1
NHRS-NHRS+NAVG
C NEXT STATEMENT IS BRANCH FOR END OF RUN.
IF (NP.GE.NPER) GO TO 1050
IF (NHRS.LT.24) GO TO 1030
C
C ADDED FOR SHORELINE DISPERSION MODEL
c
DO 1021 I-1»NPT
PTEST-0.
DO 1022 J-1,24
PT1ST-PTEST+MS FMFL(I,J)
1022 CONTINUE
IF (PTEST.GT.O.) WRITE (IO,1023) (PNAME(J,I),J-l,3),IDAY,
& (MSFMFL(I,J),J-1,24)
DO 1024 J-1,24
MSFMFL(I,J)-0
1024 CONTINUE
1021 CONTINUE
1023 FORMAT (' SOURCE S3A4,1 DAY1,13,'SHORELINE FUMIGATION HOURS'
& 24(2X,I1))
C
C
C
IF (IOPT(20).EQ.O) GO TO 720
C NEXT STATEMENT CHECKS FOR END OF SEGMENTED RUN.
IF (IDAY.GE.LDRUN) GO TO 1040
GO TO 720
-------
c
1030 NB-NB+NAVG
NE*NS+NAVG
IP (NB.LE.24) GO TO 770
NB»MQD(NB,24)
NE-NB+NAVG-1
GO TO 770
C
C END OF LOOP FOR AVERAGING PERIOD.
C
C IF SEGMENTED RUN, TEMPORARILY STORE
C HIGH-FIVE INFO ON UNIT 14 FILE.
1040 WRITS (14) IDAY,SUM,NHR,DA¥1A,HR1,HMAXA,NDAY,IHR
WRITE (IO,1730) IDAY
GO TO 1140
1050 IF (IOPT(19).EQ.l) GO TO 1140
C
C->->->->SECTION U - WRITE AVERAGE CONG. AND HIGH-FIVE TABLES.
C
C IF OPTION If - 0, WRITE AVERAGE CONCENTRATION.
C FOR LENGTH OF RECORD AND HIGH-FIVE TABLE.
DO 1060 J-l.NRECEP
STAR(1,J)-BLNK
STAR(2,J)-BLNK
1060 CONTINUE
WRITE (IO,1400)(MODEL(K,MUOR)»K»1,2)» LINE1»LINE2,LINE3
HR2-NE
C FOR DEFAULT OPTION CALCULATE AND REPORT THE
C NUMBER OF CALMS FOR AVERAGING PERIOD.
IF(IQPT(25).EQ.1)THEN
NHR-NHR-ICALM
WRITE{6»1061)ICALM
END IF
SUM(1)-SUM(1)/NHR
HIMAX-SUM(l)
KMX-1
C INITIALIZE PERIODIC CONC TO BEGIN RANKING FOR PERIODIC MAX
DO 1070 K-2,NRECEP
SUM(K)-SUM(K)/NHR
IF (SUM(K).LE.HIMAX) GO TO 1070
KMX=K
HIMAX-SUM(K)
1070 CONTINUE
STAR(1,KMX)-STR
C FIND HIGHEST AVERAGE CONC. AMONG RECEPTORS.
WRITE (IO,1740) DAY1A,HR1,DAY2,HR2
DO 1080 K-1,NRECEP
1080 WRITE (IO,1750) K,(RNAM1(J,K),J-l,2),RREC(K),SREC(K),ZR(K)»ELR(K),
1STAR(1,K),SUM(K)
STAR{1,KMX)-BLNK
C LOOP TO WRITE HIGH-FIVE TABLE FOR 4 OR 5 AVG TIMES.
DO 1130 L-1,NAVT
C ASTERISKS DEPICT RECEPTORS WITH HIGHEST AND
C SECOND HIGHEST CONCENTRATIONS.
Kl=l
K2-1
HI1-HMAXA(1,1,L)
HI2-HMAXA(2,lfL)
DO 1100 K=5
-------
HI1=HMAXA(1,K,L)
KlaK
1090 IF (HMAXA(2,K,L).LE.HI2) GO TO 1100
HI2=HMAXA(2,K,L)
K2=K
1100 CONTINUE
STAR(1,K1)-STR
STAR(2,K2)»STR
IF((IOPT(25).EQ.l.AND.L.EQ.l).OR.(IOPT(25).NE.l))THEN
WRITE (10,1760) NTIME(L),TITLE(IP),(1,1-1,5)
END IF
IF(IOPT(25).EQ.1.AND.L.NE.1)THEN
WRITE (10,1761) NTIME(L),TITLE(IP),(1,1-1,5)
END IF
2DUM=ATIME(L)
DO 1120 K»1,NRECEP
C SET CALM FLAG FOR PRINTING.
C RESET HOUR VARIABLE FOR CALM HOURS.
IF(IOPT(25).EQ.1)THEN
DO 1112 J*l,5
IF(IHR(J,K,L).GT.24)THEN
IHR(J,K,L)-*IHR(J,K,L)-100
CF(J)»C
END IF
1112 CONTINUE
END IF
DO 10000 J=*l,5
CF(J)-BLNK
IF (IHR(J,K,L) .GT.124) THEN
IHR(J,K,L)-IHR(J,K,L)-200
CF(J)-FUME
ENDIF
10000 CONTINUE
IF(IOPT(25).EQ.1)GO TO 1111
C CALCULATE AVERAGE CONCENTRATIONS WHEN
C DEFAULT OPTION IS NOT ON.
DO 1110 J=l,5
1110 HMAXA(J,K,L)=HMAXA(J,K,L)/ZDUM
1111 WRITE (10,1770) K,RREC(K),SREC(K),(STAR(J,K),HMAXA(J,K,L),CF(J),
1NDAY(J,K,L),IHR(J,K,L),J-1,2),(HMAXA(J,K,L),CF(J),NDAY(J,K,L),
2IHR(JfKfL),J=3,5)
1120 CONTINUE
C INITIALIZE ASTERISK STORAGE TO BLANKS.
STAR(1,K1)=BLNK
STAR(2,K2)=BLNK
1130 CONTINUE
C
C->->->->SECTION V - CLOSE OUT FILES.
C
1140 IF (IOPT(21).EQ.O) GO TO 1150
END FILE 10
C END FILE 10
1150 IF (IOPT(22).EQ.O) GO TO 1160
END FILE 12
C END FILE 12
1160 IF (IOPT(23).EQ.O) GO TO 1170
END FILE 13
C END FILE 13
C CALL WAUDIT
-------
:->->->->SECTION X - OUTLINE OF PROGRAM SECTIONS
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c->-
c
c***
c
c***
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c***
c
r-
SECTION A -
SECTION B -
SECTION C -
SECTION D -
SECTION E -
SECTION F -
SECTION G -
SECTION H -
SECTION I -
SECTION J -
SECTION K -
SECTION L -
SECTION M -
SECTION M -
SECTION 0 -
SECTION P -
SECTION Q -
SECTION R -
SECTION S -
SECTION T -
SECTION U -
SECTION V -
SECTION W -
SECTION X -
SECTION Y -
SECTION Z -
GENERAL REMARKS
DATA INPUT LISTS.
COMMON, DIMENSION, AND DATA STATEMENTS.
FLOW DIAGRAM.
RUN SET-UP AND READ FIRST 6 INPUT CARDS.
INPUT AND PROCESS EMISSION INFORMATION.
RANK SIGNIFICANT SOURCES.
EMISSIONS WITH HEIGHT TABLE.
EXECUTE FOR INPUT OF SIGNIFICANT SOURCE NUMBERS.
CHECK MET. DATA IF FROM FILE OF ONE YEARS'S DATA,
GENERATE POLAR COORDINATE RECEPTORS.
READ POLAR COORDINATE ELEVATIONS.
READ AND PROCESS RECEPTOR INFORMATION.
POSITION FILES AS REQUIRED.
START LOOPS FOR DAY AND AVERAGING TIME; READ
MET. DATA.
CALCULATE AND WRITE MET. SUMMARY INFORMATION.
INITIALIZE FOR HOURLY LOOP.
BEGIN HOURLY LOOP.
CALCULATE AND STORE FOR HIGH-FIVE TABLE.
END HOURLY, AVERAGING TIME, AND DAILY LOOPS.
WRITE AVERAGE CONC. AND HIGH-FIVE TABLES.
CLOSE OUT FILES.
FORMAT STATEMENTS.
OUTLINE OF PROGRAM SECTIONS.
INPUT AND OUTPUT PILE DESCRIPTIONS.
INDEX AND GLOSSARY.
•>-> SECTION Y - INPUT AND OUTPUT FILE DESCRIPTIONS.
INPUT AND OUTPUT FILS DESCRIPTIONS.
INPUT FILE (UNIT 11) METEOROLOGICAL DATA (USED IF IOPT(5)=0)
RECORD 1
ID
IYEAR
IDM
IYR
SFC STATION IDENTIFIER, 5 DIGITS
YEAR OF SURFACE DATA, 2 DIGITS
MIX HT STATION IDENTIFIES, 5 DIGITS
YEAR OF MIX HT DATA, 2 DIGITS
RECORD TYPE 2 (ONE FOR EACH DAY OF YEAR)
JYR
IMO
DAY1
IKST(24)
QU(24)
QTEMP(24)
DUMR(24)
QTHITA(24)
HLH(2,24)
YEAR
MONTH
JULIAN DAY
STABILITY CLASS
WIND SPEED, METERS PER SECOND
AMBIENT AIR TEMPERATURE, KELVIN
FLOW VECTOR TO 10 DEC, DEGREES AZIMUTH
RANDOMIZED FLOW VECTOR, DEGREES AZIMUTH
MIXING HEIGHT, METERS
INPUT FILE (UNIT 15) EMISSION DATA (USED IF IOPT(6)=1)
-------
c
c
c
c
c
c
c***
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c***
c
c
c
c
c
c
c .
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
r>
*«
c***
c
c
c
c
c
c
c
c
c
c
c
IDATP DAT1-TIME INDICATOR CONSISTING OF YEAR, JULIAN DAY,
AND HOUR: YYDDDHH.
SOURCE(IPOL,I),1-1,NPT EMISSION RATE FOR THE POLLUTANT IPOL
FOR EACH SOURCE, GRAMS PER SECOND.
OUTPUT PUNCHED CARDS (UNIT 1) AVERAGE CONCENTRATIONS (PUNCHED IF
IOPT(24)-1)
CARD TYPE 1 (ONE FOR EACH RECEPTOR FOR EACH AVERAGING TIME)
CC:l-4 WORD'CNTL1 PUNCHED
CC:5 BLANK
CC:6-15 RREC EAST COORDINATE OF RECEPTOR, USER UNITS
CC:16-25 SREC NORTH COORDINATE OF RECEPTOR, USER UNITS
CC:26-35 GWU CONCENTRATION FOR AVERAGING TIME, MICROG/M**3
CC:36-55 BLANK
CC:56-59 K RECEPTOR NUMBER
CC:60-69 2R RECEPTOR HEIGHT ABOVE GROUND, METERS
CC:70-79 ELR RECEPTOR GROUND-LEVEL ELEVATION, USER HT UNITS
OUTPUT FILE (UNIT 10) PARTIAL CONCENTRATIONS (USED IF IOPT(2!)«*!)
RECORD TYPE 1
NPER NUMBER OF PERIODS
NAVG NUMBER OF HOURS IN AVERAGING PERIOD.
LINE1(14) 80 ALPHANUMERIC CHARACTERS FOR TITLE.
LINE2(14) 80 ALPHANUMERIC CHARACTERS FOR TITLE.
LINE3(14) 80 ALPHANUMERIC CHARACTERS FOR TITLE.
RECORD TYPE 2 (FROM MPTER) (ONE FOR EACH AVERAGING PERIOD)
NRSCEP NUMBER OF RECEPTORS
NPT NUMBER OF SOURCES
RREC(I),I-1,NRECEP EAST COORDINATE OF RECEPTOR, USER UNITS
SREC(I),I-1,NRECEP NORTH COORDINATE OF RECEPTOR, USER UNITS
RECORD TYPE 3 (ONE FOR EACH RECEPTOR FOR EACH SIMULATED HOUR,
FROM PTR)
IDATE YEAR AND JULIAN DAY
LH HOUR
K RECEPTOR NUMBER
PARTC(J),J-1,NPT CONCENTRATION AT RECEPTOR K FROM SOURCE J,
G/M**3.
OUTPUT FILE (UNIT 12) HOURLY CONCENTRATIONS (USED IF IOPT(22)=1)
RECORD 1
NPER
NAVG
LINE1(14)
LINE2(14)
LINE3(14)
RECORD 2
NUMBER OF PERIODS
NUMBER OF HOURS IN AVERAGING PERIOD.
80 ALPHANUMERIC CHARACTERS FOR TITLE.
80 ALPHANUMERIC CHARACTERS FOR TITLE.
80 ALPHANUMERIC CHARACTERS FOR TITLE.
-------
C RREC(I),1-1,NRECEP EAST COORDINATE OF RECEPTOR, USER UNITS
C SREC(I),I»1,NRECEP NORTH COORDINATE OF RECEPTOR, USER UNITS
C
C RECORD TYPE 3 (ONE FOR EACH SIMULATED HOUR)
C
C IDATE(2) JULIAN DAY
C LH HOUR
C PHCHI(I),1=1,NRECEP HOURLY CONCENTRATION FOR EACH RECEPTOR,
C G/M**3.
C
C*** OUTPUT FILE (UNIT 13) AVERAGING-PERIOD CONCENTRATIONS (USED IF
C IOPT(23)-1)
C
C RECORD 1
C
C NPER NUMBER OF PERIODS
C NAVG NUMBER OF HOURS IN AVERAGING PERIOD.
C LINE1(14) 80 ALPHANUMERIC CHARACTERS FOR TITLE.
C LINE2(14) 80 ALPHANUMERIC CHARACTERS FOR TITLE.
C LINE3(14) 80 ALPHANUMERIC CHARACTERS FOR TITLE.
C
C RECORD 2
C
C NRECEP NUMBER OF RECEPTORS.
C RREC(I),1*1,NRECEP EAST COORDINATE OF RECEPTOR, USER UNITS
C SREC(I),1-1,NRECEP NORTH COORDINATE OF RECEPTOR, USER UNITS
C
C RECORD TYPE 3 (ONE FOR EACH SIMULATED AVERAGING PERIOD)
C
C IDATE(2) JULIAN DAY
C NB ENDING HOUR OF PERIOD
C PCHI(K),K=1,NRECEP AVERAGING PERIOD CONCENTRATION FOR EACH
C RECEPTOR, G/M**3.
C
C*** TEMPORARY FILE (UNIT 14) VALUES FOR HIGH-FIVE TABLES (USED IF
C IOPT(20)»1)
C
C ONLY RECORD
C
C NDAY(ON WRITE) NUMBER OF DAYS PROCESSED
C IDAYS(ON READ NUMBER OF DAYS PREVIOUSLY PROCESSED
C SUM(180) CUMULATION OF LONG-TERM CONCENTRATION,(G/M**3
C NHR NUMBER OF HOURS PROCESSED
C DAY1A JULIAN DAY OF START OF LENGTH OF RECORD.
C HR1 START HOUR OF LENGTH OF RECORD
C HMAXA(3,5,180,5) HIGHEST FIVE CONCENTRATIONS (G/M**3), AND
C ASSOCIATED DAY AND HOUR, FOR EACH RECEPTOR,
C FOR FIVE DIFFERENT AVERAGING TIMES.
C
C->->->->SECTION W - FORMAT STATEMENTS.
C
C INPUT FORMATS
C
1061 FORMAT(5X,T98,'# CALMS FOR PERIOD: ',14)
1180 FORMAT (20A4/20A4/20A4)
1200 FORMAT (A4)
1210 FORMAT (3A4,8F8.2,F4.0)
1220 FORMAT (2613)
1230 FORMAT (12.SX.5F1n.n\
-------
c
C ERROR STATEMENT FORMATS
C
1250 FORMAT (IX,1 NSIGP (THE NO. OF SIGNF POINT SOURCES) WAS FOUND1,1 T
10 EXCEED THE LIMIT (25). USER TRIED TO INPUT ',13,' SOURCES1/'
2 *********EXECUTION TERMINATED**********1)
1260 FORMAT (1HO,'CONTER VALUE IS OUTSIDE OF RANGE: «,'ZERO TO ONE. EXE
1CUTION TERMINATED.')
1270 FORMAT (' USER TRIED TO INPUT MORE THAN '*I4,' POINT SOURCES. THIS
1 GOES BEYOND THE CURRENT PROGRAM DIMENSIONS,1)
1280 FORMAT (IX,«NPT - ',I3,*I.E., EQUAL OR LESS THAN ZERO'/1 RUN TERM
1INATED- CHECK INPUT DATA1)
1290 FORMAT (1H1,'***ERROR USER TRIED TO SPECIFY ',14,' SIGNIFICANT S
10URC1S, BUT IS ONLY ALLOWING ',13,' TOTAL SIGNIFICANT SOURCES IN T
2HIS RUN.',/2X,'***RUN TERMINATED-CHECK INPUT DATA]***1)
1300 FORMAT (' (MPS) THE INPUT SIGNIFICANT SOURCE NUMBER ','WAS FOUND T
10 EQUAL ZERO -"USER CHECK INPUT DATA.1)
1310 FORMAT (' SURFACE DATA IDENTIFIERS READ INTO MODEL (STATION-1,15,'
1 ,YEAR"'f12,•) DO NOT AGREE WITH THE PREPROCESSOR OUTPUT FILE1,/IX
2,' (STATION*1,15,' ,YEAR*',12)
1320 FORMAT (' MIXING HEIGHT IDENTIFIERS READ INTO MODEL (STATION-1,15,
I1 ,YtAR=',I2,') DO NOT AGREE WITH THE PREPROCESSOR OUTPUT FILE',/1
2X,' (STATION-*f15,' ,YEAR-',12)
1330 FORMAT (1HO,' WRONG RECEPTOR ELEVATION CARD READ.','READ CARD FOR
1AZIMUTH ',13, ' SHOULD HAVE BEEN »,13, ' . ')
1340 FORMAT (IX,'****USER EITHER TRIED TO INPUT MORE THAN 180 «,'RECEPT
1ORS OR ENDREC WAS NOT PLACED AFTER THE LAST RECEPTOR ','CARD****'/
2•********EXSCUTION TERMINATED*******')
1350 FORMAT (IX,'NO RECEPTORS HAVE BEEN CHOSEN1)
1360 FORMAT (1HO,'***DAYS DO NOT MATCH, IDAY - ',14,', IDAYS - ',14)
1370 FORMAT (' DATE ON MET. TAPE, ',12,13,' ,DOES NOT MATCH INTERNAL DA
ITS, ',12,13)
1380 FORMAT (' HOUR ',13,« IS NOT PERMITTED. HOURS MUST BE DEFINED BETW
1EEM 1 AND 24«)
1390 FORMAT (' DATE BEING PROCESSED IS- ',I8/1X,'DATE OF HOURLY POINT E
1MISSION RECORD IS -',I8/1X,'***PLEASE CHECK EMISSION RECORDS***1)
C
C OUTPUT FORMATS
C
1395 FORMAT ('0',T35,A4,A1,IX,"SDM - VERSION 88204'/1X,20A4/1X,20A4/
*1X,20A4)
1400 FORMAT ('1',T40,A4,A1,IX,'SDM - VERSION 88204'/1X,20A4/1X,20A4/
*1X,20A4)
1410 FORMAT (1HO,T30,'GENERAL INPUT INFORMATION'//2X,'THIS RUN OF SDM
1-VERSION 88204 IS FOR ','THE POLLUTANT ',A4,' FOR ',13,IX,13,'-HOU
2R PERIODS.»/2X,'CONCENTRATION ESTIMATES BEGIN ON HOUR-',12,', JULI
3AN DAY-',13,', YEAR-19',12,'.'/1X,' A FACTOR OF ',F14.7,' HAS BEEN
4 SPECIFIED TO ','CONVERT USER LENGTH UNITS TO KILOMETERS.'/IX,I3,'
5 SIGNIFICANT SOURCES ARE TO BE CONSIDERED.')
1420 FORMAT (1H ,'THIS RUN WILL NOT CONSIDER ANY POLLUTANT LOSS.')
1430 FORMAT (1H ,2X,'A HALF-LIFE OF «,F10.2,' (SECONDS) HAS BEEN ASSUME
ID BY THE USSR.')
1440 FORMAT (IX,' HIGH-FIVE SUMMARY CONCENTRATION TABLES ','WILL BE OUT
1PUT FOR ',13,' AVERAGING PERIODS.1/1 AVG TIMES ','OF 1,3,8, AND 2
24 HOURS ARE AUTOMATICALLY DISPLAYED.1)
1450 FORMAT (1H ,2X,'A FACTOR OF ',F14.7,' HAS BEEN SPECIFIED TO CONVER
IT USER HEIGHT UNITS TO METERS.')
1460 FORMAT (1HO,T3,'OPTION ',T16,'OPTION LIST',T46,'OPTION SPECIFICAT
1ION S 0- IGNORE OPTION'/IX.T68,' 1» USE OPTION'/T25.'TECHNICAL OPT
-------
30T INCLUDE STACK DOWNWASH CALCULATIONS',T70,11/1X,T7,I2,T16, ' DO NO
4T INCLUDE GRADUAL PLUME RISE CALCULATIONS',T70,II/IX,T7,12,T16,'CA
5LCULATE INITIAL PLUME SIZE1,T70,II/IX,T25,'INPUT OPTIONS'/IX,T7,12
6,T16,'READ MET DATA FROM CARDS',T70,I1/IX,T7,12,T16,'READ HOURLY E
7MISSIONS1,T70,I1/1X,T7,I2,T16,'SPECIFY SIGNIFICANT SOURCES',T70fII
8/lX,T7,I2,T16,'READ RADIAL DISTANCES TO GENERATE RECEPTOR',T70,I1
9/T25,'PRINTED OUTPUT OPTIONS'/IX,T7,12,T16,'DELETE EMISSIONS WITH
AHEIGHT TABLE',T70,I1/1X,T7,12,T16,'DELETE MET DATA SUMMARY FOR AVG
B PERIOD',T70,I1/1X,T7,12,T16,'DELETE HOURLY CONTRIBUTIONS',T70,11/
C1X, T7 ,12, T16, ' DELETE MET DATA ON HOURLY CONTRIBUTIONS' , T7 0 ,11/ IX, T
D7,12,T16,'DELETE FINAL PLUME RISE CALC ON HRLY CONTRIBUTIONS',T70,
Ell)
1470 FORMAT (IX,T7,12,T16,'DELETE HOURLY SUMMARY',T70,I1/1X,T7,12,T16,'
1DELETE MET DATA ON HRLY SUMMARY',T70,I1/1X,T7,12,T16,'DELETE FINAL
2 PLUME RISE CALC ON HRLY SUMMARY1 ,T70,I1/1X,T7,12,T16,'DELETE AVG-
3PERIOD CONTRIBUTIONS',T70,I1/1X,T7,12,T16,'DELETE AVERAGING PERIOD
4 SUMMARY'.-f70,H/1X,T7,12,T16,'DELETE AVG CONCENTRATIONS AND HI-5
STABLES I,T"'0,I1/T25,'OTHER CONTROL AND OUTPUT OPTIONS'/1X»T7,12,T16
6,'RUN IS PART OF A SEGMENTED RUN',T70rIl/lX,T7f12,T16,'WRITE PARTI
7AL CONC TO DISK OR TAPE1 ,T70,11/1X,T7,12,T16, 'WRITE HOURLY CONC TO
8 DISK OR TAPE1,T70,11/1X,T7,12,T16, 'WRITE AVG-PERIOD CONC TO DISK
90R TAPE»,T70,II/IX,T7,12,T16,'PUNCH AVG-PERIOD CONC ONTO CARDS',T7
AO,I1/T25,'DEFAULT OPTION 5/lX,T7,I2,T16,
B'USE DEFAULT OPTION'rT70,11}
1480 FORMAT (1HO,2X,'ANEMOMETER HEIGHT- ',F10.2/3X,'WIND PROFILE WITH '
1,'HEIGHT EXPONENTS CORRESPONDING TO STABILITY ARE AS FOLLOWS:»/8X,
2'FOR STABILITY As ',F4.2/12X,'STABILITY B: ',F4.2/12X,'STABILITY C
3: ',F4.2,/12X,'STABILITY D: ',F4.2,/12X,'STABILITY E: SF4.2/12X,1
4STABILITY Pi «,F4.2)
1490 FORMAT (1HO,'ANEMOMETER HEIGHT IS." « ,F10.2/IX,'EXPONENTS FOR POWER-
1 LAW WIND INCREASE WITH HEIGHT ARE:',F4.2,5(',»,F4.2)/' TERRAIN AD
2JUSTMENTS ARE: ',F5.3,5(',',F5.3)//)
1500 FORMAT ('1',T40,'POINT SOURCE INFORMATION'//1X,T5,'SOURCE',T23, f EA
1ST',T31,'NORTH',T3 9,'SO2(G/SEC) PART(G/SEC) STACK STACK STACK
2 STACK1,3X,'PCTEN. IMPACT1,2X,'EFF',3X»'GRD-LVL BUOY FLUX'/1X,T2
33,'COORD',T31,'COORDS' EMISSIONS EMISSIONS HT(M) TEMP(K) D
4IAM(M) S'V1L(M/SEC) (MICRO G/M**3) HT(M) ', 3X, 'ILEV', 6X, 'F'/1X,T24 , '
5(USER UNITS)»,T116,'USER HT M**4/S**3'/1X,T117,'UNITS'/)
1510 FORMAT (IX,13,IX,3A4,IX,2F9.2,2F12.2,4F8.2,6PF13.2,OPF9.2,2F9 . 2)
1520 FORMAT ('0',T3, 'SIGNIFICANT ',A4,' POINT SOURCES '// IX, T8, 'RANKS T2
12,'CHI-MAXST33,'SOURCE NO.'/1X,T17,'(MICROGRAMS/M**3)'/1X)
1530 FORMAT (1X,T9,I3,T18,6PF12.2,T35S13)
1540- FORMAT (IX,'H1IGHT ABOVE 100M FOR POINT SOURCE',14,3X, ' HEIGHT-SF
16.2,' (METERS)',» EMISSIONS-',F10.2,' (G/SEC)1)
1550 FORMAT ('0«,4X,'TOTAL SA4,1 EMISSION AND CUMULATIVE FRACTION ACCO
1RDING TO HEIGHT'//IX,T12,'TOTAL POINT CUMULATIVE '/1X,'HEIGHT(M)
2 EMISSIONS(G/S) FRACTION1/IX)
1560 FORMAT (1X,T2,I2,' -',I3,T11,F8.2,T26,F7.3,T41,F8.2,T56,F7.3)
1570 FORMAT ('0',T2,'TOTAL',2X,F10.2)
1580 FORMAT (1HO,2IX,'ADDITIONAL INFORMATION ON SOURCES.')
1590 FORMAT (1HO,• USER SPECIFIED ',13,' (NPT) SIGNIFICANT POINT S'SO
1URCES AS LISTED BY POINT SOURCE NUMBER:'/2X,2515)
1600 FORMAT ('O1,2X,'EMISSION INFORMATION FOR ',14,' (NPT) POINT SOUR1,
1'CES HAS BEEN INPUT'/2X,12,' SIGNIFICANT POINT SOURCES(NSIGP) S 'A
2RE TO BI',1 USED FOR THIS RUN'/2X,'THE ORDER OF SIGNIFICANCE (IMPS)
3 FOR 25 OR LESS POINT SOURCES USED IN THIS RUN AS LISTED BY POINT
4SOURCE NUMBER:'/2X,2515)
1610 FORMAT (2X,'SURFACE MET DATA FROM STATION(ISFCD) ',16,', YEAR(ISFC
1YR) 19',I2/2X,'MIXING HEIGHT DATA FROM STATION(IMXD) SI6,S YEAR(
-------
1620 FORMAT (1HO,T21,'RECEPTOR INFORMATION')
1630 FORMAT (1HO,' SDM INTERNALLY GENERATES 36 RECEPTORS ','ON A CIRCLE
1 CORRESPONDING TO EACH NON-ZERO ','RADIAL DISTANCE FROM A CENTER?
20INT '/IX,T10,'COORDINATES ARE (USER UNITS): (',F8.3,', ',F8.3,') '
3/IX,T10,'RADIAL DISTANCE(S) USER SPECIFIED (USER UNITS): ',5(F11.3
4,' '))
1640 FORMAT (F4.1)
1650 FORMAT ('0',' RECEPTOR IDENTIFICATION EAST NORTH RECEP
1TOR HT RECEPTOR GROUND LEVEL'/1X,T30,'COORD1,T39,'COORD ABV L
20CAL GRD LVL ELEVATION'/IX,T31,'(USER UNITS) (METER
3S) (USER HT UNITS)'/1X)
1660 FORMAT (IX,T3,13,2A1,8X,2A4,F13.3,F10.3,F10.1,F20.1)
1670 FORMAT (1HO,T3,«* ONE ASTERISK INDICATES THAT THE ASSOCIATED ','RE
ICEPTOR(S) HAVE A GROUND LEVEL ELEVATION LOWER ','THAN THE LOWEST S
2OURCE BASE ELEVATION.1/1 CAUTION SHOULD ','BE USED IN INTERPRETING
3 CONCENTRATIONS FOR THESE RECEPTORS.1/' ** TWO ASTERISKS ','INDIC
4ATE THAT THE ASSOCIATED RECEPTOR(S) HAVE GROUND LEVEL ','ELEVATION
5S ABOVE THE LOWEST STACK TOP.'/' CONSEQUENTLY',1 NO CALCULATION
6S WILL BE PERFORMED WITH THIS RECEPTOR.A ','SERIES OF ASTERISKS WI
7LL INSTEAD APPEAR IN THE OUTPUT.')
1680 FORMAT (//1X,' THE NUMBER OF DAYS PREVIOUSLY COMPLETED EQUAL ',
113,' AND THE LAST . DAY TO BE COMPLETED IN THIS RUN IS ',13)
1690 FORMAT ('1INPUT MET DATA ',12,'/',I4/1X,T2,'HOUR THETA SPEED
1 MIXING TEMP STABILITY'/IX,T9,'(DEG) (M/S) HEIGHT(M) (
2DEG-K) CLASS'/IX)
1700 FORMAT (1X,T3,12,4F9.2,6X,II)
1710 FORMAT ('0','RESULTANT MET CONDITIONS'/IX)
1720 FORMAT (2X,'WIND DIRECTION-',F7.2,T36,'RESULTANT WIND SPEED=',F7.2
1/2X,'AVERAGE WIND SPEED"',F7.2,T36,'AVERAGE TEMP-',F7.2/2X,'WIND P
2ERSISTENCE-',F6.3,T36,'MODAL STABILITY"',12)
1730 FORMAT (1HO,' THIS SEGMENT OF A SEGMENTED RUN HAS COMPLETED',15,'
l(IDAY) DAYS.')
1740 FORMAT ('0',T9,' RECEPTORS'//IX,'RECEPTOR IDENTIFICATION
1EAST NORTH RECEPTOR HT RECEPTOR GROUND LEVEL1,T99,'AVG
2 CONG FOR PERIOD'/IX,T30,'COORD',T39,'COORD ABV LOCAL GRD LVL
3 ELEVATION1,T94,'DAY',F4.0,'HR',F3.0,' TO DAY',F4.0,'HR',F3.0/1X
4,T31,'(USER UNITS) (METERS) (USER HT UNITS) ',T100, '
5(MICROGRAMS/M**3)'/1X)
1750 FORMAT (IX,T3,13,10X,2A4,5X,F8.2,2X,F8.2,F10.1,F20.1,T110,Al,6PF7.
12)
1760 FORMAT (1H1,T29,"FIVE HIGHEST ',12,'-HOUR f,A4,' CONCENTRATIONS((E
1NDING ON JULIAN DAY, HOUR)'/1X,T55,'(MICROGRAMS/M**3)'//2X,'RECEPT
20R ',T38,4(I1,20X),I1,/1X)
1761 FORMAT (1H1,T29,»FIVE HIGHEST •,12,'-HOUR ',A4,' CONCENTRATIONS((E
1NDING ON JULIAN DAY, HOUR)'/1X,T55,'(MICROGRAMS/M**3)'/
21X,T36,'C-FLAG IDENTIFIES CONCENTRATIONS AFFECTED BY CALM HOURS'//
32X,'RECEPTOR ',T38,4(II,20X),11,/1X)
1770 FORMAT (1H ,2X,I3,'(',F7.2,',',F7.2,')',2(IX,Al,6PF9.2,A1,IX,'(',1
13,',',I2,')'),
2531 FORMAT(F5.1)
2532 FORMAT(F5.2)
2533 FORMAT(F5.3)
C
END
C
BLOCK DATA
C BLOCK DATA (VERSION 79365), PART OF MPTER.
COMMON /EXPOS/ PXUCOF ( 6 . 9 ^ . PXUEXP (fi . 9 \ . HC1 M O ^ . RYTTCfiP r f. o \ RVTTT?vii
-------
C***COEFFICIENTS GENERATED WITH RURAL SIGMAS USING PGYZ
C*** IH-9 FOR H GREATER THAN 500 METERS.
DATA PXUCOF /.10401E+00,.121331+00,.142731+00,.15351E+00,.18855E+0
10, .18668E+00, .775331-01,.117281+00, .141201+00, .18239E+00, .20458E+0
20, .343261+00, .672281-01, . 1Q013S+00, .13963E+00, .191621+00, .38998E-I-0
30, .762711+00, .40484E-01,.753081-01, .137841+00, .543571+00, .725501+0
40f .229361+01, .28539E-01, . 669361-01, .136151+00, .52790E+00, .12908E+0
51,.56943E+Q1,.147921-01,.65799E-01,.13315E+00,.748321+00,.28818E+0
61,.40940E+03,.12403E-01,.643211-01,.129271+00,.10826E+01,.77020E+0
72,.23011E+05,.12340E-01,,628741-01,.12546E+00,.155801+01,.68810E+0
83,.46522E+06,.12245E-01,.60615S-01,.11952E+00,.225171+01,.42842E+0
93,.OOOOOE+00/
DATA PXUEXP /-.19460E+01,-.197741+01,-.20086E+01,-.20742E+01,-.213
122E+01,-.221761+01,-.184791+01,-,196611+01,-.20050E+01,-.21317E*01
2,-.22094E+01,-.24209E+01,-.18060E+01,-.19196E+01,-.20017E+01,-,214
362E+01,-. 239911+01 (-.26556E+01,-. 16763E+01,-. 18468E+01, -.1998414-01
4,-.24128E+01,-.2S§78E+01f-.29371E+01,-.1594QE+01,-.18191E+01,-,199
555E+01,-.240591+01,-.26934E+01,-.31511E+01,-.14513E+01,-.18153E+01
6,-.19907E+01,-.24317E+01,-.28678E+01,-.40795E+01,-.14181E+01,-»181
711£+01f-.19851E+Ql,-,25514E+01,-.34879E+Ql,-.48399E+Gl,-.141721+01
8,-.180711+01,-.197991+01,-.261521+01r-«38719E+01,-.526701+01, -.141
9601+01,-.18012E+01,-.19721E+01,-.26744E+01,-.37956E+01,-.17020E+02
V
C***COEFFICIENTS GENUERATED WITH URBAN SIGMAS USING BRSYSZ & BRSZ
C*** FROM RAM MODEL.
C***RELATIVE CONCENTRATIONS NORMALIZED FOR WIND SPE1D FROM POINT
G*** SOURCE, CHI*U/Q, -BXUCOF(KST,IH)*H**BXU1XP(KST,IH)
IH-1 FOR H LESS THAN 20 METERS.
IH-2 FOR H FROM 20 TO 30 METERS.
IH-3 FOR H FROM 30 TO 50 MITERS.
IH-4 FOR H FROM SO TO 70 MITERS.
IH*5 FOR H FROM 70 TO 100 METIRS.
IH*6 FOR H FROM 100 TO 200 METERS.
7 FOR H FROM 200 TO 300 METERS.
.C***
c***
c***
c***
c***
c***
c***
c***
c***
c
IH"
IH=8 FOR H FROM 300 TO 500 METERS.
IH-9 FOR H GREATER THAN 500 METERS.
DATA BXUCOF /.16808E+00,.16808E+00,.20927E+00,.203781+00,.18861E+0
10,.18861E+QO,.15945E+00,.159451+00,.20527E+00,.20229E+00,.21253E+0
20,.21253E+00,.14777E+00,.147771+00,.198711+00,.200111+00,.248881+0
30,.248881+00,.13262E+00,.13262E+00,.189081+00,.196851+00,.300411+0
40,.300411+00,.11745E+00,.11745E+00,.17767E+00,.19301E+00,.34521E+0
50,.34521E+00,.91943E-01,.91943E-01,.15327E+00,.18499E+00,.34368E+0
60,.34368E+00,.65533E-01,.655331-01,.119841+00,.174451+00,.23640E+0
70,.23640E+00,.47345E-01,.473451-01,.898211-01,.16720E+00,.15537E+0
80,.15537E+00,.29993E-01,.299931-01, .561001-01,.167471+00,.110091+0
90,.11009E+00/
DATA BXUEXP /-.197221+01,-.197221+01,-.19896E+01,-.199651+01,-.206.
149E+01,-. 206491+01, -. 195461+01, -„ 195461+01,-., 19831E+01, -. 19940E+01
2,-.21047E+01,-.210471+01,-.19322E+01,-.193221+01,-.197361+01,-.199
3081+01,-.21512E+01,-.21512E+01,-.190451+01,-.19045E+01,-.196091+01
4,-.198671+01,-.219931+01,-.219931+01,-.187591+01,-.187591+01,-.194
5621+01,-.198201+01,-.223201+01,-.223201+01,-.182281+01,-.182281+01
6l-.19142E+01,-.19728E+01,-,22310E+01f-.223101+01,-.17589E+01,-. 175
7891+01,-.18677E+01,-.196171+01,-.216041+01,-.21604E+01,-.170191+01
8,-.170191+01,-.181721+01,-.195431+01,-.208681+01,-.20868S+01,-. 162
9841+01,-.162841+01,-.174141+01,-.195451+01,-.203141+01,-.20314E+01
A/
DATA HC1 710--2n. **n *n in inn
-------
END
C
BLOCK DATA ONE
C
COMMON /MO/ QTHETA(24),QU(24),IKST(24),QHL(24),QTEMP(24),MPS(25),N
1SIGP,IO,LINE1(20),LINE2(20),LINE3(2Q),RNAME(2,180),IRANK(180),STAR
2(5,180)
C
DATA STAR /900*1 «/
C
END
C
C
FUNCTION ANGARC (DELM,DELN)
C FUNCTION ANGARC (VERSION 79365), PART OF MPTER.
C DETERMINES APPROPRIATE ANGLE OF TAN(ANG) » DELM/DELN
C WHICH IS REQUIRED FOR CALCULATION OF RESULTANT WIND DIRECTION.
C DELM IS THE AVERAGE WIND COMPONENT IN THE EAST DIRECTION.
C DELN IS THE AVERAGE WIND COMPONENT IN THE NORTH DIRECTION.
C NO COMMON REQUIREMENT, NO ARRAYS, USES LIBRARY FUNCTION ATAN
IF (DELN) 10,40,80
10 IF (DELM) 20,30,20
20 ANGARC=57.29578*ATAN(DELM/DELN)+180.
RETURN
30 ANGARC*180.
RETURN
40 IF (DSLM) 50,60,70
50 ANGARC»270.
RETURN
60 ANGARO-0.
C ANGARC-0. INDICATES INDETERMINATE ANGLE
RETURN
70 ANGARC-090.
RETURN
80 IF (DELM) 90,100,110
90 ANGARC=57.29578*ATAN(DELM/DELN)+360.
RETURN
100 ANGARC-360.
RETURN
110 ANGARC-57.29578*ATAN(DELM/DELN)
RETURN
C
END
SUBROUTINE PTR(IDAY,PNAME)
C SUBROUTINE PTR (VERSION 81350), PART OF MPTER.
C THE PURPOSE OF THIS ROUTINE IS TO CALCULATE CONCENTRATIONS FROM
C POINT SOURCES.
C
C->->->~>SECTION PTR.A - COMMON AND DIMENSION.
C
COMMON /MPOR/ IOPT(25)
COMMON /MPO/ NRECEP,NAVG,NB,LH,NPT,IDATE(2),RREC(180),SREC(180),ZR
1(180),ELR(180),PHCHI(180),PHSIGS(180,26),HSAV(250),DSAV(250),PCHI(
2180),PSIGS(180,26),IPOL
COMMON /MPR/ UPL,Z,H,HL,X,Y,KST,DELH,S¥,SZ,RC,MUOR
COMMON /MP/ SOURCE(9,250),CONTWO,PSAV(250),IPSIGS(250),U,TEMP,SINT
l-.CQST.PLf6* ,El.Pf2501 . ET UN. HANE . TT/5S . CELM. CTER
-------
CHABACT!R*4 PNAM!(3,250)
C
C FLAG - ADDED FOR SDM (6-88)
C
INTEGER FLAG
C
O>->->->SECTION FTR.B - INITIALIZE AND START RECEPTOR LOOP.
C
C ZERO EFFECTIVE STACK HEIGHT FOR EACH SOURCE
C
C NPT - THE NUMBER OF POINT SOURCES
FLAG=0
DO 10 J»1,NPT
C HSAV WILL BE USED TO STORE THE SOURCE PLUME HEIGHTS.
10 HSAV(J)»O.Q
C LOOP ON RECEPTORS
C NRICEP - THE NUMBER OF RECEPTORS
C
<»->->->SECTION PTR.C - START SOURCES LOOP, CALCULATE
C UPWIND AND CROSSWIND DISTANCES.
C
DO 170 J-1,NPT
IF (FLAG.EQ.1.QR.FLAG.EQ.3) FLAG=4
DO 180 K=1,NRECEP
C IF IQPT(1)*1, TERRAIN ADJUSTMENTS ARE MADE.
IF (lOPT(l).EQ.O) GO TO 20
C ELR - RECEPTOR GROUND LEVEL ELEVATION
ER=ELR(K)
C ELHN - LOWEST SOURCE STACK-TOP ELEVATION?
IF (ER.LE.ELHN) GO TO 20
PCHI(K)*99999.E+26
PHCHI(K)-99999.E+26
GO TO 180
20 CONTINUE
C ZR - REC1POR HEIGHT ABOVE GROUND
Z»ZR(K)
PARTC(J)-0.0
C RQ - EAST COORDINATE OF THE SOURCE
RQ»SOURCE(1,J)
C SQ - NORTH COORDINATE OF THE SOURCE
SQ-SOURCE(2,J)
C ELP - SOURCE GROUND LEVEL ELEVATION
IP«ELP(J)
C DETERMINE UPWIND DISTANCE
C XDUM,¥DUM IN USER UNITS. X,¥ IN KM.
C RREC - EAST COORDINATE OF THE RECEPTOR
XDUM-RQ-RREC(K)
C SREC - NORTH COORDINATE OF THE RECEPTOR
YDUM-SQ-SRIC(K)
C SINT AND COST ARE THE SIN AND COS OF THE WIND DIRECTION
C CONTWO - MULTIPLIER CONSTANT TO CONVERT USER UNITS TO KM
X-(YDUM*COST+XDUM*SINT)*CONTWO
C X IS THE UPWIND DISTANCE OF THE SOURCE FROM THE RECEPTOR.
C IF X IS NEGATIVE, INDICATING THAT THE SOURCE IS DOWNWIND OF
C THE RECEPTOR, THE CALCULATION IS TERMINATED ASSUMING NO
C CONTRIBUTION FROM THAT SOURCE.
IF (X.LE.0.0) GO TO 180
C
C DETERMINE CROSSWIND DISTANCE
-------
Y=(YDUM*SINT-XDUM*COST)*CONTWO
H»HSAV(J)
C SKIP PLUME RISE CALCULATION IF EFFECTIVE HT. HAS ALREADY BEEN
C CALCULATED FOR THIS SOURCE
IF (H.EQ.0.0) GO TO 30
DELH-DH(J)
C
C->->->->SECTION PTR.D - EXTRAPOLATE WIND SPEED TO STACK TOP
C CALCULATE PLUME RISE.
C
GO TO 110
C MODIFY WIND SPEED BY POWER LAW PROFILE IN ORDER TO TAKE INTO
C ACCOUNT THE INCREASE OF WIND SPEED WITH HEIGHT.
C ASSUME WIND MEASUREMENTS ARE REPRESENTATIVE FOR HEIGHT * HANE.
C THT IS THE PHYSICAL STACK HEIGHT
30 THT-SOURCE(5,J)
C POINT SOURCE HEIGHT NOT ALLOWED TO BE LESS THAN 1 METER.
IF (THT.LT.l.) THT-1.
C U - WIND SPEED AT HEIGHT «HANE«
C PL - POWER FOR THE WIND PROFILE
C UPL - WIND AT THE PHYSICAL STACK HEIGHT
UPL-U*(THT/HANE)**PL(KST)
C WIND SPEED NOT ALLOWED TO BE LESS THAN 1 METER/SEC.
IF (UPL.LT.l.) UPI>1.
C STORE THE STACK TOP WIND FOR THE JTH SOURCE FOR THIS HOUR
UPH(J)-UPL
VS=SOURCE(8,J)
BUOY-SOURCE(9,J)
TS=SOURCE(6,J)
C TEMP- THE AMBIENT AIR TEMPERATURE FOR THIS HOUR
DELT-TS-TEMP
F*BUOY*DELT/TS
C IOPT(6) HOURLY EMISSION INPUT FROM TAPE/DISK? 0=NO, 1=YES.
IF (IOPT(6).EQ.O) GO TO 40
C MODIFY EXIT VELOCITY AND BUOYANCY BY RATIO OF HOURLY EMISSIONS
C TO AVERAGE EMISSIONS
SCALE * SOURCE(IPOL,J)/PSAV(J)
VS - VS*SCALE
F - F*SCALE
40 D*SOURCE(7,J)
C
C*****PLUME RISE AND STACK TIP DOWNWASH CALCULATIONS
C
C CALCULATE H PRIME WHICH TAKES INTO ACCOUNT STACK DOWNWASH
C BRIGGS(1973) PAGE 4
HPRM-THT
C IF IOPT(2}-1, THEN NO STACK DOWNWASH COMPUTATION
IF (IOPT(2).EQ.l) GO TO 50
DUM-VS/UPL
IF (DUM.LT.1.5) HPRM-THT+2.*D*(DUM-1.5)
C 'HPRM1 IS BRIGGS1 H-PRIME
IF (HPRM.LT.O.) HPRM-0.
C
C CALCULATE PLUME RISE
C MOMENTUM RISE EQUATION
C
50 DELHM»3.*VS*D/UPL
IF(KST.GT.4)GO TO 70
-------
IF(TS.LT.TEMP)GO TO 80
IF(F.GE.55.)GO TO 60
C
C COMBINATION OF BRIGG'S(1971) EQNS. 6&7, PAGE 1031, FOR F<55.
C
DELH»21.425*F**0.75/UPL
IF(DELHM.GT.DELH)GO TO 80
DISTF=0.049*F**0.625
GO TO 100
C
C COMBINATION OF BRIGG'S(Ii71) EQNS. 6fi7, PAGE 1031, FOR F>-55.
C
60 DELH=33.71*F**0.6/UPL
IF(DELHM.GT.DILH)GO TO 80
DISTF'O.119*F**0.4
GO TO 100
C
C PLUM! RISE FOR STABLE CONDITIONS
C
70 DTHDZ-0.02
IF(KST»GT.5)DTHDZ-0«Q35
S-9.80616*DTHDS/T1MP
C
C MOMENTUM RISE EQUATION
C BRIGG'S(1969) EQUATION 4.28, PAGE 59
C
DHA-1.5*(VS*VS*D*D*T1MP/(4.*TS*UPL))**0.333333/S**0.166667
IF(DHA.LT.DELHM)DELHM-DHA
IF(TS.LT.T£MP)GO TO 80
C
C STABLE, BUOYANT RISE (WITH WIND)
C
DELH-2.6*(F/(UPL*S})**0.333333
IF(DELHM.GT.DELH)GO TO 80
DISTF=0.0020715*UPL/SQRT(S)
GO TO 100
80 DELH-DELHM
DISTF-0.
100 H«HPRM+DELH
105 HSAV(J)=H
DH(J)-DELH
DSAV(J)-DISTF
UPH(J)=UPL
HPR(J)»HPRM
FP(J)-F
C IF SOURCE-RECEPTOR DISTANCE IS GREATER OR EQUAL TO DISTANCE TO
C FINAL RISE, SKIP PLUME RISE CALCULATION AND US1 FINAL RISE.
110 IF (X.GE.DSAV(J)) GO TO 120
IF (IOPT(4).EQ.O.AND.IOPT(3).EQ.l) GO TO 120
C CALCULATE GRADUAL PLUME RISE IF (1) THE USER SPECIFIES SO,
C OR (2) USER EMPLOYS CALCULATION OF INITIAL DISPERSION.....
C IN THIS CASE, USE OF FINAL EFFECTIVE HEIGHT IN THE CALCULATION
C OF DISPERSION COEFFICIENTS COULD LEAD TO MISLEADING VALUES SINCE
C SIGMA-Y,-Z « DELTA-H/3.5
DELH-160.*FP(J)**0.333333*X**0.666667/UPH(J)
C PLUME RISE FOR DISTANCE X(160 IS 1.6*1000**.67 BECAUSE X IN KM)
IF (DELH.GT.DH(J)) DELH~DH(J)
IF (IOPT(3).EQ.l) GO TO 120
-------
C SPECIFYING CALCULATION OF GRADUAL PLUME RISE, THEN DO NOT
C ADD THE NEW GRADUAL DELTA-H TO THE EFFECTIVE HEIGHT. OTHERWISE,
C CHECK THE GRADUAL RISE PLUME HEIGHT WITH FINAL EFFECTIVE HEIGHT
C AND SET THE PLUME HEIGHT TO THE SMALLER OF THE TWO VALUES.
H-HPR(J)+DELH
C ADD PLUME RISE TO STACK HEIGHT FOR TOTAL EFFECTIVE STACK HT.
C END PLUME RISE CALCULATION
120 UPL=UPH(J)
C
C->->->->SECTION PTR.E - CALCULATE THE CONTRIBUTION OF
C ONE SOURCE TO ONE RECEPTOR.
C
IF(KST.GT.4)GOT0130
IF (H.LT.HL) GO TO 130
PROD-0.
GO TO 150
C IF IOPT(1) - 1, TERRAIN ADJUSTMENTS ARE MADE
130 IF (IOPT(1).EQ.O) GO TO 140
DUM-ER-EP
H-H+CELM*(CTER*DUM-DUM)
C RCP RETURNS THE DISPERSION PARAMETERS, SY AND SZ (METERS)
C AND THE RELATIVE CONCENTRATION VALUES CHI/Q (SEC/M**3)
140 CALL INTERF(FLAG,IDAY,LH,J,F)
IF (FLAG.NE.l) CALL RCP
C CALCULATE TRAVEL TIME IN KM-SEC/M TO INCLUDE DECAY RATE OF
C POLLUTANT.
TT-X/UPL
C TLOS IN METERS/KM-SEC, SO TT*TLOS IS DIMENSIONLESS
C INCLUDE THE POLLUTANT LOSS
PROD»RC*SOURCE(IPOL,JJ/EXP(TT*TLOS)
C
C SHORELINE DISPERSION MODEL SPECIAL OUTPUT
C
IF (FLAG.EQ. LAND.PROD.GT. 5. OE-10) WRITE (20,1000)
& (PNAME(I,J),1-1,3),RREC(K),SREC(K),PROD*1E6
C
C IF HAFL IS ZERO, TLOS WILL START AS ZERO AND
C RESULT IN NO COMPUTATION OF POLLUTANT LOSS.
C INCREMENT CONCENTRATION AT K-TH RECEPTOR(G/M**3)
C PCHI - SUM FOR THE AVERAGING TIME AT RECEPTOR K
150 PCHI(K)=PCHI(K)+PROD
C PHCHI - CONCENTRATION FOR THIS HOUR AT RECEPTOR K
PHCHI(K)-PHCHI(K)+PROD
KSIG»IPSIGS(J)
IF (KSIG.EQ.O) GO TO 160
C STORE CONCENTRATIONS FROM SIGNIFICANT SOURCES.(G/M**3)
PSIGS(K,KSIG)-PSIGS(K,KSIG)+PROD
PHSIGS(K,KSIG)"PHSIGS(K,KSIG)+PROD
PSIGS(K,26)=PSIGS(K,26)+PROD
PHSIGS(K,26)*PHSIGS(K,26)+PROD
160 PARTC(J)-PROD
C
C->->->->SECTION PTR.F - END SOURCE AND RECEPTOR LOOPS.
C
180 CONTINUE
C END OF LOOP FOR SOURCES
C WRITE PARTIAL CONCENTRATIONS ON DISK(G/M**3) IF IOPT(21) » 1.
C IF (IOPT(21).EQ.O) GO TO 180
-------
C WRITE (10) IDATE,LH,K,(PARTC(J),J-1,NPT)
170 CONTINUE
C
C
C
IF (FLAG.NE. LAND. FLAG.NE. 3) GO TO 200
DO 190 K-1,NRECEP
IF (PHCHI(K).GT.5.E-10) WRITE (20,1000) 'ALL ','SOUR1,'CIS ',
& RREC(K),SR£C(K),PHCHI(K)*1E6
1000 FORMAT (' CONC:',3A4,F13.3,F13.3,F10.3)
190 CONTINUE
200 CONTINUE
C END OF LOOP FOR RECEPTORS
RETURN
C
C*** SECTIONS OF SUBROUTINE PTR.
C SECTION PTR.A - COMMON AND DIMENSION.
C SECTION PTR.B - INITIALIZE AND START RECEPTOR LOOP.
C SECTION PTR.C - START SOURCES LOOP,' CALCULATE UPWIND AND
C CROSSWIND DISTANCES.
C SECTION PTR.D - EXTRAPOLATE WIND SPEED TO STACK TOP;
C CALCULATE PLUME RISE.
C SECTION PTR.E - CALCULATE CONTRIBUTION FROM A SOURCE TO ONE
C RECEPrOR.
C SECTION PTR.F - END SOURCE AND RECEPTOR LOOPS.
C
END
C
SUBROUTINE RCP
C SUBROUTINE RCP (VERSION 86329) , PART OF MPTER.
C
C->->->->SECTION RCP.A - COMMON.
COMMON /MPOR/ IOPT(25)
COMMON /MPR/ UPL»Z,H»HLfX»¥fKST,D!LH,SYfSZ,RC,MUOR
C
C*** MODIFICATIONS:
C 11/27/79 BY K.W.BALDRIDGE, C.S.C., CONVERTED CODE FROM FIELDATA
C TO ASCII FORTRAN AND MADE CODE MORE STANDARD
C
C->->->->SECTION RCP.B - EXPLANATIONS AND COMPUTATIONS
C COMMON TO ALL CONDITIONS.
C
C RCP DETERMINES RELATIVE CONCENTRATIONS, CHI/Q, FROM POINT SOURCES.
C IT CALLS UPON PGYZ TO OBTAIN STANDARD DEVIATIONS.
C THE INPUT VARIABLES ARE
C UPL WIND SPEED (M/SEC)
C Z RECEPTOR HEIGHT (M)
C H EFFECTIVE STACK HEIGHT (M)
C HL MIXING HEIGHT- TOP OF NEUTRAL OR UNSTABLE LAYER(M).
C X DISTANCE RECEPTOR IS DOWNWIND OF SOURCE (KM)
C Y DISTANCE RECEPTOR IS CROSSWIND FROM SOURCE (KM)
C KST STABILITY CLASS
C DELH PLUME RISE(METERS)
C THE OUTPUT VARIABLES ARE.,..
C SY HORIZONTAL DISPERSION PARAMETER
C SZ VERTICAL DISPERSION PARAMETER
C RC RELATIVE CONCENTRATION (SEC/M**3) ,CHI/Q
C IO IS CONTROL CODE FOR WARNING OUTPUT.
10-6
-------
C THE FOLLOWING EQUATION IS SOLVED —
C RC - (1/(2*PI*UPL*SIGMA Y*SIGMA Z))* (EXP(-0.5*(Y/SIGMA Y)**2))
C (EXP(-0.5*((Z-H)/SIGMA Z)**2) + EXP(-0.5*((Z+H)/SIGMA Z)**2)
C PLUS THE SUM OF THE FOLLOWING 4 TERMS K TIMES (N=1,K) —
C FOR NEUTRAL OR UNSTABLE CASES:
C TERM 1- EXP(-0.5*((Z-H-2NL)/SIGMA Z)**2)
C TERM 2- EXP(-0.5*((Z+H-2NL)/SIGMA Z)**2)
C TERM 3- EXP(-0.5*((Z-H+2NL)/SIGMA Z)**2)
C TERM 4- EXP(-0.5*((Z+H+2NL)/SIGMA Z)**2)
C NOTE THAT MIXING HEIGHT- THE TOP OF THE NEUTRAL OR UNSTABLE LAYER-
C HAS A VALUE ONLY FOR STABILITIES 1-4, THAT IS, MIXING HEIGHT,
C THE HEIGHT OF THE NEUTRAL OR UNSTABLE LAYER, DOES NOT EXIST FOR STABLE
C LAYERS AT THE GROUND SURFACE- STABILITY 5 OR 6.
C THE ABOVE EQUATION IS SIMILAR TO EQUATION (5.8) P 36 IN
C WORKBOOK OF ATMOSPHERIC DISPERSION ESTIMATES WITH THE ADDITION
C OF THE EXPONENTIAL INVOLVING Y.
C IF STABLE, SKIP CONSIDERATION OF MIXING HEIGHT.
IF (KST.GE.5) GO TO 50
IF (Z-HL) 50,50,40
40 RC=*0.
RETURN
C IF X IS LESS THAN 1 METER, SET RC=0. AND RETURN. THIS AVOIDS
C PROBLEMS OF INCORRECT VALUES NEAR THE SOURCE.
50 IF (X.LT.0.001) GO TO 40
C CALL PGYZ TO OBTAIN VALUES FOR SY AND SZ
CALL PGYZ
C SY - SIGMA Y, THE STANDARD DEVIATION OF CONCENTRATION IN THE
C Y-DIRECTION (M)
C SZ » SIGMA Z, THE STANDARD DEVIATION OF CONCENTRATION IN THE
C Z-DIRECTION (M)
C IF IOPT(4)»1, CONSIDER BUOYANCY INDUCED DISPERSION OF PLUME DUE
C TO TURBULENCE DURING BUOYANT RISE.
IF (IOPT(4).EQ.O) GO TO 70
DUM»DELH/3.5
DUM-DUM*DUM
SY»SQRT(SY*SY+DUM)
SZ-SQRT(SZ*SZ+DUM)
70 Cl-1.
IF (Y.EQ.0.0) GO TO 100
YD»1000.*Y
C YD IS CROSSWIND DISTANCE IN METERS.
DUM=YD/SY
TEMP-0.5*DUM*DUM
IF (TEMP.GE.50.) GO TO 40
Cl-EXP(TSMP)
100 IF (KST.GT.4) GO TO 120
IF (HL.LT.5000.) GO TO 200
C IF STABLE CONDITION OR UNLIMITED MIXING HEIGHT,
C USE EQUATION 3.2 IF Z - 0, OR EQ 3.1 FOR NON-ZERO Z.
C (EQUATION NUMBERS REFER TO WORKBOOK OF ATMOSPHERIC DISPERSION
C ESTIMATES.)
120 C2=2.*SZ*SZ
IF (Z) 40,130,150
C NOTE: AN ERRONEOUS NEGATIVE Z WILL RESULT IN ZERO CONCENTRATIONS
C
C->->->->SECTION RCP.C - STABLE OR UNLIMITED MIXING, Z IS ZERO.
C
130 C3=H*H/C2
IF fC3.GE.50.\ GO TO 40
-------
C WADE EQUATION 3.2.
ROA2/ (3 . 14159*UPL*SY*SZ*C1)
RETURN
C
C->->->->SECTION RCP.D - STABLE OR UNLIMITED MIXING, Z IS NON-ZERO.
C
150 A2*0.
A3=0.
CA=Z-H
C3*CA*CA/C2
C4-CB*CB/C2
IF (C3.GE.50.) GO TO 170
A2=1./EXP(C3)
170 IF (C4.GE.50.) GO TO 190
A3=1./EXP(C4)
C WADE EQUATION 3.1.
190 RC= ( A2+A3 ) / ( 6 . 28318*UPL*SY*SZ*C1)
RETURN
C
C->->->->SECTION RCP.E - UNSTABLE, ASSURED OF UNIFORM MIXING.
C
C IF SIGMA-Z IS GREATER THAN 1.6 TIMES THE MIXING HEIGHT,
C THE DISTRIBUTION BELOW THE MIXING HEIGHT IS UNIFORM WITH
C HEIGHT REGARDLESS OF SOURCE HEIGHT OR RECEPTOR HEIGHT BECAUSE
C OF REPEATED EDDY REFLECTIONS FROM THE GROUND AND THE MIXING HT
200 IF (SZ/HL.LE.1.6) GO TO 220
C WADE EQUATION 3.5.
RC=1 ./ (2 . 5066*UPL*SY*HL*C1)
RETURN
C INITIAL VALUE OF AN SET - 0.
C AN - THE NUMBER OF TIMES THE SUMMATION TERM IS EVALUATED
C AND ADDED IN.
220 AN=0.
IF (Z) 40,380,230
C
C->->->->SECTION RCP.F - UNSTABLE, CALCULATE MULTIPLE EDDY
C REFLECTIONS, Z IS NON-ZERO.
C
C STATEMENTS 220-260 CALCULATE RC, THE RELATIVE CONCENTRATION,
C USING THE EQUATION DISCUSSED ABOVE. SEVERAL INTERMEDIATE
C VARIABLES ARE USED TO AVOID REPEATING CALCULATIONS.
C CHECKS ARE MADE TO BE SURE THAT THE ARGUMENT OF THE
C EXPONENTIAL FUNCTION IS NEVER GREATER THAN 50 (OR LESS THAN
C -50).
C CALCULATE MULTIPLE EDDY REFLECTIONS FOR RECEPTOR HEIGHT Z.
230 A1=1./(6.28318*UPL*SY*SZ*C1)
C2=2.*SZ*SZ
A2=0.
A3-0.
CA=Z-H
CB=Z+H
C3=CA*CA/C2
C4=CB*CB/C2
IF (C3.GE.50.) GO TO 250
A2-1./EXP(C3)
250 IF (C4.GE.50.) GO TO 270
A3=1./EXP(C4)
270 SUM=0.
PHUT — i *TIT
-------
280 AN=AN+1.
A4=0.
A5«0.
A6=0.
A7=0.
C5=AN*THL
CC*CA-C5
CD=CB-C5
CE-CA+C5
CF=CB+C5
C6=CC*CC/C2
C7=CD*CD/C2
C8=CE*CE/C2
C9=CF*CF/C2
IF (C6.GE.50.) GO TO 300
A4=1./EXP(C6)
300 IF (C7.GE.50.) GO TO 320
A5-1./EXP(C7)
320 IF (C8.GE.50.) GO TO 340
A6=1./EXP(C8)
340 IF (C9.GE.50.) GO TO 360
A7-1./EXP(C9)
360 T'A4+A5+A6+A7
SUM»SUM+T
IF (T.GE.0.01) GO TO 280
RC=A1*(A2+A3+SUM)
RETURN-
C
C->->->->SECTION RCP.G - UNSTABLE, CALCULATE MULTIPLE EDDY
C REFLECTIONS, Z IS ZERO.
C
C CALCULATE MULTIPLE EDDY REFLECTIONS FOR GROUND LEVEL RECEPTOR
C HEIGHT.
380 A1=1./(6.28318*UPL*SY*SZ*C1)
A2=0.
C2-2.*SZ*SZ
C3=H*H/C2
IF (C3.GE.50.) GO TO 400
A2=*2./EXP(C3)
400 SUM=0.
THL=2 . *HL
410 AN=AN+1.
A4=0.
A6-0.
C5=AN*THL
CC=H-C5
CE=H+C5
C6=CC*CC/C2
C8=CE*CE/C2
IF (C6.GE.50.) GO TO 430
A4=2./EXP(C6)
430 IF (C8.GE.50.) GO TO 450
A6=2./EXP(C8)
450 T=A4+A6
SUM=SUM+T
IF (T.GE.0.01) GO TO 410
RC=A1*(A2+SUM)
RETURN
-------
c
c***
c
c
c
c
c
c
c
c
c
c
c
c
SECTIONS OF SUBROUTINE RCP.
SECTION RCP.A -
SECTION RCP.B -
SECTION RCP.C -
SECTION RCP.D -
SECTION RCP.E -
SECTION RCP.F -
SECTION RCP.G -
SECTION RCP.H -
IS ZERO.
IS NON-ZERO.
COMMON.
EXPLANATIONS AND COMPUTATIONS COMMON TO ALL
CONDITIONS.
STABLE OR UNLIMITED MIXING, Z
STABLE OR UNLIMITED MIXING, Z
UNSTABLE, ASSURED OF UNIFORM MIXING.
UNSTABLE, CALCULATE MULTIPLE EDDY
REFLECTIONS; Z IS NON-ZERO.
UNSTABLE, CALCULATE MULTIPLE EDDY
REFLECTIONS; Z IS ZERO.
FORMAT.
END
C
C
C
C
C
c
c
c
c
c
c
c
c
SUBROUTINE PGYZ
SUBROUTINE PGYZ (VERSION 79365), PART OF MPTER.
VERTICAL DISPERSION PARAMETER VALUE, SZ DETERMINED BY
SZ » A * X ** B WHERE A AND B ARE FUNCTIONS OF BOTH STABILITY
AND RANGE OF X.
HORIZONTAL DISPERSION PARAMETER VALUE, SY DETERMINED BY
LOGARITHMIC INTERPOLATION OF PLUME HALF-ANGLE ACCORDING TO
DISTANCE AND CALCULATION OF 1/2.15 TIMES HALF-ARC LENGTH.
COMMON /MPR/ UPL,Z,H,HL,X,Y,KST,DELH,SY,SZ,RC,MUOR
DIMENSION XA(7), XB(2}, XD(5), XE(8), XF(9), AA(8), BA(8), AB(3),
1BB(3), AD(6), BD(6), AE(9), BE(9), AF(10), BF(10)
DATA XA /.5r.4,.3,.25,.2,.15,.I/
DATA XB /. 4, . 2/
DATA XD /30.,10.,3.,1.,.3/
DATA XE /40.,20.,10.,4.,2.,1.,.3,.I/
DATA XF /60.,30.,15.,7.,3.r2.fl.,.7,.2/
DATA AA /453.85,346.75,258.89,217.41,179.52,170.22,158.08,122.8/
DATA BA /2.1166,1.7283,1.4094,1.2644,1.1262,1.0932,1.0542,.9447/
DATA AB /109.30,98.483,90.673/
DATA BB /I.0971,0.98332,0.93198/
DATA AD /44.053,36.650,33.504,32.093,32.093,34.459/
DATA BD /O.51179,0.56589,0*60486,0.64403,0.81066,0.S6974/
DATA AE /47.618,35.420,26.970,24.703,22.534,21.628,21.628,23. 331,2
14.26/
- DATA BE /O.29592,0.37615,0.46713,0.50527,0.57154,0.63077,0.75660,0
1.81956,0.8366/
DATA AF /34.219,27.074,22.651,17.836,16.187,14.823,13.953,13.953,1
14.457,15.2097
DATA BF /0.21716,0.27436,0.32681,0.41507,0.46490,0.54503,0.63227,0
1.68465,0.78407,0.815587
IF (MUOR.EQ.2) GO TO 9
MCELROY-POOLER URBAN DISPERSION PARAMETERS FROM ST.
EXPERIMENT AS PUT IN EQUATION FORM BY BRIGGS.
X IS DISTANCE IN KM.
KST IS PASQUILL STABILITY CLASS.
SY AND SZ ARE IN METERS.
GO TO(2,2,3,4,5,5), KST
SY-320.*X/SQRT(1.+0.4*X)
SZ=240.*X*SQRT(1,+X)
GO TO 6
LOUIS
-------
SZ-200.*X
GO TO 6
4 SY-160.*X/SQRT(1.+0.4*X)
32*140. *X/SQRT(1.+0.3*X)
GO TO 6
5 SY»110.*X/SQRT(1.+0.4*X)
SZ=80 . *X/SQRT ( 1 . +1 . 5*X)
6 IF (SZ.GT.5000.) SZ=5000.
RETURN
C
9 XY=X
GOTO (10,40,70,80,110,140), KST
C STABILITY A
10 TH*(24. 167-2. 5334*ALOG(XY))/57. 2958
IF (X.GT.3.11) GO TO 170
DO 20 ID*1,7
IF (X.GE.XA(ID)) GO TO 30
20 CONTINUE
30 SZ=AA(ID)*X**BA(ID)
GO TO 190
C STABILITY B
40 TH=( 18. 333-1. 8096*ALOG(XY) ) /57.295S
IF (X.GT.35.) GO TO 170
DO 50 ID*1,2
IF (X.GE.XB(ID)) GO TO 60
50 CONTINUE
60 S2»AB(ID)*X**BB(ID)
GO TO 180
C STABILITY C
70 TH-(12.5-1.0857*ALOG(XY) )/57.2958
SZ=61.141*X**0. 91465
GO TO 180
C STABILITY D
80 TH=(8. 3333-0. 72382*ALOG(XY) )/57. 2958
DO 90 ID=»1,5
IF (X.GE.XD(ID) ) GO TO 100
90 CONTINUE
ID=»6
100 SZ=AD(ID)*X**BD(ID)
GO TO 180
C STABILITY E
110 TH-(6.25-0.54287*ALOG(XY) )/57.2958
DO 120 ID=1,8
IF (X.GE.XE(ID)) GO TO 130
120 CONTINUE
ID=9
130 SZ»AE(ID)*X**BE(ID)
GO TO 180
C STABILITY F
140 TH=(4. 1667-0. 36191*ALOG(XY))/57. 2958
DO 150 ID=1,9
IF (X.GE.XF(ID) ) GO TO 160
150 CONTINUE
ID=10
160 SZ=AF(ID)*X**BF(ID)
GO TO 180
170 SZ=5000.
-------
180 IF (SZ.GT.5000.) SZ-5000.
190 SY-465.116*XY*SIN(TH)/CQS(TH)
C 465.116 - 1000. (M/KM) /2.15
R1TURN
C
END
C
SUBROUTINE RANK (L)
C SUBROUTINE RANK (VERSION 79365), PART OF MPTER.
C CALLED BY MPTER TO ARRANGE CONCENTRATIONS OF VARIOUS AVG
C TIMES INTO HIGH-FIVE TABLES...THAT IS, ARRAYS STORING
C THE HIGHEST FIVE CONCENTRATIONS FOR EACH RECEPTOR FOR
C EACH AVG TIME.
C VARIABLES OUTPUT:
C HMAXA(J,K,L) CONCENTRATIONS ACCORDING TO
C J : RANK OF CONC. (1-5)
C K : RECEPTOR NUMBER
C L : AVG TIME
C NDAY{J,K,L) J ASSOCIATED DAY OF CONC.
C IHR(J,K,L) : ENDING HOUR OF CONC.
COMMON /MSFM/ MSFMFL,MSFMHR
INTEGER MSFMFL{50,24),MSFMHR(8784)
COMMON/MR/HMAXA(5,180,5),NDAY(5,180,5) ,IHR(5,180,5),CONC(180,5),
1 JDAY,NR
COMMON /MPO/ NRECEP,NAVG,NB,LHfNPT,IDATE(2),RREC(180),SREC(180), ZR
1(180) ,ELR(180),PHCHI(180) ,PHSIGSf180,26),HSAV(250) ,DSAV(250) , PCHI (
2180),PSIGS(180,26},IPOL
I0»6
C RESET AVERAGING PERIOD FLAG AND SET CALM FLAG, LL.
C CALMS ACCOUNTED FOR ONLY WHEN DEFAULT OPTION ON.
LL="0
IF(L.GT.4)LL=1
IF (L.GT.1GO) LL-2
IF (L.EQ.lll) L-l
IF(L.EQ.22,OR.L*EQ.222)L»2
IF(L.£Q.33.QR.L*EQ.333)L=3
IF(L.EQ.44CQR.L.EQ.444)L=4
DO SO K*1,NRECEP
IF (CONC(K,L).LE.HMAXA(5,K,L)) GO TO 50
DO 10 J»l,5
IF (CONC(K,L),GT.HMAXA(J,K,L)) GO TO 20
C CONCENTRATION IS ONE OF THE TOP FIVE
10 CONTINUE
WRITE (IOf70)
GO TO 50
C THE FOLLOWING DO-LOOP HAS THE EFFECT OF INSERTING A NEW
C CONCENTRATION ENTRY INTO ITS PROPER POSITION WHILE SHIFTING
C DOWN THE 'OLD1 LOWER CONCENTRATIONS THUS ESTABLISHING THE
C 'HIGH-FIVE1 CONCENTRATION TABLE.
20 IF (J.EQ.5) GO TO 40
DO 30 IJ=4,J,-1
UPl-U+1
HMAXA(IJP1,K,L)=HMAXA(IJ,K,L)
NDAY(IJP1,K,L) - NDAY(IJ,K,L)
30 IHR(XJP1,K,L) - IHR(IJ,K,L)
C INSERT LATEST CONC, DAY AND ENDING HR INTO THE
C PROPER RANK IN THE HIGH-FIVE TABLE
40 HMAXA(J,K,L)*CONC(K,L)
-------
IHR(J,K,L) m LH
C ADD 100 TO HOUR TO SET CALM FLAG FOR MAIN.
IF(LL.EQ.1.AND.L.NE.1)IHR(J,K,L)=IHR(J,K,L)+100
IF (LL.EQ.2) IHR(J,K,L)=«IHR(J,K,L)+200
50 CONTINUE
DO 60 K=1,NRECEP
CONC(K,L)=0.
60 CONTINUE
RETURN
C
70 FORMAT (IX,1 ****ERROR IN FINDING THE MAX CONCENTRATION***1)
C
END
C
SUBROUTINE OUTHR
C SUBROUTINE OUTHR (VERSION 79365), PART OF MPTER.
C THIS SUBROUTINE PROVIDES OUTPUT CONCENTRATIONS IN
C MICROGRAMS PER CUBIC METER FOR EACH HOUR IN TWO WAYS:
C 1) CONTRIBUTIONS FROM SIGNIFICANT SOURCES, AND
C 2) SUMMARIES.
C BEYOND ENTRY POINT OUTAVG THE SUBROUTINE PROVIDES
C CONCENTRATION OUTPUT FOR EACH AVERAGING PERIOD AGAIN
C IN THE ABOVE MANNER.
C
C->->->->SECTION OUTHR.A - COMMON, DIMENSION, AND DATA.
C
COMMON /MPOR/ IOPT(25)
COMMON /MPO/ NRECEP,NAVG,NB,LH,NPT,IDATE(2),RREC(180),SREC(180),ZR
1(180),ELR(180),PHCHI(180),PHSIGS(180,26),HSAV(250),DSAV(250),PCHI(
2180),PSIGS(180,26),IPOL
COMMON /MO/ QTHETA(24),QU(24),IKST(24),QHL(24),QTEMP(24),MPS(25),M
1SIGP,IO,LINE1(20),LINE2(20),LINE3(20),RNAME(2,180),IRANK(180),STAR
2(5,180)
CHARACTER*4 RNAME,STAR
C
C
DIMENSION IPOLT(2)
DATA IPOLT /'S02 ',•PART'/
IPOLU=IPOLT(1)
IF (IPOL.EQ.4) IPOLU=IPOLT(2)
C OPTION(11): PRINT ONLY THE HOURLY SUMMARIES.
IF (IOPT(11).EQ.l) GO TO 100
C
C->->->->SECTION OUTHR.B - WRITE HOURLY CONTRIBUTION TITLE.
C
WRITE (10,350) LINE1,LINE2,LINE3
WRITE (IO,360)IPOLU,IDATE,LH
C
C->->->->SECTION OUTHR.C - WRITE HOURLY MET DATA.
C
IF (IOPT(12).EQ.l) GO TO 10
WRITE (10,450)
WRITE (10,460) LH,QTHETA(LH),QU(LH),QHL(LH),QTEMP(LH),IKST(LH)
C
C->->->->SECTION OUTHR.D - WRITE FINAL PLUME HEIGHT AND DISTANCE
C FINAL RISE.
C
10 IF noprri3) .EO.H GO TO 20
-------
C HSAV ARE THE CALCULATED PLUME HEIGHTS FOR THIS HOUR
WRITE (10,480) (HSAV(I),1=1,NPT)
WRITE (10,490) (DSAV(I),I=1,NPT)
C
O>->->->SECTION OUTHR.E - WRITE HRLY SIGNIFICANT SOURCE CONTRIB.
C
20 IF (NSIGP.GT.10) GO TO 40
C PRINT FIRST PAGE OF OUTPUT AND TOTALS FOR 10 OR LESS SIGNIF SOU
WRITE (10,370)
WRITE (10,380) (I,I-1,NSIGP)
WRITE (10,390)
WRITE (10,380) (MPS(I),I-1,NSIGP)
WRITE (10,400)
DO 30 K=1,NRECEP
WRITE (10,410) K,STAR(1,K),STAR(2,K),(PHSIGS(K,I),I«1,NSIGP)
C PRINT TOTALS
WRITE (10,420) PHSIGS(K,26),PHCHI(K)
30 CONTINUE
GO TO 100
C PRINT FIRST PAGE FOR MORE THAN 10 SIGNIFICANT SOURCES.
40 WRITE (10,370)
WRITE (10,380) (1,1-1,10)
WRITE (10,430) (MPS(I),1-1,10)
WRITE (10,400)
DO 50 K»1,NRECEP
50 WRITE (10,410) K,STAR(1,K),STAR(2,K),(PHSIGS(K,I),1-1,10)
IF (NSIGP.GT.20) GO TO 70
C PRINT SECOND PAGE AND TOTALS FOR 11 TO 20 SIGNIFICANT SOURCES
WRITE (10,350) LINE1,LINE2,LINE3
WRITE (IO,360)IPOLU,IDATE,LH
WRITE (10,370)
WRITE (10,380) (I,I-11,NSIGP)
WRITE (10,390)
WRITE (10,380) (MPS(I),I-11,NSIGP)
WRITE (10,400)
DO 60 K-1,NRECEP
WRITE (10,410) K,STAR(1,K)»STAR(2,K),(PHSIGS(K,I),I=11,NSIGP)
60 WRITE (10,420) PHSIGS(K,26),PHCHI(K)
GO TO 100
C WRJTE SECOND PAGE FOR MORE THAN 20 SIGNIFICANT SOURCES.
70 WRITE (10,350) LINE1,LINE2,LINE3
WRITE (IO,360)IPOLU,IDATE,LH
WRITE (10,370)
WRITE (10,380) (1,1-11,20)
WRITE (10,430) (MPS(I),1-11,20)
WRITE (10,400)
DO 80 K-1,NRECEP
80 WRITE (10,410) K,STAR(1,K),STAR(2,K),(PHSIGS(K,I),1-11,20)
WRITE (10,350) LINE1,LINE2,LINE3
WRITE (IO,360)IPOLU,IDATE,LH
WRITE (10,370)
C WRITE LAST PAGE AND TOTALS FOR MORE THAN 20 SIGNIF. SOURCES.
WRITE (10,380) (I,I-21,NSIGP)
WRITE (10,390)
WRITE (10,380) (MPS(I),I=21,NSIGP)
WRITE (10,400)
DO 90 K-1,NRECEP
WRITE (10,410) K,STAR(1,K),STAR(2,K),(PHSIGS(K,I),I=21,NSIGP)
90 WRITE (10,420) PHSIGS(K,26),PHCHI(K)
-------
100 IF (IOPT(14).EQ.l) GO TO 170
C
C->->->->SECTION OUTHR.F - WRITE HOURLY SUMMARY TITLE.
C
WRITE (10,350) LINE1,LINE2,LINE3
WRITE (IO,440)IPOLU,IDATE,LH
C
C->->->->SECTION OUTHR.G - WRITE HOURLY MET DATA.
C
IF (IOPT(15).EQ.l) GO TO 110
WRITE (10,450)
WRITE (10,460) LH,QTHETA(LH),QU(LH),QHL(LH),QTEMP(LH),IKST(LH)
C
C->->->->SECTION OUTHR.H - WRITE FINAL PLUME HEIGHT AND
C DISTANCE TO FINAL RISE.
C
110 IF (IOPT(16).EQ.l) GO TO 120
WRITE (10,470) (1,1-1,10)
C HSAV ARE THE CALCULATED PLUME HEIGHTS FOR THIS HOUR
WRITE (10,480) (HSAV(I),1=1,NPT)
WRITE (10,490) (DSAV(I),1=1,NPT)
C
C->->->->SECTION OUTHR.I - WRITE HOURLY SUMMARY TABLE.
C
120 WRITE (10,500)
C CALCULATE GRAND TOTALS AND RANK CONCENTRATIONS
DO 130 K»1,NRECEP
C HSAV IS USED AS A DUMMY VARIABLE FOR THE REMAINDER OF THIS
C SUBROUTINE'. IT IS ZEROED AGAIN IN PTR BEFORE ITS NORMAL USE.
130 HSAV(K)=PHCHI(K)
C DETERMINE RANKING ACCORDING TO CONCENTRATION
DO 150 I=1,NRECEP
CMAX=-1.0
DO 140 K=1,NRECEP
IF (HSAV(K).LE.CMAX) GO TO 140
CMAX=HSAV(K)
LMAX=K
140 CONTINUE
IRANK(LMAX)=I
HSAV(LMAX)=-1.0
150 CONTINUE
DO 160 K-1,NRECEP
WRITE (10,510) K,STAR(1,K),STAR(2,K),(RNAME(J,K),J=l,2),RREC(K),SR
1EC(K),ZR(K),ELR(K),PHSIGS(K,26),PHCHI(K),IRANK(K)
160 CONTINUE
170 RETURN
350 FORMAT ('1',20A4/1X,20A4/1X,20A4)
360 FORMAT(•0',T30,A4,' CONTRIBUTION(MICROGRAMS/M**3) FROM SIGNIFICANT
1 POINT SOURCES ',5X,12,•/',14,' : HOUR ',I2//)
370 FORMAT (1HO,T5,'RANK')
380 FORMAT (' + ',T12,10(13,7X))
390 FORMAT (' + ' ,T113 , 'TOTAL TOTAL'/IX,T113 , 'SIGNIF ALLPOINT'/l
IX,T113,'POINT SOURCES'/IX,'SOURCE #')
400 FORMAT (IX,'RECEP #')
410 FORMAT (IX,13,2A1,6P,10F10.3)
420 FORMAT (' + ',T109,6P,2F10.3)
430 FORMAT (IX,'SOURCE #',T12,10(13,7X))
440 FORMAT(I0',T25,A4,' SUMMARY CONCENTRATION TABLE(MICROGRAMS/M**3) '
-------
450 FORMAT (IX, T2, 'HOUR THETA SPEED MIXING TEMP STABILITY'/
11X,T9, ' (DEG) (M/S) HEIGHT(M) (K) CLASS'/1X)
460 FORMAT (1X,T3 , 12 , 4F9.2 , 6X, II//)
470 FORMAT (13X,10I11)
480 FORMAT (' FINAL HT (M) S10F11.2)
490 FORMAT (' DIST FIN HT (KM) ' , 10F11.3)
500 FORMAT (' 0 • ,T7, 'RECEPTOR1 ,T23 , 'EAST1 ,T33, 'NORTH' ,T43 , 'RECEPTOR HT1
lfT61, 'RECEPTOR' ,T78, 'TOTAL FROM1 ,T93, 'TOTAL FROM1 ,T106, ' CONCENTRAT
2ION'/1 ',17,^0. NAME' ,T22, 'COORD '»T33, 'COORD' »T44, 'ABV GRD (M)»,T
359,'GRD-LVL ELEV ,T77, 'SIGNIF POINT1 ,T9 3, 'ALL SOURCES ', Till, 'RANK1
4/1 %T58,'(US£R HT UNITS) ' »T80, 'SOURCES '//)
510 FORMAT (1H ,I8,2A1, 2X, 2A4, 2F10.2 ,F12 .1, F20. 1, 6P,2F15 . 4 , 115)
520 FORMAT ( ' 0 ' , T22 , 12 , ' -HOUR AVERAGE ' , A4 , ' CONTRIBUTION ( MICROGRAMS/M
1**3) FROM SIGNIFICANT POINT SOURCES ', 5X, 12 ,'/', 13 ,' START HOUR: '
2,I2//1X,T5, 'RANK')
530 FORMAT ( ' O1 ,T2§, 12, '-HOUR AVERAGE ',A4,' SUMMARY CONCENTRATION TAB
1LE (MICROGRAMS/M* *3) ' ,5X,I2, '/' ,13, ' START HOUR: ',I2//1X)
540 FORMAT { 'CNTL' » IX, 3F10.3, 20X, 14, 2F10. 1)
END
SUBROUTINE INTERF ( FLAG , IDAY , LH , J , F)
C
C INTERF - PROGRAM TO INTERFACE MPTIR AND MSFM. PROGRAM TESTS
C FOR APPLICABILITY OF MSFM AND COMPUTES INPUT VALUES.
C
COMMON /SHORE/XSL(250) , YSL(250) , BA(250) ,EA(25Q) ,FETCH(250) ,
& INDEX ( 250 ) , SNAME ( 3 ) , THETA
CHARACTER* 4 SNAME, ENDS
COMMON /MSFM/ MSFMFL,MSFMHR
INTEGER MSFMFL(5Q, 24) ,MSFMHR (8784)
COMMON /SDMONE/XP, YP, A, B, UL,US , HPLUME, HSTK, CN, Fl , I , Q , MGCM
REAL MGCM
COMMON /MPR/UPL,Z,H,HLfX,Y,KST,DELH,SY,SZ,RC,MUOR
C /MP/ BETWEEN MAIN PROGRAM AND PTR
COMMON /MP/ SOURCE(9, 250) ,CONTWO, PSAV(2SO) ,IPSIGS(250) ,U, TEMP, SINT
1,COST,PL(6) ,ELP(250) , ELHN , HANE , TLOS , CELM , CTER
C /MO/ BETWEEN MAIN PROGRAM AND OUTHR
COMMON /MO/ QTHETA(24) ,QU(24) ,IKST(24) ,QHL(24) ,QTEMP(24) ,MPS(25) , N
1SIGP,IO,LINE1(20) ,LINE2(20) , LINE3(20) ,RNAME(2 , 180) ,IRANK(180) , STAR
2(5,180)
INTEGER FLAG
C PSIM(X)=2*LOG((l+X)/2)+LOG((l+X**2)/2)-2*ATAN(X)+3. 14159/2
C PSIH(X)=2*LOG((H-X**2)/2)
K-.4
CSUBP-1020.
RHO-1.188
IF (FLAG.EQ.l) GO TO 1000
IF (FLAG.EQ.4) GO TO 100
IF (FLAG. EQ. 2. OR. FLAG. EQ. 3) GO TO 9999
C-4?
-------
5 READ (19) IDAT,IHOUR,UL,US,PTMOL,PTMOW,DTHDZ,HO
IF (IDAT.LT.IDAY) GO TO 5
IF (IHOUR.LT.LH) GO TO 5
IF (IHOUR.GT.LH.OR.IDAT.GT.IDAY) THEN
WRITE (6,*) 'FAULTY TOWER DATA AT DAY1,IDAY
STOP
ENDIF
C
C BA=BEGINNING ANGLE, EA=ENDING ANGLE
C TRAD=WIND DIRECTION
C
TRAD=QTHETA(LH)
IF (EA(J).LT.360.) THEN
IF (TRAD.LT.BA(J)+FETCH(J).OR.TRAD.GT.EA(J)-FETCH(J)) THEN
FLAG»2
RETURN
ENDIF
ELSE
IF (TRAD.GT.BA(J)+FETCH(J)) GO TO 20
IF (TRAD+360.LT.EA(J)-FETCH(J)) GO TO 20
FLAG=2
RETURN
ENDIF
C
C KST = STABILITY CLASS
C
20 IF (KST.GT.3) THEN
FLAG=2
RETURN
ENDIF
IF (DTHDZ.LE.O) THEN
FLAG»2
RETURN
ENDIF
C
C TEMPI,TEMP2 - POTENTIAL TEMPERATURE AT LEVELS 1 AND 2
C WS1,WS2 » WIND SPEED AT LEVELS 1 AND 2
C ZO,Z1,Z2 » SURFACE ROUGHNESS, LEVEL 1 HEIGHT, LEVEL 2 HEIGHT
C HO = SENSIBLE HEAT FLUX
C
C
C RI=G*2/(TEMP1+TEMP2)*(TEMP1-TEMP2)/(Z1-Z2)*((Z1-Z2)/(WS1-WS2))**2
C L=(Z2*Z1)**.5/RI
C BETA1=(1-16*ZO/L)**.25
C BETA2=(1-16*Z1/L)**.25
C LAMB1«BETA2
C LAMB2=(1-16*Z2/L)**.25
C UST=K*WS1/(LOG(Z1/ZO)-PSIM(BETA2)+PSIM(BETA1))
C THEST=K*(TEMP2-TEMP1)/(LOG(Z2/Z1)-PSIH(LAMB2)+PSIH(LAMB1))
C HO»-RHO*CSUBP*UST*THEST
C
. IF (HO.LT.20) THEN
FLAG=2
RETURN
ENDIF
C
C TBLHGT - TIBL HEIGHT
C XSHORE = DISTANCE FROM SHORE TO STACK
C-43
-------
C TEMPS - TEMPERATURE AT 10 FEET ABOVE WATER
C TEMP4 * WATER TEMPERATURE
C
C DTHDZ=(TEMP3-TEMP4)/10
C
C
C
WRITE (20,2000) IDAYfLH,HO,UL,US,DTHDZ,PTMOL,PTMOW
2000 FORMAT (' TIBL:',13,12,F7.2,F13.2,F13.2,F10.4,F8.1,F8.1)
C
C
100 X1-SOURCE(1,J)*CONTWQ
Y1=SOURCE(2,J)*CQNTWO
X2»XSL(J)*CQNTWO
Y2=YSL(J)*CONTWO
DIST-XSHORE{X1,Y1,TRAD,X2,Y2,BA(J),EA{J),FETCH(J))
TBLHGT-C((2*HO)/(CSUBP*RHO*DTHDZ*UL))**.5)*SQRT(DIST)
HSTK-SQURCE(5,J)
C
C THT - STACK HEIGHT
C
IF (HSTK.LT.TBLHGT) THEN
FLAG-3
RETURN
ENDIF
Q-l
Fl-P
CN - ((G/PTMOW}*DTHDZ)**0.5
C
C->-> DETERMINE THE TIBL A FACTOR
C
A - ((2.*HQ)/(CSUBP*RHO*DTHD2*UL})**0.5
C
C->-> DETERMINE THE TIBL HEIGHT FOR USE IN CALCULATING
C CONVECTIVE VELOCITY (W*)
C
HT - A*(5000.**0.5)
C
C->-> DETERMINE PART OF SIGMA Y EQUATION
C FOR THE CONVECTIVE LAYER (B - W*/UL)
C
B - (((G*HQ*HT)/(RHO*CSUBP*PTMOL))**.333)/UL
FLAG=1
1000 CONTINUE
XP»X*1000.
¥P-Y*1000.
CALL SFM(DIST)
MSFMHR (IDAY*24-»-LH)-1
MSFMFL(J,LH)=1
RC-MGCM/1.E6
9999 CONTINUE
RETURN
END
C
C->->->->SECTION OUTHR.J - ENTRY POINT FOR AVERAGING TIME
C
SUBROUTINE OUTAVG
COMMON /MPOR/ IOPT(25)
C-44
-------
COMMON /MPO/ NRECEP,NAVG,NB,LH,NPT,IDATE(2),RREC(ISO),SREC(180),ZR
1(180),ELR(180)fPHCHI(180),PHSIGS(180,26),HSAV(250),DSAV(25Q),PCHI(
2180),PSIGS(180,26),IPOL
COMMON /MO/ QTHETA(24),QU(24),IKST(24),QHL(24),QTEMP(24),MPS(25),N
1SIGP,IO,LINE1(20),LINE2(20),LINE3(20),RNAME(2,180),IRANK(180),STAR
2(5,180)
CHARACTER*4 RNAME,STAR
C
C
DIMENSION IPOLT(2)
CHARACTER*4 IPOLT
DATA IPOLT /'S02 ',»PART•/
C AT THIS ENTRY POINT, CONCENTRATION OUTPUT
C IN MICROGRAMS PER CUBIC METER ARE PRINTED FOR THE
C AVERAGING PERIOD. CONTRIBUTIONS AND/OR SUMMARY
C INFORMATION IS AVAILABLE.
C AVERAGE CONCENTRATIONS OVER SPECIFIED TIME PERIOD
DO 190 K-l,NRECEP
PCHI(K)=PCHI(K)/NAVG
HSAV(K)=PCHI(K)
DO 180 1*1,26
180 PSIGS(K,I)»PSIGS(K,I)/NAVG
190 CONTINUE
C OPTION(17): SKIP OUTPUT OF THE AVERAGED CONTRIBUTIONS.
IF (IOPT(17).EQ.l) GO TO 270
C->->->->SECTION OUTHR.K - WRITE AVERAGING-TIME SIGNIFICANT
C SOURCE CONTRIBUTIONS.
WRITE (10,350) LINE1,LINE2,LINE3
WRITE (10,520) NAVG,IPOLU,IDATS,NB
IF (NSIGP.GT.10) GO TO 210
C PRINT FIRST PAGE OF OUTPUT AND TOTALS FOR 10 OR LESS SIGNIF SOU
WRITE (IO,380) (I,I-1,NSIGP)
WRITE (10,390)
WRITE (10,380) (MPS(I),I-1,NSIGP)
WRITE (XO,400)
DO 200 K-l,NRECEP
WRITE (10,410) K,STAR(1,K),STAR(2,K),(PSIGS(K,I),I~1,NSIGP)
C PRINT TOTALS
WRITE (10,420) PSIGS(K,26),PCHI(K)
200 CONTINUE
GO TO 270
C PRINT FIRST PAGE FOR MORE THAN 10 SIGNIF SOURCES
210 WRITE (10,380) (1,1-1,10)
WRITE (10,430) (MPS(I),1-1,10)
WRITE (10,400)
DO 220 K-l,NRECEP
220 WRITE (10,410) K,STAR(1,K),STAR(2,K),(PSIGS(K,I),1=1,10)
IF (NSIGP.GT.20) GO TO 240
C PRINT SECOND PAGE AND TOTALS FOR 11 TO 20 SIGNIF SOURCES
WRITE (10,350) LINE1,LINE2,LINE3
WRITE (IO,i20) NAVG,IPOLU,IDATE,NB
WRITE (10,380) (I,I=11,NSIGP)
WRITE (10,390)
WRITE (10,380) (MPS(I),I=11,NSIGP)
WRITE (10,400)
DO 230 K=l,NRECEP
WRITE (10,410) K,STAR(1,K),STAR(2,K),(PSIGS(K,I),I=11,NSIGP)
230 WRITE (10,420) PSIGS(K,26),PCHI(K)
GO TO 270
C-45
-------
C WRITE SECOND PAGE FOR MORE THAN 20 SIGNIP SOURCES
240 WRITE (10,350) LINE1,LINE2,LINE3
WRITE (10,520) NAVG,IPOLU,IDATE,NB
WRITE (10,380) (1,1=11,20)
WRITE (10,430) (MPS(I),1-11,20)
WRITE (IO,400)
DO 250 K-1,NRECEP
250 WRITE (10,410) K,STAR(1,K),STAR(2,K),(PSIGS(K,I),1=11,20)
WRITE (IO,350) LINE1,LINI2,LINE3
WRITE (IO,520) NAVG,IPOL0,IDATE»NB
C WRITE LAST PAGE AND TOTALS FOR MORE THAN 20 SIGNIF SOURCES
WRITE (10,380) (I,I»21,NSIGP)
WRITE (10,390)
WRITE (10,380) (MPS(I),I»21,NSIGP)
WRITE (10,400)
DO 260 K-1,NRECIP
WRITE (10,410) K,STAR(1,K),STAR(2,K),(PSIGS(K,I),1-21,NSIGP)
260 WRITE (10,420) PSIGS(K,26),PCHI(K)
C
C->->->->SECTION OUTHR.L - WRITE AVERAGING-TIME SUMMARY.
C
C OPTION(18): SKIP OUTPUT OF THE AVERAGED SUMMARIES.
270 IF (IOPT(18).EQ.l) GO TO 310
WRITE (10,350) LINE1,LINE2,LINE3
WRITE (10,530) NAVG,IPOLU,IDATE,NB
WRITE (10,500)
C CALCULATE GRAND TOTALS AND RANK CONCENTRATIONS
DO 290 I=1,NRECEP
CMAX—l.G
DO 280 K=1,NREC£P
IF (HSAV(K).LE.CMAX) GO TO 280
CMAX=HSAV(K)
LMAX»K
280 CONTINUE
IRANK(LMAX)-!
HSAV(LMAX)—1.0
290 CONTINUE
DO 300 K-1,NRECSP
WRITE (IO.510) KrSTAR(l,K) ,STAR(2,K) , (RNAME(J,K) ,J»1,2) ,RREC(K) ,SR
lECfK),ZR(K)fELR(K),PSIGS(K,26),PCHI(K),IRANK(K)
300 CONTINUE
310 IF (IOPT(24).EQ.O) GO TO 330
C PUNCH CONCENTRATIONS FOR CONTOURING(MICROGRAMS/CUBIC METER)
C RECEPTOR COORDINATES IN USER UNITS.
DO 320 K*1,NRECEP
GWU=PCHI(K)*1.OE+06
WRITE (10,540) RREC(K),SREC(K),GWU,K,2R(K),ELR(K)
WRITS (1*540) RREC(K),SREC(K),GWU,K,ZR(K),ELR(K)
320 CONTINUE
330 IF (IOPT(23).EQ.O) GO TO 340
C WRITE PERIODIC CONG. TO DISK/TAPE - FOR LONG-TERM APPLICATION
C FOR EACH RUN, THIS WRITE STATEMENT WILL GENERATE
C 'NPER' RECORDS.
WRITE (13) IDATE(2),NB,(PCHI(K),K=1,NRECEP)
340 RETURN
C
C->->->->SECTION OUTHR.M - FORMATS.
C
C*** SECTIONS OF SUBROUTINE OUTHR.
C SECTION OUTHR.A - COMMON, DIMENSION, AND DATA.
C-46
-------
C SECTION OUTHR.B - WRITE HOURLY CONTRIBUTION TITLE.
C SECTION OUTHR.C - WRITE HOURLY MET. DATA.
C SECTION OUTHR.D - WRITE FINAL PLUME HEIGHT AND DISTANCE TO
C FINAL RISE.
C SECTION OUTHR.E - WRITE HOURLY SIGNIFICANT SOURCE CONTRIB.
C SECTION OUTHR.F - WRITE HOURLY SUMMARY TITLE.
C SECTION OUTHR.G - WRITE HOURLY MET. DATA.
C SECTION OUTHR.H - WRITE FINAL PLUME HEIGHT AND DISTANCE TO
C FINAL RISE.
C SECTION OUTHR.I - WRITE HOURLY SUMMARY TABLE.
C SECTION OUTHR.J - ENTRY POINT FOR AVERAGING TIME.
C SECTION OUTHR.K - WRITE AVERAGING-TIME SIGNIFICANT SOURCE
C CONTRIBUTIONS.
C SECTION OUTHR.L - WRITE AVERAGING-TIME SUMMARY.
C SECTION OUTHR.M - FORMATS.
C
350 FORMAT ('1•,20A4/1X,20A4/1X,20A4)
360 FORMAT('0',T30,A4,' CONTRIBUTION(MICROGRAMS/M**3) FROM SIGNIFICANT
1 POINT SOURCES ',5X,12,•/•,14,' : HOUR ',I2//)
370 FORMAT (1HO(15,'RANK1)
380 FORMAT ('+',T12,10(13,7X))
390 FORMAT (' + ',1113,'TOTAL TOTAL1/IX,1113,'SIGNIF ALLPOINT'/l
IX,Til3,'POINT SOURCES1/IX,'SOURCE #•)
400 FORMAT (IX,'RECEP #')
410 FORMAT (IX,13,2A1,6P,10F10.3)
420 FORMAT ('+',T109,6P,2F10.3)
430 FORMAT (IX,'SOURCE #',T12,10(13,7X))
440 FORMAT('0',T25,A4,' SUMMARY CONCENTRATION TABLE(MICROGRAMS/M**3) '
1,5X,I2,'/',14,' : HOUR »,I2/1X)
450 FORMAT (IX,T2,'HOUR THETA SPEED MIXING TEMP STABILITY1/
11X,T9,'(DEC) (M/S) HEIGHT(M) (K) CLASS'/1X)
460 FORMAT (IX,T3,12,4F9.2,6X,II//)
470 FORMAT (13X,10I11)
480 FORMAT (' FINAL HT (M) MOF11.2)
490 FORMAT (' DIST FIN HT (KM)',10F11.3)
500 FORMAT ('0',T7,'RECEPTOR',T23,'EAST',T33,'NORTH1,T43,'RECEPTOR HT'
1,T61,'RECEPTOR',T78,'TOTAL FROM',T93,'TOTAL FROM',T106,'CONCENTRAT
2ION'/' ',T7,'NO. NAME',T22,'COORD',T33,'COORD1,T44,'ABV GRD (M)',T
359,'GRD-LVL ELEV',T77,'SIGNIF POINT',T93,'ALL SOURCES',Till,'RANK'
4/' ',T58,'(USER HT UNITS)',T80,'SOURCES'//)
510 FORMAT (1H ,I8,2A1,2X,2A4,2F10.2,F12.1,F20.1,6P,2F15.4,115)
520 FORMAT ('0',T22,12,'-HOUR AVERAGE ',A4,' CONTRIBUTION(MICROGRAMS/M
1**3) FROM SIGNIFICANT POINT SOURCES',5X,12, '/',13, ' START HOUR: «
2,I2//1X,T5,'RANK')
530 FORMAT ('0',T25,I2,'-HOUR AVERAGE ',A4,' SUMMARY CONCENTRATION TAB
1LE(MICROGRAMS/M**3)',5X,I2,V',I3,' START HOUR: ',I2//1X)
540 FORMAT ('CNTL1,IX,3F10.3,20X,14,2F10.1)
C
END
FUNCTION XSHORE(XO,YO,TRAD,XI,Yl,BA,EA,FETCH)
RADCON=0.017453293
IF ((Xl-XO).NE.O.) THEN
TSTANG=ATAN((Yl-YO)/(Xl-XO))/RADCON
ELSE
IF (Yl.GT.YO) TSTANG=90
IF (Yl.LT.YO) TSTANG»270
IF (Yl.EQ.YO) THEN
XSHORE=0.
RETURN
ENDIF
C-47
-------
ENDIF
IF (Xl.LT.XO) TSTANG-TSTANG+180
IF (TSTANG.LE.O) TSTANG«TSTANG+360
TSTANG-360-TSTANG+90
IF (TSTANG.LT.BA-fFETCH) TSTANG-TSTANG+360
IF (TRAD.LT.BA) TRAD-TRAD+360
IF (TRAD.GT.EA) TRAD-TRAD-360
IF (TSTANGcGT.EA-FETCH) THEN
IF (TSTANG.GT.EA+180-FETCH) THEN
ANG=BA
ELSE
ANG*EA
ENDIF
GO TO 100
ENDIF
IF (TSTANG.GT.TRAD) ANG-BA
IF (TSTANG.LT.TRAD) ANG-EA
IF (TSTANG.EQ.TRAD) THEN
XSHORE»SQRT((X1-XO)**2+(Y1-YO)**2)
RETURN
ENDIF
100 CONTINUE
ANG-360-ANG+90
WD-360-TRAD+90
IF (WD/180.EQ.INT(WD/180.)) THEN
V»YO
IF (ANG/90..EQ.INT(ANG/90.).AND.ANG/180..NE.INT(ANG/180.)) THEN
U-X1
GO TO 10
ENDIF
U-X1+(YO-Y1)*COTAN(ANG*RADCON)
GO TO 10
ENDIF
IF (WD/90.EQ.INT(WD/90,,) ) THEN
U=XO
IF (ANG/180..EQ.INT(ANG/180.)) THEN
V-Y1
GO TO 10
ENDIF
V-Y1+(XO-X1)*TAN(ANG*RADCON)
GO TO 10
ENDIF
IF (ANG/180..EQ.INT(ANG/180.)) THEN
V-Y1
U»XO+(Y1-YO)*COTAN(WD*RADCON)
GO TO 10
ENDIF
IF (ANG/90..EQ.INT(ANG/90.)) THEN
U-X1
V-YO+(Xl-XO)*TAN(WD*RADCON)
GO TO 10
ENDIF
U- (Yl-YO-»-XO*TAN (WD*RADCON) -X1*TAN (ANG*RADCON)) /
& (TAN(WD*RADCON)-TAN(ANG*RADCON))
V»Y1+(U-X1)*TAN(ANG*RADCON)
-------
10 XSHORE=SQRT((U-XO)**2+(V-YO)**2)
RETURN
END
SUBROUTINE SFM(DIST)
C
C SFM
C A SHORELINE FUMIGATION MODEL
C
C ORIGINAL AUTHOR: DR. P.K. MISRA
C AIR RESOURCES BRANCH
C ONTARIO MINISTRY OF ENVIRONMENT
C CANADA
C
C MODIFIED FOR INCORPORATION IN MPTER BY:
C SUZANNE TEMPLEMAN
C MARINE, EARTH AND ATMOSPHERIC SCIENCES DEPT.
C NORTH CAROLINA STATE UNIVERSITY
C RALEIGH, NC 27695-8208
C
C JUNE 1988
C
C SFM PROGRAM ABSTRACT:
C
C SFM IS AN ALGORITHM CODE WHICH PRODUCES ESTIMATES
C OF GROUND LEVEL POLLUTANT CONCENTRATION FOR USER-DEFINED
C RECEPTORS LOCATED DOWNWIND OF AN ELEVATED, SINGLE POINT
C SOURCE SITUATED AT THE SHORELINE.
C
C HOURLY SOURCE AND METEOROLOGICAL DATA AND RECEPTOR
C COORDINATES ARE REQUIRED AS INPUT.
C
C EXECUTION OF THE CODE IS APPROPRIATE PROVIDED THE
C FOLLOWING CONDITIONS ARE SATISFIED:
C
C 1) WIND DIRECTION AT THE SHORELINE SOURCE IS ONSHORE
C 2) IT IS DAYTIME AND THE SURFACE, SENSIBLE HEAT
C FLUX OVER LAND IS AT LEAST +5 W M[-2
C 3) LAPSE RATE OVER WATER IS STABLE
C
C THE USER IS REFERRED TO THE USER'S GUIDE FOR A MORE
C DETAILED EXPLANATION OF WHEN THE MODEL SHOULD BE APPLIED.
C
C THE PROGRAM CONSISTS OF FOUR MODULES:
C 1. MAIN MODULE
C 2. SUBROUTINE CALC
C 3. SUBROUTINE SIMP
C 4. FUNCTION EVAL
C
C************************************************** ************
C
C*********************** MAIN MODULE **************************
C THE MAIN MODULE CONTROLS METEOROLOGICAL AND SOURCE INPUT
C AND OUTPUT OF THE POLLUTANT CONCENTRATIONS FOR THE
C DESIGNATED RECEPTORS. VARIABLES WHICH REMAIN CONSTANT
C FOR ANY GIVEN HOUR OF INPUT ARE COMPUTED WITHIN THIS MODULE.
C-49
-------
C DEFINE VARIABLES:
C
C A * TIBL A FACTOR, GIVEN BY:
C ((2*HO)/(RHO*CSUBP*DTHDZ*UL))**0.5
C B - W*/UL
C RHO - ATMOSPHERIC DENSITY (KG M[-3)
C CSUBP - SPECIFIC HEAT AT CONSTANT PRESSURE (J K[-l KG[-1)
C CK VON KARMAN'S CONSTANT (0.4)
C CN BRUNT-VAISALA FREQUENCY (S[-l)
C DTHDZ = POTENTIAL TEMPERATURE GRADIENT OVERWATER (K M[-l)
C F - PLUME BUOYANCY (M4 S[-3)
C G - ACCELERATION DUE TO GRAVITY AT THE SURFACE (M S[-2)
C HO SURFACE SENSIBLE HEAT FLUX OVER LAND (W M[-2)
C HSTK - STACK HEIGHT (M)
C NR NUMBER OF RECEPTORS
C OWZ2,1 » HEIGHT OVER WATER AT LEVELS 2, 1 (M)
C PTOW2,1 - POTENTIAL TEMPERATURE OVER WATER AT
C LEVELS 2, 1 (K)
C PTMOL * MEAN POTENTIAL TEMPERATURE OVER LAND
C BETWEEN LEVELS 2, 1 (K)
C PTMOW - MEAN POTENTIAL TEMPERATURE OVER WATER
C BETWEEN LEVELS 2, 1 (K)
C Q - SOURCE STRENGTH (G S[-l)
C UL » MEAN WIND SPEED IN THE TIBL (M S[-l)
C US MEAN WIND SPEED IN THE STABLE LAYER (M S[-l)
C W* CONVECTIVE VELOCITY (M S[~l)
C X m DOWNWIND DISTANCE (M)
C***********************************************************
REAL XP,YP,MGCM
REAL A,B,CK,CN,DTHDZ,F,H,HO,HSTK,Q,PTMOL,PTMOW,UL,US
INTEGER NR
COMMON /SDMONE/XP,YP, A,B,UL,US,H,HSTK,CN,F,I,Q,MGCM
C
C->-> OPEN FILES FOR INPUT AND OUTPUT
C
C OPEN(11,FILE-'MET.DAT',STATUS-'OLD',FORM"•FORMATTED')
C OPEN(12,FILE-•XY.DAT•,STATUS='OLD',FORM-'FORMATTED')
C OPEN(15,FILE-'MSFM.OUT',STATUS-'NEW')
C
C DEFINE CONSTANTS
C
CK « 0.4
CSUBP - 1020.
G » 9.8
PI » 3.1415927
RHO « 1.188
C
C->-> READ IN METEOROLOGICAL AND STACK VARIABLES
C
C20 READ(11,22) UL,US,PTMOL,PTMOW,DTHDZ,HO,F,Q,HSTK,NR
C22 FORMAT(F5.2,1X,F5.2,1X,F6.2,1X,F6.2,1X,F7.4,1X,
C # F6.2,1X,F7.2,1X,F7.2,IX,F7.2,IX,13)
C
C->-> CALCULATE BRUNT-VAISALA FREQUENCY
C
C DTHDZ - (PTOW2 - PTOW1)/(OWZ2 - OWZ1)
C PTMOW - (PTOW2 - PTOWl)/2.
C CN » ((G/PTMOW)*DTHDZ)**0.5
C
C-*-*_*_*_*_*_*_*«*_*_*_.*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_ *_*_*_*
-------
c
c
c
c
c
c
c*>*>
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c*>*>
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
IF THE SURFACE, SENSIBLE HEAT FLUX IS NOT
A KNOWN INPUT, USE THE FOLLOWING STATEMENTS
TO GENERATE AN ESTIMATE. MODIFY THE READ
STATEMENT ACCORDINGLY.
DETERMINE SURFACE, SENSIBLE HEAT FLUX USING
THE PROFILE METHOD
DEFINE VARIABLES:
BETAO,1,2 -
CL
FTMOL
PTOL2,1
PTOW2,1
OLU2,1
OLZ2,1
OWZ2,1
PSIH1,2
PSIMO,1
RI
USTAR =>
TSTAR
ZO
ZR -
FUNCTION OF STABILITY PARAMETER Z/L
FOR AN UNSTABLE ATMOSPHERE
AT Z LEVELS 0,1,2
MONIN-OBUKHOV LENGTH (M)
MEAN POTENTIAL TEMPERATURE OVER LAND
BETWEEN LEVELS 2,1 (K)
POTENTIAL TEMPERATURE OVER LAND AT
LEVELS 2, 1 (K)
POTENTIAL TEMPERATURE OVER WATER AT
LEVELS 2, 1 (K)
WIND SPEED OVER LAND AT LEVEL 2, 1 (M S[-l)
HEIGHT OVER LAND AT LEVEL 2,1 (M)
HEIGHT OVER WATER AT LEVEL 2,1 (M)
UNIVERSAL FUNCTION IN THE DIABATIC SURFACE
LAYER TEMPERATURE PROFILE
UNIVERSAL FUNCTION IN THE DIABATIC SURFACE
LAYER WIND PROFILE
RICHARDSON NUMBER
FRICTION VELOCITY (M S[-l)
TEMPERATURE SCALE (K)
SURFACE ROUGHNESS LENGTH (M)
HEIGHT ASSOCIATED WITH RI (M)
FIRST CALCULATE THE RICHARDSON NUMBER
PTMOL - (PTOL2 - PTOLl)/2.
RI » (G/PTMOL)*
I ((PTOL2 - PTOL1)/(OLZ2 - OLZ1))
f /((OLU2 - OLU1)/(OLZ2 - OLZ1))**2.
ZR - (OLZ1*OLZ2)**0.5
CL - ZR/RI
BETAO « (1 - 16*ZO/CL)**0.25
BETA1 - (1 - 16*OLZ1/CL)**0.25
BETA2 « (1 - 16*OLZ2/CL)**0.25
PSIMO - 2*ALOG((1 -I- BETAO)/2.) +
# ALOG((1 4- BETAO*BETAO}/2.) -
f 2ATAN(BETAO) -I- PI/2.
PSIM1 * 2*ALOG((1 -f BETA1J/2.) +
# AL06((1 + BETAl*BETAl)/2.) -
* 2ATAN(BETA1) + PI/2.
PSIHl
PSIH2
2*ALOG((1
2*ALOG((1
-I- BETAl*BETAl)/2.)
+ BETA2*BETA2)/2.)
-------
C->-> CALCULATE FRICTION VELOCITY
C
C USTAR - (CK*U1)/(ALOG(OLZ1/ZO) - PSIM1 -I- PSIMO)
C
C->-> CALCULATE TEMPERATURE SCALE
C
C TSTAR - (CK*(PTOL2 - PTOL1))/
C # (ALOG(OLZ2/OLZ1) - PSIH2 + PSIH1)
C
C HO « - RHO*CSUBP*USTAR*TSTAR
C
C
c->->
C
C
C
c->->
C
C
C
C
c->->
C
C
C
C
c->->
C
C
C
C25
C27
C
C
C35
C37
C
C
C45
C47
C
C
CSS
C57
C
C
C65
C67
C
C
C75
C77
C
C
€85
C87
C
C
C95
DETERMINE THE TIBL A FACTOR
A - ((2.*HO)/(CSUBP*RHO*DTHDZ*UL))**0.5
DETERMINE THE TIBL HEIGHT FOR USE IN CALCULATING
CONVECTIVE VELOCITY (W*)
HT - A*(50QO.**0,5)
DETERMINE PART OF SIGMA Y EQUATION
FOR THE CONVECTIVS LAYER (B - W*/UL)
B = (((G*HO*HT)/(RHO*CSUBP*PTMOL))**.333)/UL
WRITE HEADER AND VALUES OF INPUT VARIABLES USED
WRITE (*, 25)
WRITE (15, 27)
FORMAT (7X,» ** SHORELINE FUMIGATION MODEL **')
FORMAT (8Xf '** SHORELINE FUMIGATION MODEL **')
WRITE(*,35)
WRITE (15, 37)
FORMAT(«0 ORIGINALLY DEVELOPED BY')
FORMAT (/« ORIGINALLY DEVELOPED BY')
WRITS (*, 45)
WRITE { 15 , 47)
FORMAT (IX,1 P.K. MISRA1)
FORMAT(1X, « P.K. MISRA1)
WRITE (*, 55)
WRITE (15, 57)
FORMAT (IX,1 ONTARIO MINISTRY OF ENVIRONMENT')
FORMAT (IX,1 ONTARIO MINISTRY OF ENVIRONMENT1)
WRITE (*, 65)
WRITE (15, 67)
FORMAT('0 MODIFIED FOR INCORPORATION IN MPTER BY1)
FORMAT (/' MODIFIED FOR INCORPORATION IN MPTER BY1)
WRITE (*, 75)
WRITE (15, 77)
FORMAT(1X,' S. TEMPLEMAN')
FORMAT (IX, « S. TEMPLEMAN1)
WRITE (*, 85)
WRITE (15, 87)
FORMAT (IX,1 NORTH CAROLINA STATE UNIVERSITY - JUNE 1988
FORMAT (IX,1 NORTH CAROLINA STATE UNIVERSITY - JUNE 1988
WRITE (*, 95)
WRITE (15, 97)
FORMAT ( ' 0 INPUT VARIABLES : ' )
C-52
-------
C97 FORMAT(/' INPUT VARIABLES:')
C WRITE (*,105) A
C WRITE(15,107) A
C105 FORMAT('0 THE TIBL A FACTOR IS:',F5.2,IX,'M[l/2')
C107 FORMAT(/' THE TIBL A FACTOR IS:',F5.2,IX,'M[1/2')
C WRITE (*,115) B
C WRITE(15,115) B
C115 FORMAT(IX1 THE VARIABLE B = W*/UL IS: »,F4.2)
C WRITE (*,125) UL
C WRITE (15,125) UL
C125 FORMAT (IX1 THE MEAN WIND SPEED IN THE TIBL IS: \F5.2,
C fix,'M S[-lf)
C WRITE (*,135) US
C WRITE (15,135) US
C135 FORMAT (IX1 THE MEAN WIND SPEED AT STACK HEIGHT IS:',F5.2
Cji * «/ I %j§ p r i | \
fflA, M b [_—l )
C WRITE (*,145) PTMOL
C WRITE (15,145) PTMOL
C3.45 FORMAT (IX1 THE POTENTIAL TEMPERATURE OVER LAND IS:1,
C #1X,F5.1,1X,'K')
C WRITE (*,155) DTHDZ
C WRITE (15,155) DTHDZ
C155 FORMAT(IX1 THE OVERWATER LAPSE RATE IS: •,F5.3,IX,'K M[-l
C WRITE (*,165) HO
C WRITE (15,165) HO
C165 FORMAT(1X' THE SURFACE, SENSIBLE HEAT FLUX IS:1, IX,
C #F4.0,1X,'W M[-2 ')
C WRITE (*,175) F
C WRITE(15,175) F
C175 FORMAT(1X' THE BUOYANCY PARAMETER IS:',F5.0,IX,'M4 S[-3')
C WRITE (*,185) Q
C WRITE(15,185) Q
C185 FORMAT(1X' THE EMISSION RATE IS:',F6.0,IX,'G S[-l')
C WRITE (*,195) HSTK
C WRITE (15,195) HSTK
C195 FORMAT(1X,' THE STACK HEIGHT IS:',F5.0,IX,'M1)
C
C->-> CALL TO CALC SUBROUTINE TO BEGIN CALCULATION
C OF GROUND LEVEL CONCENTRATIONS
C
CALL CALC(DIST)
C
C->-> WRITE CONCENTRATIONS FOR RECEPTOR LOCATIONS
C
C30 WRITE(*,205)
C WRITE(15,207)
C205 FORMATCO1 ,/• RECEPTOR LOCATIONS AND CONCENTRATIONS',
C #' IN MICROGRAMS M[-3')
C207 FORMAT(//' RECEPTOR LOCATIONS AND CONCENTRATIONS',
C #' IN MICROGRAMS M[-3')
C WRITE(*,215)
C WRITE(15,217)
C215 FORMATCO X LOCATION1,10X, ' Y LOCATION1 ,11X,
C I'MICROG M[-3')
C217 FORMAT(/' X LOCATION1,10X,' Y LOCATION1,11X,
C t'MICROG M[-3'/)
C WRITE(*/219)
C219 FORMAT(IX)
C
C DO 200 1=1,NR
C-53
-------
C WRITE(*,225) XP(I),YP(I),MGCM(I)
C WRITE(15,227) XP(I),YP(I),MGCM(I)
C225 FORMAT(3X,F6.0,15X,F6.0,13X,F9.3)
C227 FORMAT(3X,F6.0,15X,F6.0,13X,F9.3)
C200 CONTINUE
C40 WRITE (*,235)
C WRITE (15,237)
C235 FORMAT ('0 END OF MODEL RUN1)
C237 FORMAT {/' END OF MODEL RUN')
C STOP
C DEBUG UNIT(6),INIT,SUBCHK,SUBTRACE
RETURN
END
CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
SUBROUTINE CALC(DIST)
C
C THIS SUBROUTINE ACTS AS AN INTERMEDIARY BETWEEN THE
C MAIN MODULE AND SUBROUTINE SIMP. IN THIS ROUTINE
C RECEPTOR COORDINATES ARE READ IN AND GROUND LEVEL
C CONCENTRATIONS EVALUATED BY SUBROUTINE SIMP ARE
C MULTIPLIED BY THE SOURCE STRENGTH AND CONVERTED TO
C MICROC M[-3, CONCENTRATIONS ARE STORED IN THE COMMON
C BLOCK FOR OUTPUT IN MAIN.
C
C DEFINE VARIABLES;
C
C ACC - DESIRED ACCURACY OF ANSWER
C ANS - APPROXIMATE VALUE OF THE INTEGRAL OF F(X)
C FOR INTERVAL FROM LB TO XP1
C ANSI = APPROXIMATE VALUE OF THE INTEGRAL OF F(X)
C FOR THE INTERVAL FROM XP1 TO XP.
C AREA - APPROXIMATE, ABSOLUTE VALUE OF THE INTEGRAL OF
C F(X) FOR THE INTERVAL FROM LB TO XP
C F(X) - FUNCTION WHOSE INTEGRAL IS DESIRED
C IFLAG - 1 FOR NORMAL RETURN
C 2 IF IT IS NECESSARY TO GO TO 30 LEVELS.
C ERROR MAY BE UNRELIABLE IN THIS CASE.
C 3 IF MORI THAN 2000 FUNCTION EVALUATIONS.
C COMPLETE THE COMPUTATIONS AND NOTE THAT
C ERROR IS USUALLY UNRELIABLE.
C IFLAG MAY BE USED FOR DIAGNOSTICS.
C LB INITIAL X VALUE NEAR STACK
C UL MEAN WIND SPEED IN THE TIBL
C US MEAN WIND SPEED AT STACK HEIGHT IN STABLE AIR
C XP DOWNWIND DISTANCE FROM SOURCE
C XP1 - DOWNWIND DISTANCE AT WHICH PLUME LEVELS OFF
C YP HORIZONTAL DISTANCE
C
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
EXTERNAL EVAL
REAL XP,YP,MGCM,LB
INTEGER NR
COMMON/SDMONE/XP,YP,A,B,UL,US,H,HSTK,CN,F,I,Q,MGCM
C
C->-> INITIALIZE VARIABLES
C
ACC m 10.0E-6
LB » 10.00 4- DIST
IFLAG - 0.0
-------
c
C->~> LOOP THROUGH RECEPTOR POINTS
C
C DO 100 I-1»NR
C
C->-> READ IN RECEPTOR COORDINATES
C
C READ(12,15) XP(I),YP(I)
CIS FORMAT(F9.1,2X,F9.1)
C
C->-> IF X COORDINATE IS TOO SMALL, GO TO
C NEXT RECEPTOR
C
IF(XP.GT.0.001) GOTO 10
GOTO 100
C
C->-> INITIALIZE VALUES OF THE INTEGRAL
C
10 ANS * 0.0
ANSI =0.0
C
C->-> DETERMINE TRAVEL DISTANCE UNTIL PLUME LEVELS OFF
C
XP1 = DIST+(4.50/CN)*US
XP=XP+DIST
C
C->-> DETERMINE WHETHER DISTANCE OF RECEPTOR DOWNWIND OF
C SOURCE EXCEEDS TRAVEL DISTANCE UNTIL PLUME LEVELS OFF
C
IF(XP.GE.XPl) GOTO 20
C
C->-> APPLY SIMPSON'S RULE OVER THE INTERVAL FROM INITIAL
C POINT (LB) TO RECEPTOR POINT (XP)
C
CALL SIMP(EVAL,LB,XP,ACC,ANS,ERROR,AREA,IFLAG)
C
GOTO 30
C
C->-> RECEPTOR POINT IS IN REGION WHERE PLUME HAS LEVELED
C OFF. APPLY SIMPSON'S RULE IN TWO STEPS. FIRST APPLY
C OVER THE INTERVAL FROM INITIAL POINT (LB) TO XP1.
C SECOND APPLY OVER THE X DISTANCE FROM XP1 TO RECEPTOR
C POINT (XP). USING TWO CALLS TO SIMP HERE SAVES
C ON COMPUTATION TIME.
C
20 CALL SIMP(EVAL,LB»XP1,ACC,ANS,ERROR,AREA,IFLAG)
CALL SXMP(EVAL,XP1,XP,ACC,ANSI,ER!OR,AREA,IFLAG)
C
C->-> SUM VALUES OF THE INTEGRAL FOR THE LEFT (ANS) AND
C RIGHT (ANSI) HALVES OF THE INTERVAL
C
30 ANS - ANS-i-ANSl
C
C->-> MULTIPLY BY SOURCE STRENGTH AND CONVERT ANSWER
C TO MICRQGRAKS PER M3
C
MGCM - ANS*Q/1.E-06
C
100 CONTINUE
200 RETURN
C-55
-------
C DEBUG UNIT (6),SUBCHK,INIT,SUBTRACE
END
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
SUBROUTINE SIMP(EVAL,EA,EB,ACC,ANS,ERROR,AREA,IFLAG)
C
C SIMP IS AN ITERATIVE CODE BASED ON SIMPSON'S RULE,
C A NUMERICAL TECHNIQUE DESIGNED TO EVALUATE THE
C DEFINITE INTEGRAL OF A CONTINUOUS FUNCTION WITH
C FINITE LIMITS OF INTEGRATION.
C
C DEFINE VARIABLES:
C
C ACC - DESIRED ACCURACY OF ANS.
C ANS - APPROXIMATE VALUE OF THE INTEGRAL OF F(X)
C FROM EA TO EB
C AREA - APPROXIMATE, ABSOLUTE VALUE OF THE INTEGRAL
C F(X) FROM EA TO EB
C EA,EB » LOWER AND UPPER LIMITS OF INTEGRATION
C ERROR - ESTIMATED ERROR OF ANSWER
C EVAL(X) - VALUE OF THE INTEGRAL EVALUATED AT X
C IFLAG » 1 FOR NORMAL RETURN
C 2 IF IT IS NECESSARY TO GO TO 30 LEVELS OR
C USE LENGTH. ERROR MAY BE UNRELIABLE
C IN THIS CASE.
C 3 IF MORE THAN 2000 FUNCTION EVALUATIONS
C THEN COMPLETE THE COMPUTATIONS. ERROR
C IS USUALLY UNRELIABLE.
C IFLAG .MAY BE USED FOR DIAGNOSTICS.
C U - UNIT ROUND-OFF
C
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
DIMENSION FV(5),LORR(30),FIT(30),F2T(30),F3T(30),
#DAT(30) /ARESTT(30) ,ESTT(30) ,EPST(30) , PSUM(30)
REAL EVAL
C
C->-> SET U TO APPROXIMATELY THE UNIT ROUND-OFF
C
U * 9.0E-7
C
C->-> INITIALIZE VARIABLES
C
FOURU - 4.0*U
IFLAG - 1
EPS m ACC
ERROR-0.0
AREA - 0.0
AREST - 0.0
LVL = 1
LORR(LVL) - 1
PSUM(LVL) - 0.0
ALPHA - EA
DA » EB-EA
C
C->-> DETERMINE VALUES OF THE FUNCTION AT THE ENDS
C AND MID-POINT OF THE INTERVAL
C
FV(1) = EVAL(ALPHA)
FV(3) - EVAL(ALPHA+0.5*DA)
FV(5) - EVAL(ALPHA+DA)
C-56
-------
c
C->-> START SUMMATION OF NUMBER OF FUNCTION EVALUATIONS
C
KOUNT - 3
WT - DA/6.0
C
C->-> DETERMINE ESTIMATE OF THE INTEGRAL FOR THE INTERVAL
C BETWEEN THE DESIGNATED ENDPOINTS
C
1ST - WT*(FV(1)+4.0*FV(3)+FV(5))
10 DX «• 0.5*DA
C
C->-> DETERMINE VALUES OF THE FUNCTION AT THE ONE QUARTER
C AND THREE QUARTER POINTS OF THE INTERVAL
C
FV(2) - EVAL(ALPHA+0.5*DX)
FV(4) - EVAL(ALPHA+1.5*DX)
KOUNT - KOUNT-l-2
WT - DX/6.0
C
C->-> DETERMINE ESTIMATES OF THE AREA UNDER THE LEFT HALF
C AND RIGHT HALF OF THE CURVE THEN SUM
C
ESTL * WT*(FV(1)+4.0*FV(2)+FV(3))
ESTR » Wr*(FV(3)+4.0*FV(4)+FV(5))
SUM - ESTL+ESTR
C
C->-> DETERMINE ESTIMATES OF THE AREA UNDER THE CURVE
C BETWEEN THE DESIGNATED ENDPOINTS BASED ON THE
C ABSOLUTE VALUES OF THE FUNCTION EVALUATIONS
C
. ARESTL - WT*(ABS(FV(1))+ABS(4.0*PV(2))+ABS(FV(3) ))
ARESTR * WT*(ABS{FV(3))+ABS<4.0*FV(4»+ABS(FV(5)))
AREA » AREA+ ( (ARESTL+ARESTR) -AREST)
DIFF » EST-SUM
C
C->-> IF ERROR IS ACCEPTABLE GO TO 20. IF INTERVAL IS TOO
C SMALL OR TOO MANY LEVELS OR TOO MANY FUNCTION
C EVALUATIONS, SET A FLAG AND GO TO 20 ANYWAY.
C
IF(ABS(DIFF).LE.EPS*ABS(AREA)) GOTO 20
IF(ABS(DX).LE.FOURU*ABS(ALPHA)) GOTO 50
IF(LVL.GE.30) GOTO 50
IF(KOUNT.GE.2000) GOTO 60
C
C->-> STORE INFORMATION TO PROCESS RIGHT HALF OF THE
C CURVE. NOW, USING A GREATER NUMBER OF SUB-INTERVALS,
C RECALCULATE AREA UNDER THE LEFT HALF OF THE CURVE.
C
LVL - LVL+1
LORR(LVL) - 0
FIT(LVL) - FV(3)
F2T(LVL) - FV(4)
F3T(LVL) » FV(5)
DA - DX
DAT(LVL) - DX
AREST - ARESTL
ARESTT(LVL) - ARESTR
EST = ESTL
ESTT(LVL) • ESTR
C-57
-------
EPS * EPS/1.4
EPST(LVL) = EPS
FV(5) - FV(3)
FV(3) * FV(2)
GOTO 10
C
C->-> ACCEPT APPROXIMATE INTEGRAL SUM. IF LEFT HALF
C OF CURVE WAS PROCESSED, MOVE TO RIGHT HALF.
C IF RIGHT HALF OF CURVE WAS PROCESSED, ADD RESULTS
C TO FINISH. LORR (A MNEMONIC FOR LEFT OR RIGHT)
C TELLS WHETHER INTERVAL IS RIGHT OR LEFT AT EACH
C LEVEL.
C
20 ERROR - ERROR+DIFF/15.0
30 IF(LORR(LVL).EQ. 0) GOTO 40
SUM - PSUM(LVL)+SUM
LVL - LVL-1
IF(LVL.GT.l) GOTO 30
ANS - SUM
RETURN
C
C->-> MOVE RIGHT. RESTORE SAVED INFORMATION TO PROCESS
C RIGHT HALF OF INTERVAL.
C
40 PSUK(LVL) - SUM
LORR(LVL) - 1
ALPHA - ALPHA+DA
DA » DAT(LVL)
FV(1) « FIT(LVL)
FV(3) * F2T(LVL)
FV(5) * F3T(LVL)
AREST *• ARESTT(LVL)
EST - ESTT(LVL)
EPS = EPST(LVL)
GOTO 10
C
C->-> ACCEPT 'POOR1 VALUE. SET APPROPRIATE FLAGS.
C
50 IFLAG - 2
GOTO 20
60 IFLAG * 3
GOTO 20
C DEBUG UNIT (6),SUBCHK,INIT,SUBTRACE
END
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
FUNCTION EVAL(X)
C
C FUNCTION EVAL RETURNS A VALUE OF THE INTEGRAL FOR (X),
C THE DESIGNATED POINT ON THE INTERVAL OF INTEGRATION.
C THE FUNCTION RETURNS THE VALUE TO SUBROUTINE SIMP
C THROUGH THE FUNCTION NAME.
C
C DEFINE VARIABLESJ
C
C CA « COEFFICIENT IN PLUME RISE EQUATION
C CYS - CONSTANT FOR SIGMA Y IN STABLE AIR
C CZS =• CONSTANT FOR SIGMA Z IN STABLE
C BL - TIBL HEIGHT AT DESIGNATED POINT ON
C INTERVAL OF INTEGRATION
C-58
-------
C BL1 - TIBL HEIGHT AT RECEPTOR POINT
C FN = TIME AFTER WHICH PLUME HAS LEVELED OFF
CD- TRAVEL TIME - X/US
C H * PLUME HEIGHT
C VARYL » SIGMA Y IN CONVECTIVE LAYER
C VARYS m SIGMA Y IN STABLE LAYER
C VARZ ~ SIGMA Z IN STABLE LAYER
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
REAL XP,YP,MGCM,EVAL,MF
COMMON/SDMONE/XP,YP,A,B,UL,US,H,HSTK,CN,F,I,Q,MGCM
C
C->-> DEFINE CONSTANTS
C
CA * 1.6
CYS =0.67
CZS =0.40
C
C->-> REEXPRESS FREQUENTLY USED CALCULATIONS
C
FU » F/US
FN - 4.50/CN
IFfX.LE.0.001) GOTO 100
D - X/US
C
C->-> DETERMINE SIGMA Y IN STABLE AIR
C
VARYS * CYS*(D**(2./3.))*(FU**(l./3.))
C
C->-> DETERMINE SIGMA Y IN THE UNSTABLE AIR
C
VARYL » B*(XP-X)/3.0
C
C->-> DETERMINE TIBL HEIGHT AT EVALUATION POINT (X)
C AND AT RECEPTOR POINT (XP)
C
BL - A*SQRT(X)
BL1 = A*SQRT(XP)
C
C->-> DETERMINE FIRST PART OF CONCENTRATION EQUATION
C
MF - l./(2.*3.14159*BLl*UL)
C
C->-> DETERMINE IF TRAVEL TIME IN STABLE AIR EXCEEDS
C TIME AFTER WHICH PLUME HAS LEVELED OFF. IF YES,
C FINAL PLUME RISE CALCULATIONS APPLY.
C
IF(D.GT.FN) GOTO 10
C
C->-> DETERMINE PLUME HEIGHT USING GRADUAL PLUME
C RISE EQUATION
C
H - (CA*(FU**(l./3.))*(D**(2./3.))) + HSTK
C
C ADDED 9-6-88 TO ACCOUNT FOR MPTER/MISRA PLUME RISE DIFFERNCES
C
H - AMIN1(H,2.6*(FU/CN**2.)**.3333+HSTK)
C
C->-> DETERMINE SIGMA Z IN STABLE AIR FOR GRADUALLY
C RISING PLUME
C
C-59
-------
VAR1 - CZS*(D**(2./3.))*(FU**(1./3.)J
C
C->-> DETERMINE VALUE OF DERIVATIVE IN
C CONCENTRATION EQUATION FOR RISING PLUME
C
DERIV - (-l./6.)*(A*UL)/(CZS*(F**(l./3.)))
f*(X**(-7./6.)) +
IfHSTK * UL)/(CZS*(F**(l./3.)))*(2./3.)*(X**(-5./3.))
C
C IF DISTANCE IS LARGE, TREAT AS LEVEL PLUME
C
IF (DERIV.LE.O.) GO TO 10
C
GO TO 20
C
C->-> PLUME HAS LEVELED OFF IN STABLE AIR
C
C->-> DETERMINE SIGMA 2 IN STABLE AIR FOR A LEVEL
C PLUME
C
10 VARZ - 1.1*{FU/(CN*CN))**{!./3.)
C
C->-> DETERMINE VALUE OF DERIVATIVE IN
C CONCENTRATION EQUATION FOR LEVEL PLUME
C
DERIV - A/(2.*SQRT(X)*VARZ)
C
20 VARZS - VARZ*VARZ
SIGS - (VAR¥S*VARYS+VAR¥L*VAR¥L)
BLDIFS - (BL-H)*(BL-H)
C
C->-> DETERMINE VALUE OF EXPONENTIAL
C IN CONCENTRATION EQUATION
C
Cl * -.5*(BLDIFS/VARZS+¥P*¥P/SIGS)
C
C->-> TAKE ALOG OF EXPRESSION INSIDE
C INTEGRAL OF CONCENTRATION EQUATION
C
C » ALOG(DERIV}+C1-(ALOG(SIGS)}/2.0
C
IF(ABS(C).GT.70.0) GOTO 100
C
C->-> TAKE EXPONENTIAL OF EXPRESSION
C INSIDE INTEGRAL OF CONCENTRATION EQUATION
C
EVALL - EXP(C)
C
C->-> DETERMINE VALUE OF THE CONCENTRATION
C EQUATION (MINUS MULTIPLICATION B¥
C THE SOURCE STRENGTH)
C
EVAL - EVALL*MF
GOTO 30
100 EVAL « 0.
30 CONTINUE
C DEBUG UNIT(6),SUBCHK,INIT,SUBTRACE
END
READY
C-60
-------
APPENDIX D
SDM EXAMPLE CASE
INPUT FILE
D-l
-------
Each line shown below represents a card image as presented in Section 4,
Tables 4-1 through 4-11. See the text for an explanation.
1KJ52827I SDM.INPUT(CLEVTEST)
***********«*************************>*********************************•*********
SHORELINE DISPERSION TEST CASE *3
******
73.001
1.0.1.
10. .0.
1
2
3
4
5
6
7
8
9
ENDP
1
2
3
4
5
6
7
a
9
ENDS
14620.
.*...*.*.**.**.» CLEvELAND
.01. 8760. 1.3. 1.9. 0.1.. 3048.
1.0,0,0, 0.1, 1.1. 1.1. 1,1. 1.1
07.0.07.0.1.0.15 0.35.0.55.
444 69 4604.38 1
444.69 4604.38 1
444.69 4604.38 1
451.86 4604.33 1
451.86 4604.38 1
451.86 4604.38 1
453 75 4610.94 1
453 75 4610.94 1
453.75 4610.94 1
452. 5 4612.5
452.5 4612.5
4S2.5 4612. S
452.5 4612.5
4S2.5 4612.5
452.2 4612.5
452.5 4612.5
452. 5 4612.5
452.5 4612.5
73.14733.73
435.000 4570.000
435.000 4530.000
435.000 4590.000
435.000 4600 000
445 -COO 4570.000
445.000 4580.000
445.000 4590.000
445.000 4600.000
450.000 4570.000
450.000 4560.000
450.000 4590.000
450.000 4600.000
450.000 4605.000
450.000 4610,000
455.000 4570.000
455.000 4580.000
455.000 4590.000
455.000 4600.000
455.000 4605.000
455.000 4610.000
455.000 4615.000
465.000 4570.000
465.000 4S80.000
465.000 4590.000
465.000 4600.000
465.000 4605.000
465.000 4610.000
MET
0
.1.0
0.5.
.00
00
,00
.00
.00
.00
,00
.00
.00
223
223
223
223
223
223
223
223
223
DATA - 1973 •••««•••«»
.0.0.0,0.0,0
0,5.0.5,0.5.0.0.0.0.10
0.0 30.00 394.0
0.0 50.00 394.0
0.0 100.00 394.0
C.O 30.00 394.0
0.0 50.00 394.0
0.0 100.00 394.0
0.0 30 00 394.0
C.O 50,30 394.0
0.0 100.00 394.0
407 20
407 20
407 20
437 20
407 20
407 20
407 20
407 20
407 20
650
640
610
600
670
65C
640
620
690
656
620
630
610
600
690
690
640
630
620
600
600
690
680
670
650
630
650
1.83 0.62 600
1.83 0.62 600
1.83 0.62 600
1.83 0.62 600
1.83 0.62 600
1 83 0.62 600
1.83 0.62 600
1.83 0 62 600
1.83 0.62 600
D-2
-------
465.000 4615.000 620
465.000 4620.000 600
475.000 4570.000 690
47S.OOO 458Q.QQO 690
475.000 4590.000 660
475.000 4600.000 650
475.000 4605.000 640
475.000 4610.000 650
475.000 4615.000 630
475.000 4620.000 620
ENOREC
D-3
-------
APPENDIX E
EXAMPLE SDM CASE OUTPUT
E-l
-------
J E S 2 JOB LOS •- SYSTEM E P A 2 -- NODE MCCIBH1
JOS 5063 IEF097I XXX*X • USER XXX ASSIGNED
17.34.10 JOS 5063 ICH70001I XXX LAST ACCESS AT 15:18:00 OK TUESDAY, DECEMBER 13, 1988
17.34.10 JOB 5063 $HASP373 XXXXX STARTED - INIT 90 - CLASS F • SYS EPA2
18.19.45 JOS 5063 NCCOOSI * J08XXXXX ENDED 12/13/88 AT 18:19:45, PRTY»02, CC'OOOO
18.19.45 JOB S063 $HASP395 XXX XX* ENDED
JES2 J08 STATISTICS
13 DEC 88 JOB EXECUTION DATE
25 CARDS READ
970 STSOUT PRINT RECORDS
0 SYSOUT PUNCH RECORDS
108 SYSCUT SPOOL KBYTES
45.58 MIKUTES EXECUTION TIKE
1 //XXXXXJOB CTIERSPCtO,M04S},'PEI',l>RTY*2,TmE-(1S,30},IWTlFY»XXX JOB S063
"•ROUTE PRINT MOUJ
*#*
*** EXECUTE PROGRAM
•**
2 //STEP1 EXEC PGN*SON
3 //JTEPLIS 00 DSN»VGOTIER.X.LOAC,OISP«tSHR
»**
»** INPUT FILIS
»**
4 //FT05F001 DO OSH««QTtER.SOK,IHPOTA
8 //FT20F001 00 OSH-V50TIER.SO«.SHORE(CLEVT£ST),DISP«=SHR
DO QSN*V&OTIER.SON.PART1AUFILEMAME),0!SP*SHR
00 OSNayCDTlER.SON.HOURCONC(FILENAME),DISP«SHR
*-*FT13F001 00 OSH-VGDTIER,SOK.AVEPER(FILEKA«E),DISP-SHR
•••FT14F001 00 OSH-VGDT1ER.SOH.TEWCFILEMAI«),OISP*SHR
9 //SYSPRIMT 00 SYSOUT'A
ICH70001I *XX LAST ACCESS AT 15:18:00 ON TUESDAY. DECEMBER 13, 1988
IEF236I ALLOC, FOP, XXX ST^tSTEP!
IEFZ371 985 ALLOCATED TO STEPL1B
IEF237I 91A ALLOCATED TO SYS00044
IEF237I 980 ALLOCATED TO FT05F001
IEF237I 363 ALLOCATED TO FT11F001
1EF237I 881 ALLOCATED TO SYS00046
1EF237I 843 ALLOCATED TO FT19F001
IEF237I JES2 ALLOCATED TO FT06F001
IEF237I 852 ALLOCATED TO FT20F001
IEF237I JES2 ALLOCATED TO SYSPRINT
1EF142IXXXXXSTEP1 • STEP WAS EXECUTED • COM CODE 0000
IEF28SI VGDTIER.X.LOAD KEPT
IEF285I VOL SER NOS* USR088.
IEF285I CATALOG.VUCAT048 KEPT
1EF28SI VOL SER NOS* UCAT40.
1EF28SI VCOTIER.SON.INPUT KEPT
IEF285I VOL SER NOS* USR096.
IEF285I OAHS.PREP73.S14820.U14733 KEPT
1EF285I VOL SER NOS> USR065.
IEF285I CATALOG.VUCAT01B KEPT
-------
JEF2851 VSOTIER.SOM.TGWER
1EF285I VOL SER NOS* USR051.
IEF285I JES2.J0805063.S0000101
{EF285I VGOTIER.SOM. SHORE
!Er285t VOL SER HOS» USROS8.
IEF285I JESZ. 40805063, 50000102
NCC950I »«•****'•-*»«**«*«* U.S. EPA SYSTEM EPA2 -
MCC949! •
MCC9SOI » JOB XXX XX STEP STEP1
MCC949I *
«CC9SOt * START TUESDAY 12/13/88 AT 17:34:10
MCC950! * 45:34.80 ELAPSED 6:58.95 TCB 0:
MCC9491 *
MCC949I *
NCC950I * MEMORY: OK VIRTUAL ADDRESS SPACE.
KCC9S01 * EXCPS! 161 OA, 0 NT,
MCC950I * EXCPS BY UNIT: 985: 18 91A:
MCC950I * 863: 28 881: 0 843:
MCC950C * 852: 21 000: 0 91A:
MCC950! *
NCC950I * PAGES IN: 0 VIO 0
WCC950I * PAGES OUT: 0 VIO 0
NCC950I * 51100 PAGE SECONDS
NCC9C9I •
MCC9501 * CPU :• 6:59.00 AT S775/HR
MCC950I * EXCPS:- 161 AT S.45/1000
MCC95QI * TOTAL COST FOR STEP STEP1 AT PRTY»2
NCC9A9'I **^ii'*
-------
THIS RUN OF SOM -VERSION 88204 IS FOR THE POLLUTANT 502 FOR *** 1-HOUR PERIODS.
CONCENTRATION ESTIMATES IEGIN ON HOUR- 1, JULIAN DAT- 1. YEAR-1973.
A FACTOR OF f.0000000 HAS SEEN SPECIFIED TO CONVERT USER LENGTH UNITS TO KILOMETERS.
9 SIGNIFICANT SOURCES ARE TO BE CONSIDERED.
THIS RUN WILL NOT CONSIDER ANY POLLUTANT LOSS.
HICK-FIVE SUMMARY CONCENTRATION TABLES WILL IE OUTPUT FOR 6 AVERAGING PERIODS.
AVC TIMES OF 1,3,8, AND 26 HOURS ARE AUTOMATICALLY DISPLAYED.
A FACTOR OF 0.3048000 HAS BEEN SPECIFIED TO CONVERT USER HEIGHT UNITS TO METERS.
OPTION OPTION LIST OPTION SPECIFICATION : 0' IGNORE OPTION
1* USE OPTION
TECHNICAL OPTIONS
1 TERRAIN ADJUSTMENTS '
2 DO NO? INCLUDE STACK DOUNUASH CALCULATIONS 0
3 00 NOT INCLUDE GRADUAL PLUME RISE CALCULATIONS 1
4 CALCULATE INITIAL PLUME SIZE • 1
1MPUT OPTIONS
5 READ NET DATA FROM CARDS 0
6 READ HOURLY EMISSIONS 0
7 SPECIFY SIGNIFICANT SOURCES 0
8 READ RADIAL DISTANCES TO GENERATE RECEPTOR 0
PRINTED OUTPUT OPTIONS
9 DELETE EMISSIONS WITH HEIGHT TABLE 1
10 DELETE MET DATA SUMMARY FOR AVG PERIOD 1
11 DELETE HOURLY CONTRIBUTIONS 1
12 DELETE MET DATA ON HOURLY CONTRIBUTIONS 1
13 DELETE FINAL PLUME RISE CALC ON HRLY CONTRIBUTIONS 1
14 DELETE HOURLY SUMMARY 1
15 DELETE MET DATA ON HRLY SUMMARY 1
16 DELETE FINAL PLUME RISE CALC ON HRLY SUMMARY 1
1? DELETE AVG-PERIOQ CONTRIBUTIONS 1
18 DELETE AVERAGING PERIOD SUMMARY 1
19 DELETE AVG CONCENTRATIONS AND HI-5 TABLES 0
OTHER CONTROL AND OUTPUT OPTIONS
20 RUN IS PART OF A SEGMENTED RUN 0
21 WRITE PARTIAL CONC TO DISK OR TAPE 0
22 WRITE HOURLY CONC TO DISK Oft TAPE 0
23 WRITE AVG-PERIOO CONC TO DISK OR TAPE 0
24 PUNCH AVG-PERIOO CONC ONTO CARDS 0
DEFAULT OPTION
25 USE DEFAULT OPTION 0
ANEMOMETER HEIGHT IS: 10.00
EXPONENTS FOR POWER- LAW WIND INCREASE WITH HEIGHT ARE:0.07,0.07,0.10,0.15,0.35,0.55
TERRAIN ADJUSTMENTS ARE; 0.500,0.500,0.500,0.500,0.000,0.000
POINT SOURCE INFORMATION
SOURCE EAST NORTH S02CG/SEQ PART(G/SEC) STACK STACK STACK STACK POTEN. IMPACT EFF GRO-LVL BUC
COORD COORD EMISSIONS EMISSIONS HT(M) TEMP (1C) DIAN(M)VEL(M/SEC)(M!CRO G/M**3) HT(H) ELEV
(USER UNITS) USER HT M*<
UNITS
-------
2 2
3 3
4 4
5 5
6 6
7 7
8 8
9 9
SIGNIFICANT S02
444.69
444.69
451.88
451.88
451.88
453.75
453.75
453.75
4604.38 1.00
4604.38
4604.38
4604.38
4604.38
4610.94
4610.94
4610.94
.00
.00
.00
.00
.00
.00
.00
0.00
0.00
0.00
0.00
0.00
0.00
0.00
0.00
SO. 00
100.00
30.00
50.00
100.00
30.00
50.00
100.00
394.00
394.00
394.00
394.00
394.00
394.00
394.00
394.00
1.83
1.83
1.83
1.83
1.83
1.83
1.83
1.83
0.62
0.62
0.62
0.62
0.62
0.62
0.62
0.62
18.92
5.95
42.10
18.92
5.95
42.10
18.92
5.95
58.72
108.72
38.72
58.72
108.72
38.72
58.72
108.72
600.00
600.00
600.00
600.00
600.00
600.00
600.00
600.00
POINT SOURCES
RANK
CHI -MAX
SOURCE NO.
1 42.10 1
2 42.10 4
3 42.10 7
4 18.92 2
5 18.92 5
6 18.92 8
7 5.95 3
8 5.95 6
9 5.95 9
ADDITIONAL INFORMATION ON SOURCES.
EMISSION INFORMATION FOR 9 (NPT) POINT SOURCES HAS BEEN INPUT
9 SIGNIFICANT POINT SOURCES(NSIGP) ARE TO BE USED FOR THIS RUM
THE ORDER OF SICNlFICANCEdHW) FOR 25 OR LESS POINT SOURCES USED IN THIS RUN AS LISTED BY POINT SOURCE NUMBER:
147258369
SURFACE MET DATA FROM STATION(ISFCO) 14820, YEAR(ISFCYR) 1973
MIXING HEIGHT DATA FROM STATION(IMXO) 14733, YEAR(IMXTR) 1973
RECEPTOR INFORMATION
RECEPTOR IDENTIFICATION EAST NORTH RECEPTOR HT RECEPTOR GROUND LEVEL
COORD COORD ABV LOCAL ORD LVL ELEVATION
(USER UNITS) (METERS) (USER HT UNITS)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
435.000
435 .000
435.000
435.000
445.000
445.000
445.000
445.000
450.000
450.000
450.000
450.000
450.000
450.000
455.000
455.000
455.000
455.000
455.000
4570.000
4580.000
4590.000
4600.000
4570.000
4580.000
4590.000
4600.000
4570.000
4580.000
4590.000
4600.000
4605.000
4610.000
4570.000
4580.000
4590.000"
4600.000
4605.000
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
650.0
640.0
610.0
600.0
670.0
650.0
640.0
620.0
690.0
656.0
620.0
630.0
610.0
600.0
690.0
690.0
640.0
630.0
620.0
-------
11
22
22
24
25
26
27
28
29
30
31
32
33
34
35
3d
37
455.000 4415.000 0.0
465.000 4570.000 0.0
465.000 4580.000 0.0
465.000 4590.000 0.0
465.000 4600.000 0.0
465.000 4605.000 0.0
465.000 4610.000 0,0
465.000 461S.OOO 0.0
465.900 4620,000 0.0
475.000 4570.000 0,0
475.000 4530.000 0.0
475.000 4590.000 0.0
475.000 4600.000 0.0
475.000 4605.000 0.0
475,000 4610.000 0.0
475.000 4615.000 0.0
475.000 4620.000 0.0
600.0
690.0
680.0
670.0
650.0
630.0
630.0
620.0
600.0
690.0
690.0
660.0
650.0
640.0
650.0
630.0
620.0
* WE ASTERISK I MO I GATES THAT THE ASSOCIATED RECEPTOR(S) HAVE A GROUND LEVEL ELEVATION LOWER THAN THf LQUEST SOURCE SASE El
CAUTION SHOULD SE USED IN INTERPRETING CONCENTRATIONS FOR THESE RECEPTORS.
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE S
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE t
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE S
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
OAT 68SHOREL1NE FUMIGATION HOURS
DAY 68SHORELINE FUMIGATION HOURS
OAT 68SMORELINE FUMIGATION HOURS
DAT 68SHOREUNE FUN I GAT ION HOURS
DAT 68SN08EUNE FUMIGATION HOURS
DAT 68SH08EUNE FUMIGATION HOURS
OAT 68SHQRELINE FUMIGATION HOURS
DAY 68SHORELINE FUMIGATION HOURS
DAY 68SHORELINE FUMIGATION HOURS
DAY 97SHOREUNE FUMIGATION HOURS
DAY 97SNOREUNE FUMIGATION HOURS
DAY 97SHQREUNE FUMIGATION HOURS
DAY 97SHOREUNE FUMIGATION HOURS
DAY 97SHOREUNE FUMIGATION HOURS
DAY 97SHOREL1NE FUMIGATION HOURS
DAY 97SHQRELINE FUMIGATION HOURS
DAY 97SHOREUNE FUMIGATION HOURS
DAY 97SHORELINE FUMIGATION HOURS
OAY104SHOREUNE FUMIGATION HOURS
OAY104SHOREUNE FUMIGATION HOURS
DAY104SHORELINE FUMIGATION HOURS
DAY104SHORELINE FUMIGATION HOURS
OAY104SHCREUNE FUMIGATION HOURS
OAY1Q4SHOREUNE FUMIGATION HOURS
OAT104SHORELINE FUMIGATION HOURS
OAY104SHOREUNE FUMIGATION HOURS
OAV104SHORELIHE FUMIGATION HOURS
OAV114SHOREUNE FUMIGATION HOURS
DAY114SKOREUNE FUMIGATION HOURS
DAtlUSHOtEUNE FUMIGATION HOURS
DAY114SHORELINE FUMIGATION HOURS
DAY114SHOREUNE FUMIGATION HOURS
(S) HAVE
GROUND LEVEL ELEVATIONS
ABOVE
THIS RECEPTOR. A SERIES Of ASTERISKS
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
0
0
Q
0
0
0
0
Q
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
THE LOWEST STACK
WILL
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
INSTEAD APPEAR
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
Q
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
Q
0
a
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
TOP
IN
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
a
0
0
.
THE
Q
0
0
0
0
0
0
0
0
0
-------
SOURCE 7
SOURCE B
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 3
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 3
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
0AV114SHOREUNI FUMIGATION
DAY114SH0REUNE FUMIGATION
DAY114SHORELINE FUMIGATION
DAY129SHOREUNE FUMIGATION
OAY129SHQREUNE FUMIGATION
OAY129SHOREUNE FUMIGATION
DAY129SHOREL1HE FUMIGATION
OAY129SHOREUNE FUMIGATION
DAY129SHORELIME FUMIGATION
DAY129SHORELINE FUMIGATION
DAY129SHOREUNE FUMIGATION
DAY129SMORELIN6 FUMIGATION
DAyi38SHQR£lI« FUMIGATION
DAY138SHOREUNE FUMIGATION
OAinSSSHCRELHK FUMlGATfON
OAY1SSSHOREUNE FUMIGATION
DAY158SH08EUNE FUMIGATION
DAY138SMORELINI FUMIGATION
OAY15BSHORE1.1KE FUMIGATION
DAY13SSHOR6UNE FUMIGATION
OAY13SSHORELIN6 FUMIGATION
DAY U1 SHORELINE FUMIGATION
OAM41 SHORELINE FUMIGATION
DAY 141 SHORELINE FUMIGATION
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
0
0
0
0
a
0
0
0
0
0
0
a
0
0
0
0
0
0
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
a
0
0
0
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
a
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
a
0
0
a
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0 C
0 0
0 0
0 0
0 0
0 0
0 C
0 C
0 0
0 C
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
Q 0
0 0
0 0
0 0
0 0
0 0
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
4
5
6
7
3
9
1
2
3
4
5
6
7
3
9
1
2
3
4
5
6
7
3
9
1
2
3
4
5
OAYH1SHOREUNI FUMIGATION HOURS
DAY 141 SHORELINE FUMIGATION HOURS
DAY K1 SHORELINE FUMIGATION HOURS
DAY141SHOREUNE FUMIGATION HOURS
DAY141SHORELINE FUMIGATION HOURS
OAYUtSKOREUMf FUMIGATION HOURS
DAY153SHORELIME FUMIGATION HOURS
DAr153$HOR£UNE FUMIGATION HOURS
DAY153SHORELINE FUMIGATION HOURS
OAY153SHORELINE FUMIGATION HOURS
OAY153SHOREUNE FUMIGATION HOURS
DAY153SHORCUNE FUMIGATION HOURS
DAY153SMOREUNE FUMIGATION HOURS
DAY153SHORELINE FUMIGATION HOURS
OAY153SHORELIME FUMIGATION HOURS
QAY161SHOREUNE FUMIGATION HOURS
DAY161SHORELINE FUMIGATION HOURS
DAY161 SHORELINE FUMIGATION HOURS
OAY161SHORELINE FUMIGATION HOURS
QAY161SHQRELINE FUMIGATION HOURS
DAY161 SHORELINE FUMIGATION HOURS
DAY161SHORELIHE FUMIGATION HOURS
DAY161SHORELINE FUMIGATION HOURS
DAY 161 SHORELINE FUMIGATION HOURS
DAY162SHORELIME FUMIGATION HOURS
OAY162SHORELIHE FUMIGATION HOURS
DAmaSHOREUNE FUMIGATION HOURS
OAY162SHORELIHE FUMIGATION HOURS
DAV162SHOREUNE FUMIGATION HOURS
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
t
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
Q
0
0
0
0
0
0
0
6
0
0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
Q 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
-------
SOURCE 7
SOURCE S
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE S
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 3
SOURCE 9
DAY16ZSHOR6UNE FUMIGATION
OAY162SHORELINE FUMIGATION
DAY16ZSHOREUNE FUMIGATION
DAY163SHCRELINE FUMIGATION
DAY163SHORIUNE FUMIGATION
OAY163SHOREUNE FUMIGATION
BAY 163SH0tf LINE FUMIGATION
OAY163SHOSELIHE FUMIGATION
DAY1&3SHG8EUNE FUMIGATION
DAY163SHORELINE FUMIGATION
DAY163SHC8ELINE FUMIGATION
DAT163SHORELINK FUMIGATION
DAY164SHCRIUKi FUMIGATION
OAY164SHORELINE FUMIGATION
OAY164SH08fLINE FUN 1 GAT I ON
OAYIMSHCKEUNE FUMIGATION
DAT16*$HC«Ei.INE FUMtfiATION
DAY164SHORELINE FUMIGATION
DAY164SHCRELINE FUMIGATION
DAY164SHOBfUBE FUMIGATION
OAT164SHOItELiNi FUMIGATION
DAmSSHOUEUNE FUMIGATION
OAY165SHOiiU»E FUWIGATIGH
DAY16SSHCRELIN6 FUMIGATION
DAV65SHOREL1NE FUN I OAT I ON
OAY165SHC8ELINE FUMIGATION
OAY165SHOREUNE FUMIGATION
OAY165SHORELINE FUMIGATION
DAY165SMG8EUNE RMIGATION
DAY1«SHf»EUNi FUMIGATION
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOWS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
6
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
8
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
t
1
1
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
a
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0 0
0 0
o a
0 0
0 0
0 0
0 0
0 0
0 0
0 0
Q 0
0 0
Q 0
0 0
0 0
0 0
-------
SOURCE 7
SOURCE 3
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE fl
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
OAY173SHORELINE FUMIGATION
DAY173SHOREL1NE FUMIGATION
OAY173SHORELINE FUMIGATION
DAY174SHORELINE FUMIGATION
BAY174SHORELINE FUMIGATION
OAY174SHORELINE FUMIGATION
DAY174SHOSELINE FUMIGATION
DAY174SH08ELINE FUMIGATION
OAY174SH08ELINE FUMIGATION
DAY174SHORELINE FUMIGATION
OAY174SH08flINE FUMIGATION
DAY174SHOREUNE FUMIGATION
OAY175SHORILIME FUMIGATION
OAY175SHORELINE FUMIGATION
BAY17SSHQRELINE FUMIGATION
DAY175SHORIUNE FUMIGATION
CAY175SH08ELIME FUMIGATION
CAY 175 SHORELINE FUMIGATION
BAY175SHORIUNE FUMIGATION
OAY175SHOREUNE FUMIGATION
DAY175SHORELINE FUMIGATION
DAY176SHOREUNE FUMIGATION
DAY176SHORELINE FUMIGATION
0AY176SHC«ELINE FUMIGATION
OAY176SHORELINE FUMIGATION
OAY176SHOHEUNE FUMIGATION
DAY176SHORELINE FUMIGATION
OAY176SHOSELINE FUMIGATION
OAY176SMORILINE RIM I GAT I ON
OAY176SH08EL1NE FUMIGATION
DAY182SH08CLINE FUMIGATION
BAY182SHOREL1NE FUMIGATION
BAY182SN08CUNE FUMIGATION
DAY182SHORELINE FUMIGATION
9AY182SH08ELINE FUMIGATION
OAY182SHORIUN1 FUMIGATION
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
1
1
1
1
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
a
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 C
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
o a
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 C
0 0
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOURCE
SOUSCF
7
3
9
1
2
3
4
5
6
7
8
9
1
2
3
4
5
A
OAY1S2SHORELINE FUMIGATION HOURS
DAY182SHOREUNE FUMIGATION HOURS
QAY1S2SH08EUNE FUMIGATION HOURS
DAY184SHOREUNE FUMIGATION HOURS
OAY184SH081LINE FUMIGATION HOURS
DAY184SHOREUNE FUMIGATION HOURS
DAY184SHORELIME FUMIGATION HOURS
OAY184SHOREUME FUMIGATION HOURS
DAY184SH08ELINE FUMIGATION HOURS
OAY184SHOSEUNE FUMIGATION HOURS
DAY184SHORELINE FUMIGATION HOURS
OAY1S4SHOKELINE FUMIGATION HOURS
OAY186SHOREL1NE FUMIGATION HOURS
DAY1S6SH08EL1NE FUMIGATION HOURS
OAY186SHORELINE FUMIGATION HOURS
DAY186SHORELIME FUMIGATION HOURS
DAY1S6SHORELINE FUMIGATION HOURS
BAYlMSHflaFl TUP f 1 MI KIT IfttJ yfllDC
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
n
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
n
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
n
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
n
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
n
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
n
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
n
0
0 1
0 1
0 1
0 1
0 1
0 1
0 I
0 1
0 I
0 1
0 (
0
0
o
0
0
n
3 0
) 0
) 0
3 0
3 0
) 0
3 0
) 0
3 0
) 0
} 0
1 0
0
0
0
0
0
n
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
n
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
ft
0 1
0 1
0 1
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 1
0 1
0 1
0 1
0 1
n 1
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
1 0
1 0
1 0
1 0
1 0
1 n
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
n
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0 0
0 0
0 0
0 0
a o
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
-------
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 1
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 3
SOURCE 6
SOURCE 7
SOURCE 3
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 1
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 1
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
DAY186STOREUNE FUMIGATION
DAY186SHORELINE FUMIGATION
OAY136SKOREUNE FUMIGATION
DAY187SHOREUNE FUMIGATION
DAY187SHORELINE FUMIGATION
DAY187SHORELINE FUMIGATION
OAY187SWORIUNE FUMIGATION
OAY187SHCRELINE FUMIGATION
3AY187SHOREUNE FUMIGATION
DAY187SHCREUNE FUMIGATION
DAY187SHORELINE FUMIGATION
OAY187SKORELINE FUMIGATION
OAY189SHORELINE FUMIGATION
DAY189SHORELINE FUMIGATION
OAY189SHOREUKC FUMIGATION
DAY189SHOREUNE FUMIGATION
0AY189SMREUNE FUMIGATION
DAY139SHORELINE FUMIGATION
DAY189SHORELINE FUMIGATION
OA?189SHOR£LINE FUMIGATION
OAY189SHOREUNE FUMIGATION
DAY^90$HORELINE FUMIGATION
OAY-90SHORELINE FUMIGATION
DAV190SHORELINE FUMIGATION
OAY1SOSHORIUNE FUMIGATION
DArl90SHORELINE FUMIGATION
OAY190SHOXELIKE FUMIGATION
OAY190SHORCLINE FUMIGATION
DAY190SXOREUNE FUMIGATION
DAY190SHORELINE FUMIGATION
OAV191SHORELIME FUMIGATION
OAY191SHORELINE FUMIGATION
OAY191SHORELINE FUMIGATION
DAY191 SHORELINE FUMIGATION
DAY191SHOREUNE FUMIGATION
DAY191SHORELINE FUMIGATION
OAY191SXOREUME FUMIGATION
OAY191SHORELINE FUMIGATION
OAY191SHOREUNE FUMIGATION
OAT196SHORELI« FUMIGATION
DAY196SHORELINE FUMIGATION
DAY196SHORELINE FUMIGATION
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HCURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
«
0
0
0
0
0
8
9
a
0
0
0
3
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
3
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
8
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
9
Q
0
a
0
0
9
0
3
a
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
a
0
0
0
Q
Q
Q
1
1
1
1
1
1
1
1
1
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
3
a
0
0
3
0
3
3
1
1
1
0
3
3
1
1
1
1
1
1
1
1
1
3
a
0
3
0
3
3
3
3
1
1
3
3
0
0
3
3
3
3
3
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
t
1
1
1
1
3
3
3
3
0
8
3
3
0
3
0
3
3
3
3
3
3
3
3
3
3
3
3
3
3
3
0
3
3
3
Q
3
0
3
3
3
3
3
3
3
3
3
1
1
1
1
1
1
1
1
1
0
3
3
0
0
3
1
3
3
3
3
3
3
3
3
0
3
0
3
0
3
0
3
3
3
1
1
1
1
1
1
1
1
1
0
3
3
1
1
1
3
3
3
3
3
3
3
3
3
3
3
3
3
3
3
0
3
0
3
3
3
0
3
3
3
3
3
1
1
1
1
1
1
1
1
1
3
3
3
1
1
1
0
a
3
0
0
0
3
0
0
3
o
3
a
3
0
3
3
0
1
1
1
1
1
1
1
1
0
0
3
3
0
3
3
3
3
3
3
3
3
3
0
0
3
3
3
0
0
0
0
0
3
0
3
0
3
3
0
3
3
3
3
3
3
3
3
3
3
3
0
3
3
0
3
3
0
3
3
3
3
3
3
0
3
3
Q
0
3
3
3
3
3
3
3
0
0
3
3
3
3
3
3
0
3
3
3
3
3
0
3
3
0
0
3
3
3
3
3
0
3
0
3
3
3
0
3
3
0
3
3
8
0
3
0
0
0
3
3
3
3
3
3
0
0
8
8
8
3
0
3
0
8
8
Q
8
3
0
8
0
8
8
8
8
0
8
8
0
8
8
0
8
0
8
8
8
8
0
0
0
8
0
8
8
8
8
8
0
8
8
8
8
8
8
8
3
8
8
8
3
8
0
8
8
8
8
8
8
8
8
8
8
8
0
8
0
0
8
8
0
8
a
8
8
8
0
8
8
0
8
0
3
8
8
8
8
8
8
0
0
8
8 0
0 0
8 8
8 0
8 0
3 8
8 0
8 0
8 0
0 o
8 0
8 a
8 0
0 0
0 0
Q 0
0 0
Q 0
0 0
0 0
3 0
0 0
8 0
0 0
8 0
8 0
8 0
0 0
8 8
3 8
8 0
0 0
3 8
3 0
0 0
8 0
8 0
8 0
0 0
8 0
8 0
8 0
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
OAY196SHORELINI FUMIGATION
OAY196SHORELINE FUMIGATION
0AV196SHOREUNE FUMIGATION
OAY196SHORELINE FUMIGATION
DAY196SHORELINE FUMIGATION
DAY196SHOREUNE FUMIGATION
OAV198SHORELINE FUMIGATION
DAY198SHORELINE FUMIGATION
OAY198SHORELINE FUMIGATION
OAY198SHOREUNE FUMIGATION
DAY198SHOREUNE FUMIGATION
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
8
8
8
8
8
8
8
8
3
8
8
3
3
3
8
8
8
8
0
0
8
8
8
0
0
8
3
3
8
8
0
8
8
0
0
8
8
8
0
0
3
0
8
8
0
8
0
8
8
8
8
8
3
8
8
0
8
8
8
8
8
8
8
0
8
8
8
8
3
8
8
8
8
8
8
3
8
0
3
3
8
8
8
0
3
0
8
8
8
8
3
8
3
8
1
1
1
1
1
1
1
1
1
1
1
1
t
1
1
1
1 3
1 8
1 0
1 0
1 8
1 0
1 1
1 1
1 1
1 1
1 1
8
8
8
8
8
8
8
8
0
8
8
0
0
0
8
8
8
8
8
0
8
8
8
8
0
8
8
0
8
8
0
8
8
8
8
0
8
3
0
8
8
3
3
8
8
8
8
8
8
8
8
3
0
0
8
8
3
8
8
8
0
8
8
0
0
8
0
8
8
8
8
8
8
8
0
8
3
0
8
8
8
8
0
8
0
0
3
8
8
0
0
0
0
8
8
8
0
8
8
8 0
3 8
8 0
8 8
8 0
0 0
3 0
8 0
3 0
8 0
8 0
-------
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE f
SOURCE 1
SOURCE I
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE S
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
OAY198SMQREUNE FUMIGATION
0AY198SHORELINE FUMICATION
DAY198SHORELINE FUMIGATION
OAY199SHQREUNE FUMIGATION
OAY199SNORELINE FUMIGATION
DAY199SHORELINE FUMIGATION
OAY199SHOREUNE FUMIGATION
OAY199SHORELINE FUMIGATION
DAY199SHORELIME FUMIGATION
OAY199SHORELINE FUMIGATION
DAY199SHORiLIttE FUMIGATION
DAY199SHOHELIME FUMIGATION
OAY200SHORELIME FUMIGATION
OAY200SHORELINE FUMICATION
OAYZOOSHOREUNi FUMIGATION
OAY200SHCREUHE FUMIGATION
0AY200SM08EUNE FUMIGATION
DAY200SHOREUHE FUMIGATION
DAY200SMOREUNE FUMIGATION
OAYcOCSHOREUNE FUMIGATION
DAY200SHORELINE FUMIGATION
OAY210SHOREUNE FUMIGATION
0AY210SHORflINf FUMIGATION
DAY21QSHOSEUNE FUMIGATION
DAY210SHORELIME FUMIGATION
DAY210SHORELINE FUMIGATION
DAY210SHORELINE FUMIGATION
DAY210SHORELINE FUMIGATION
DAY210SHORELINE FUMIGATION
DAY210SH08ELINE FUMIGATION
OAY214SHORELINE FUMIGATION
OAY214SHOREL1HE FUMIGATION
OAY214SHOREUNI FUMIGATION
DAY214SHOHELINE FUMIGATION
DAY214SHORELIHE FUMIGATION
DAY214SHOREUHE FUMIGATION
DAY214SHOSELINE FUMIGATION
DAY214SHG8ELINE FUMIGATION
DAY214SHORELINE FUMIGATION
DAY215SHORELINE FUMIGATION
OAY21SSHOREUNE FUMIGATION
DAY215SHORELINE FUMIGATION
OAY215SHORELINE FUMIGATION
DAY21SSHORELINE FUMIGATION
BAY21SSHOREUNI FUMIGATION
DAY21SSHORELINE FUMIGATION
DAY215SHORELINE FUMIGATION
DAY215SHOREUNE FUMIGATION
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
0
0
0
0
0
0
0
0
0
0
0
0
0
c
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
D
0
0
0
0
0
0
0
ja
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
c
0
0
0
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
.0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
c
c
0
0
0
0
3
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0 0
0 0
0 0
0 Q
0 0
0 0
0 0
Q 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 C
0 0
0 0
c §
0 0
0 0
0 0
0 0
Q 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 Q
0 0
0 0
0 0
0 0
0 0
0 0
Q a
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
SOURCE 1
SOURCE 2
SOURCE I
SOURCE 4
SOURCE 5
OAY216SHORELINE FUMIGATION HOURS 000000000101001
BAY216SHORELINE FUMIGATION HOURS 000000000101001
DAY216SHOHELINE FUMIGATION HOURS 000000000101001
DAY216SHORELINE FUMIGATION HOURS 000000000101001
OAY216SHORELINE FUMIGATION HOURS 000000000101001
00000000
00000000
00000000
00000000
00000000
-------
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE S
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE I
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE &
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
DAY216SHORELINE FUMIGATION
OAY216SHORELINE FUMIGATION
OAY216SHOWLINE FUMIGATION
OAY217SHOREUNE FUMIGATION
OAY217SMORELINE FUMIGATION
OAY217SHQRELINE FUMIGATION
OAY217SHOREUNE FUMIGATION
OAY217SHORELINE FUMIGATION
DAY217SH0RELIME FUMIGATION
OAr217SHOHELINE FUMIGATION
OAY217SHORELINE FUMIGATION
OAf217SHC*iLINE FUMIGATION
OAr218SHORELIME FUMIGATION
OAY218SHOBELINE FUMIGATION
OAY218SHORELINE FUMIGATION
DAY218SHORELINI FUMIGATION
OAY218SHORELINE FUMIGATION
DAY218SIW8IUNE FUMIGATION
DAY218SHOREUNE FUMIGATION
OAY218SHORELIN1 FUMIGATION
OAY218SHCMELINf FUMIGATION
OAr224SHQREUNE FUMIGATION
OAY224SHCREUNE FUMIGATION
OAY224SHQBEUNE FUMIGATION
DAY224SHORELIME FUMIGATION
OAY224SHORELINE FUMIGATION
OAY224SHOREUNE FUMIGATION
OAY224SHORE11NI FUMIGATION
QAY224SHORILINI FUMIGATION
OAY224SHORELIME FUMIGATION
DAY228SHOREU« FUMIGATION
OAY228SMRELINE FUMIGATION
OAY228SMQRELINE FUMIGATION
DAY228SHORELINE FUMIGATION
DAY228SH08EUNE FUMIGATION
OAY228SKORELINf FUMIGATION
OAY228SHGRELINE FUMIGATION
OAY228SHOREUNE FUMIGATION
OAY228SHOReLINE FUMIGATION
OAY229SHOREUN1 FUMIGATION
OAY229SHORELINE FUMIGATION
DAY229SHOSELINE FUMIGATION
OAY229SHORELINE FUMIGATION
OAY229SKORILINE FUMIGATION
OAY229SMREUNi FUMIGATION
OAY229SHORELINE FUMIGATION
OAY229SHORELINE FUMIGATION
OAY229SHORELINE FUMIGATION
DAY230SHOREUNE FUMIGATION
OAY230SHORELINE FUMIGATION
DAY230SHORELINE FUMIGATION
DAY230SHORELINE FUMIGATION
OAY230SHORELINE FUMIGATION
OAY230SHORELINE FUMIGATION
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOWS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
c
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
'o
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0-
0
0
1
1
1
1
1
1
1
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
t
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
Q
0
Q
0
Q
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
Q
0
0
0
0
0
0
0
c
0
0
0
0
0
0
0
0
c
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
C 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
Q 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
o a
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
-------
SOURCE 7
SOURCE 3
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 3
SOURCE 9
SOURCE 1
SOURCE ^
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE &
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 3
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE a
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4 .
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
DAY230SHOREL1NE FUMIGATION
OAY230SHORELINE FUMIGATION
0AY230SHORELINE FUMIGATION
OAY231 SHORELINE FUMIGATION
DA Y211 SHORELINE FUMIGATION
OAY231 SHORELINE FUMIGATION
0 A Y231 SHORELINE FUMIGATION
OAY231SHORELINE FUMIGATION
OAY231 SHORELINE FUMIGATION
DA Y231 SHORELINE FUMIGATION
OAY231SHORELIME FUMIGATION
DAY231 SHORELINE FUMIGATION
OAY235SHORELJNE FUMIGATION
DAYZ3SSHORELINE FUMIGATION
DAY235SHORELINE FUMIGATION
DAY235 SHORELINE FUMIGATION
OAY23SSHQ8ELIHE FUMIGATION
DAY23SSHOREUNE FUMIGATION
DAY235SHORELINE FUMIGATION
OAY235SHORELINE FUMIGATION
DAY235SHQRELINE FUMIGATION
DAY236SHORELINE FUMIGATION
DAY236SHORELJNE FUMIGATION
DAY236SHORELIN6 FUMIGATION
OAY236SHORELIHE FUMIGATION
DAY236SHORELINE FUMIGATION
OAYZ36SH0RELINI FUMIGATION
DAY236SHORELINE FUMIGATION
OAY236SHORILIME FUMIGATION
DAY234SHORELINE FUMIGATION
OAY260SHORELINE FUMIGATION
DAY240SHORELINE FUMIGATION
DAY240SHORELINE FUMIGATION
DAY240SHORELINE FUMIGATION
OAY240SHORELIHC FUMIGATION
DAY240SHORELINE FUMIGATION
DAY240SHORELINE FUMIGATION
OAY24QSHOSELIME FUMIGATION
OAY24QSHORELIHE FUMIGATION
DAY241SHORELIHE FUMIGATION
OAY241SHOREL1NE FUMIGATION
DAY241SHORELINE FUMIGATION
OAY241 SHORELINE FUMIGATION
DAY241 SHORELINE FUMIGATION
DAY241 SHORELINE FUMIGATION
DAY241SHORELINE FUMIGATION
0AY241SH0RIL1NE FUMIGATION
DAY241SHCRELINE FUMIGATION
OAY242SHOREUNE FUMIGATION
DAY242SHORELINE FUMIGATION
DAY242SHORELINE FUMIGATION
OAY242SHORELINE FUMIGATION
DAY242SHORELIHE FUMIGATION
DAY242SHORELINE FUMIGATION
OAY242SHORELIHE FUMIGATION
DAY242SHORELINE FUMIGATION
QAYZaSHORIUNE FUMIGATION
OAY243SHORELIHE FUMIGATION
OAY243SHORELINE FUMIGATION
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
HOURS
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
Q
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
Q
0
Q
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
1
1
1
1
1
1
t
1
1
0
0
0
0
0
1
1
0
0
0
0
0
Q
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
Q
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
G
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
t
1
1
1
1
1
1
0
0
0
0
0
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
1
1
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
?
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0 0
0 0
0 0
0 0
0 0
0 0
Q 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 Q
0 0
o a
0 0
0 Q
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 Q
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 Q
0 0
0 0
0 0
0 0
0 0
0 0
0 0
-------
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 3
SOURCE 9
SCURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 3
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
sntiore 3
DAY243SHOREUNE
DAY243SHORELIME
OAV243SHOBEL1NE
DAY243SHQREUNE
DAY243SWXEUNE
DAY243SHOREUNE
DAY244SMOREUMC
DAY2tt$HOftEUNf
OAY2USNOREL1NE
DAY244SHORELINE
DAY244SNOREL1N1
DAf244SttQREUNE
OAY2USHOREL1ME
DAY2USHOREUNE
OAY<44SHOftELIHE
DAY245SHOREUME
DAY245SHOREUNI
DAt245$HOREUNE
DAY245SHOf)ELINE
DAY245SHOftELIME
DAY24SSNORELIME
DAY24SSHQREUHE
DAr245SHC«ELI«E
DAY245SHOREL!ME
DAY246SNOMELINE
OAY246SHORELIME
OAY246SH08ELINE
DAY244SHQREUME
OAY246SHOREL1NE
DAY24ASHOREUNI
OAY246SHOREUNE
OAY246SHORELIME
OAY246SW8ELiNE
OAT247SHORELINE
OAY247SHORELIME
DAY247SHORELIMi
OAY247SHOREUWE
OAY247SHOREL1HE
OAY247SKORELUE
OAY247SMORELIME
OAY247SHORELINE
OAY247$MOREl!Ni
OAY2S8SHORELIME
DAY258SMORELINE
DAY258SHORELIHE
DAY2S8SMREL1ME
OAY2S8SHOREL1NE
OAY25SSHOREUNE
DAY258SHORELIHE
OAY2S8SNOREL1NE
OAY2S8SMORELINE
OAY267SHOREL1ME
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUN! CATION HAMS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
FUMIGATION HOURS
mure
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
n
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
n
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
n
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
n
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
n
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
6
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
t
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
t
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
t
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
9
0
0
0
0
0
0
0
0
0
0
0
0
0
a
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
Q
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
§
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
c
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
a
0
0
0
Q
0
0
0
0
0
0
0
0
0
0
a
-------
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOUSCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
SOURCE 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE 7
souses 8
SOURCE 9
SOURCE 1
SOURCE 2
SOURCE 3
SOURCE 4
SOURCE 5
SOURCE 6
SOURCE T
SOURCE 8
SOURCE 9
RECEPTOR
OAY267SHORE11ME FUMIGATION HOURS 00000000
OAY267SHORELINE FUMIGATION HOURS 00000000
OAY267SHORELINE FUMIGATION HOURS 00000000
OAY267SHORELIHE FUMIGATION HOURS 00000000
DAY267SHORELIME FUMIGATION HOURS 00000000
OAY267SHORELINE FUMIGATION HOURS 00000000
OAY28ZSHOREL1NE FUMIGATION HOURS 00000000
OAY282SHOREUNE FUMIGATION HOURS 00000000
OAYZaZSNGtEUNE FUMIGATION HOURS 00000000
OAY282SHOREUNE FUMIGATION HOURS 00000000
BAY282SHORELINE FUMIGATION HOURS 00000000
MY282SHQREUME FUMIGATION HOURS 00000000
DAY282SHOREUHE FUMIGATION HOURS 00000000
DAY2SZSHOREUNE FUMIGATION HOURS 00000000
DAY282SHOREL1ME FUMIGATION HOURS 00000000
OAY283SH08EL1NE FUMIGATION HOURS 00000000
DAY283SHORELIME FUMIGATION HOURS 00000000
OAY283SMOREUNE FUMIGATION HOURS 00000000
OAY2S3SHOREUNE FUMIGATION HOURS 00000000
DAr283SHOREUNE FUMIGATION HOURS 00000000
QAY2B3SHOREUNE FUMIGATION HOURS 00000000
OAY2B3SHOREUNE FUMIGATION HOURS 00000000
OAY283SHCRELIHE FUMIGATION HOURS 00000000
OAYZ83SHORELINE FUMIGATION HOURS 00000000
OAY29SSNOREUNE FUMIGATION HOURS 00000000
OAY29SSHORELINE FUMIGATION HOURS 00000000
OAY29SSHOREUNE FUMIGATION HOURS 00000000
OAY293SHORELIMC FUMIGATION HOURS 00000000
OAY295SHOR6LIHE FUMIGATION HOURS 00000000
DAY295SHORELIN6 FUMIGATION HOURS 00000000
DAY29SSHOREUNE FUMIGATION HOURS 00000000
OAY295SHORELZHE FUMIGATION HOURS 00000000
OAY295SHORELINE FUMIGATION HOURS 00000000
DAY296SHORELINE FUMIGATION HOURS 00000000
DAY296SHORELINE FUMIGATION HOURS 00000000
DAY296SHORELINE FUMIGATION HOURS 00000000
DAY296SHOREUME FUMIGATION HOURS 00000000
OAY296SHORELINE FUMIGATION HOURS 00000000
DAY296SHORELIME FUMIGATION HOURS 00000000
DAY296SHOREUNE FUMIGATION HOURS 00000000
0AY296SHOREUNE FUMIGATION HOURS 00000000
OAY296SHORELIHE FUMIGATION HOURS 00000000
URBAN SOM • VERSION 88204
SHORELINE DISPERSION TEST CASE «
'************ CLEVELAND MET DATA • 1973 ***»*«**********»»»**»*******<
RECEPTORS
IDENTIFICATION EAST NORTH RECEPTOR HT RECEPTOR GROUND
COORD COORD ABV LOCAL GRD LVL ELEVATION
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
f*
LEVEL
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
0
0
0
0
0
0
0
0
0
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
1
1
1
1
1
1
1
1
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
AVG CQHC
DAY
(USER UNITS) (METERS) (USER NT UNITS)
1.
HR
1.
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
FOR PERIOD
TO
OAY365,
(MICSOGRAHS/M
*»3)
HR24.
435.00 4570.00
0.0
650.0
0.02
-------
3 435.00 4590.00 0.0 610.0 0.02
4 435.00 4600.00 0.0 600.0 0.02
5 445.00 4570.00 0.0 670.0 0.02
6 445.00 4580.00 0.0 650.0 0.03
7 445.00 4590.00 0.0 640.0 0.04
8 445.00 4600.00 0.0 620.0 0.09
9 450.00 4570.00 0.0 690.0 0.02
10 450.00 4580.00 0.0 656.0 0.02
11 450.00 4590.00 0.0 620.0 0,03
12 450.00 4600.00 0.0 630.0 0.12
13 450.00 4605.00 0.0 610.0 0.15
T4 450.00 4610.00 0.0 600.0 0.15
435.00 4590.00
435.00 4600.00
445.00 4570.00
445.00 4580.00
US. 00 4590.00
445.00 4600.00
450.00 4570.00
450.00 4580.00
450.00 4590.00
450.00 4600.00
450.00 4605.00
450.00 4610.00
455.00 4570.00
435.00 4580.00
455.00 4590.00
455.00 4600.00
455.00 4605.00
455.00 4610.00
455.00 4615.00
465.00 4570.00
465.00 4580,00
465.00 4590,00
465.00 4600.00
465.00 4605.00
465.00 4610.00
465.00 4615.00
465.00 4620.00
475.00 4570.00
475.00 4580.00
475.00 4590.00
475.00 4600.00
475.00 4605.00
475.00 4610.00
475.00 4615.00
475,00 4620.00
Five HIGHEST 1-HOUR
0.0
0.0
0.0
0.0
0.0
0.0
0.0
o.o
0.0
0.0
0.0
0.0
0.0
0.0
0.0
G.O
c.o
0,0
0.0
0.0
0,0
O.Q
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
0.0
610.0
600.0
670.0
650.0
640.0
620.0
690.0
656.0
620.0
630.0
610.0
600.0
690.0
690.0
640.0
630.0
620.0
600.0
600.0
690.0
680.0
670.0
650.0
630.0
630.0
620.0
600.0
690.0
690.0
660.0
650.0
640.0
650.0
630.0
620.0
S02 CO«CEHTRAT10MS( (ENDING ON JULIAN DAY,
HOUR)
2
5.08F (247,15)
4.57F (182,15)
2.11 (190,22)
3.79 ( 75, 9)
9.25F (242,14)
7.90F (173,15)
10.48F (210,13)
7.11 (103, 2)
7.40F (231,12)
4.30F (267,14)
4.53 (140,19)
11.65F (258,13)
21.51 (204, 3)
70* M7« 1L\
3
4.98F (186,16)
4.24F (198,10)
2.11 (190,24)
3.51 (175,23)
8.01F (229.16)
7.89F (295.14)
9.04F (186,16)
6.97 (327,17)
5.55F (200,15)
3.64 ( 51,22)
3.57 ( 51.22)
10.45 (197, 7)
20.77 (204, 4)
A A1 / « ?3>
4
4.02F (295,14)
3.69F (196,11)
1.90 (191, 1)
3.51 (104,22)
6.64F (104,14)
6.01 (140,19)
6.53F (173,18)
6.95 (187,20)
4.37F (165,12)
3.43 ( 51,23)
3.47 (164,21)
9.71F (236,15)
20.20 (225,22)
A S"? MOB A\
15 455.00 4570.00 0.0 690.0 0.02
16 435.00 4580.00 0.0 690.0 0.02
17 455.00 4590.00 0.0 640.0 0,03
18 455.00 4600.00 G.O 630.0 0,37
19 455.00 4605.00 0.0 620.0 0,11
20 455.00 4610.00 0,0 600.0 * 3.31
0.17
22 465.00 4570.00 0.0 690.0 0.01
23 465.00 4580,00 0,0 680.0 0.01
24 465.00 4590,00 0.0 670.0 0.02
25 465.00 4600.00 0.0 650.0 0.02
It 465.00 4605.00 0.0 630.0 0.03
27 465.00 4610.00 0.0 630.0 O.C4
23 465.00 4615.00 0.0 620.0 0.06
29 465.00 4620.00 0.0 600.0 0.07
30 475.00 4570.00 6.0 690.0 0.01
31 475.00 4580.00 0.0 690.0 0.01
32 475.00 4590.00 0.0 660.0 0.01
33 475.00 4600.00 0.0 650.0 0.01
34 475.00 4605.00 0.0 640.0 0.01
35 475.00 4610.00 0.0 650.0 0.02
36 475.00 4615.00 0.0 630.0 0,03
37 475,00 4620.00 0.0 620.0 0.03
RECEPTOR 12345
1( 435.00,4570.00) 6.06F (176,11) 5.08F (247,15) 4.98F (186,16) 4.02F (295,14) 3.89F (173,
2( 435.00,4580.00) 8.20F (198, 9) 4.57F (182,15) 4.24F (198,10) 3.69F (196,11) 3.58F (236,
3( 435.00,4590.00) 2.24 ( 63,19) 2.11 (190,22) 2.11 (190,24) 1.90 (191, 1) 1.90 (283,
4( 435.00,4600.00) 5.04 (302.23) 3.79 ( 75, 9) 3.51 (175,23) 3.51 (104,22) 3.47 (272,
5( 445.00,4570.00) 10.14F (231,15) 9.25F (242,14) 8.01F (229.16) 6.64F (104,14) 4.40 (140,
6( 445.00,4580.00) 8.80F (210.13) 7.90F (173,15) 7.89F (295.14) 6.01 (140,19) S.33F (176,
7( 445.00,4590.00) 10.72F ( 97,10) 10.48F (210,13) 9.04F (186,16) 6.53F (173,18) 6.17F (229,
8( 445.00.4600.00) 21.87F (138,16) 7.11 (103. 2) 6.97 (327,17) 6.95 (187,20) 6.95 (172
9( 450.00,4570.00) 8.46F (216,15) 7.40F (231,12) 5.55F (200,15) 4.37F (165,12) 3.71F ( 97
10( 450.00,4580.00) 7.13F (224,17) 4.30F (267,14) 3.64 ( 51,22) 3.43 ( 51,23) 3.17F (245
11( 450.00,4590.00) 4.79 (224,20) 4.53 (140,19) 3.57 ( 51.22) 3.47 (164,21) 3.47 (296
12( 450.00,4600.00) 12.66 (103, 4) 11.65F (258,13) 10.45 (197, 7) 9.71F (236,15) 8.94 (236
13( 450.00,4605,00) 25.48 ( 83, 7) 21.51 (204, 3) 20.77 (204, 4) 20.20 (225,22) 20.18 (203
14( 450.00.4*10.00* 0.51 f*A1 1*> 7 OA M7« 1L\ A A1 / « V>\ A S"? MOB A\ A if\ ,11.1
-------
15( 455.00,4570.00)
16( 455.00,4580.00)
17( 455.00,4590.00)
18( 455.00,4600.00)
19( 455.00.4605.00)
20( 455.00,4610.00) •
21( 455.00,4615.00)
22( 465.00,4570.00)
23( 465.00,4580.00)
24( 465.00,4590.00)
2S( 465.00,4600.00)
26( 465.00,4605.00)
27( 465.00.4610.00)
28( 465.00,4615.00)
29( 465.00,4620.00)
30( 475.00,4570.00)
31( 475.00,4580.00)
32( 475.00,4590.00)
33( 475.00.4600.00)
34( 475.00.4605.00)
35( 475.00,4610.00)
36( 475.00,4615.00)
37( 475.00,4620.00)
RECEPTOR
1( 435.00,4570.00)
2C 435.00,4580.00)
3( 435.00,4590.00)
4( 435.00,4600.00)
5( 445.00,4570.00)
6( 445.00,4580.00)
7( 445.00,4590,00)
8( 445.00,4600.00)
9( 450.00,4570.00)
10( 450.00,4580.00)
11( 450.00,4590.00)
12( 450.00.4600.00)
13( 450.00,4605.00)
14( 450.00,4610.00)
15( 455.00,4570.00)
16( 455.00,4580.00)
17( 455.00,4590.00)
18( 455.00.4600.00)
19( 455.00.4605.00)
20( 455.00.4610.00) •
21( 455.00,4615.00)
22( 465.00,4570.00)
23( 465.00,4580.00)
24( 465.00,4590.00)
2S( 465.00,4600.00)
26f i6S nn ixns nni
5.10F (173,18)
6.66F (282,14)
10.47F (173,18)
12.23F (175,14)
26.37F (242,10)
30.68 (298,23) *
12.69 (295, 6)
4.46F (164,11)
2.66F (224,14)
9.13F (283,11)
13.83F (216,10)
18.20 ( 63. 5)
15.39F (245,10)
6.71F (245,10)
6.53 ( 63, 3)
3.24F (283,12)
4.S8F (187,12)
4.98F (216,10)
4.16F (258,15)
13.58 ( 63, 5)
8.07F (296,12)
9. OOF (245,10)
10.19F (245.10)
FIVE HIGHEST 3 -HOUR
1
2.03F (176,12)
2.73F (198, 9)
1.88 ( 63.21)
2.41 (175,24)
3.44F (231,15)
3. OOF (210,15)
3.57F ( 97,12)
7.39F (138,18)
2.32F (216,15)
2.39F (224,16)
2.31 ( 51,24)
8.19 (236, 3)
12.25 (204, 6)
5.35 (267, 3)
2.93F (173.18)
2.25F (173,18)
3.62F (173,18)
4.67 (186.24)
10.21F (242,12)
13.06 (113. 6) •
6.85 (182, 3)
1.85F (164.12)
1.88 ( 63, 9) '
3.04F (283,12)
5.86F (174,12)
a t.t i it t-
4.24F (231.11)
6.13F (173,18)
8.08F ( 97,10)
7.83 (215.21)
19.24 ( 63, 5)
23.09 ( 63, 6)
12.36 (295. 7)
3.48 ( 63, 8)
2.55 ( 63, 8)
7.72F (187,12)
9.99F (174.10)
14.43F (235,13)
7.54F (296,12)
3.73 (343, 9)
5.71 ( 62,21)
2.58F (224,14)
3.47 ( 63. 7)
4.37F (247,13)
4.09F (174,12)
8.38F (235.13)
6.30F (242.11)
8.25F (187.11)
2.79 ( E7.20)
502 CONCENTRATK
(MICROGIWHS,
2
1.70F (247,15)
1.52F (182,15)
1.55 (190,24)
2.00 ( 63,24)
3,08F (242.15)
2.77F (295,15)
3.54F (210,15)
4.66 (103, 3)
2.50F (231,12)
2.36 ( 51,24)
1.93 ( 28,15)
7.35 (235.24)
10.78 (204, 3)
4.12 ( 62.24)
1.48F (215,18)
2.22F (282.15)
2.69F ( 97,12)
4.08F (175.15)
10.09 ( 63, 6)
11.52 (298,24)
5.49 (292, 6)
1.68 ( 63, 9)
0.95 (186,21)
2.70 ( 63. 9)
4.67F (216,12)
, «.- .«•» .-.
4.24F (231.11)
6.13F (173,18)
8.08F ( 97,10)
7.83 (215.21)
19.24 ( 63, 5)
23.09 ( 63, 6)
12.36 (295. 7)
3.48 ( 63, 8)
2.55 ( 63, 8)
7.72F (187,12)
9.99F (174.10)
14.43F (235,13)
7.54F (296,12)
3.73 (343, 9)
5.71 ( 62,21)
2.58F (224,14)
3.47 ( 63. 7)
4.37F (247,13)
4.17F ( 97,10)
5.62F ( 97,10)
6.96F (224,15)
7.80 ( 63, 8)
14.33 ( 27,22)
18.38 (213,13)
12.00 (196, 3)
2.98F (164,14)
1.98 (318,18)
7.49F C214.15)
7.58F (174,11)
7.16 ( 63, 4)
3.68F (242,10)
3.16 ( 63, 3)
5.30 (283, 7)
2.23 ( 63, 7)
2.43F (258,13)
2.28 ( 93,20)
4.15F (215,16)
5.24F (141, 9)
5.78F (231,11)
7.44 (160,23)
11.43F (235.13)
17.93 (293, 5)
11.98 (292, 4)
2.92F (186,15)
1.65 ( 2,18)
4.66 ( 63, 7)
3.90F (258,12)
6.69F (247,13)
3.21F (242,11)
2.98 (103,21)
5.10 (236, 6)
2.18 C 63, 8)
2.38 (168. 1)
2.40 ( 63, 7)
4.05F (210,1
2.81F (164,1
S.18F (196,1
6.90 (186,2
11.03 ( 63,
16.40 (258, V
11.07 (182,
1.91 (318,1.
1.58 ( 63,
3.69 ( 63, i
3.83 ( 63,
5.67F (242,11
3.07 (343, '
2.96 ( 62,2
4.62 (283, !
1.47 ( 45,2!
2.30F (114,1
a. 21 (ua,
3.90 ( 93,20)
7.12F (199,11)
5.81F (242,10)
6.63F (296,12)
2.30 ( 27,24)
3.04F (174,10)
4.45 ( 28, 9)
4.70 ( 27,21)
6.57F (242,11)
2.12 (239,19)
HOUR)
1.66F (186,18)
1.41F (198,12)
1.33 (360.15)
1.98 (75. 9)
2.67F (229,18)
2.63F (173.15)
3.01F (186,18)
4.59 (327.JS)
1.85F (200,15)
1.75 ( 28.15)
(224,21)
(197. 6)
(203, 6)
(225. 6)
1.41F (231,12)
1.87F ( 97,12)
2.39F (224,15)
3.91 ( 63, 9)
(210,21)
( 63. 6)
(295, 9)
(241.21)
0.89F (224,15)
2.57F (187,12)
1.43F (258,12)
1.80
6.95
9.81
3.69
5.35
7.70
4.99
1.10
1.40F (295,15)
1.25F (236,15)
1.13 ( 27, 6)
1.91 (302,24)
2.21F (104,15)
2.00 (140,21)
2.20F (173,18)
3.71 ( 59, 6)
1.57 ( 51,24)
1.43F (267,15)
1.60 (241,21)
5.05 ( 82. 3)
8.49 ( 83, 9)
3.61 (299,24)
1.39F ( 97,12)
1.76F (141, 9)
1.96 (210,21)
(291,24)
( 27,24)
<323, 9)
(295, 6)
1.00F (164,15)
0.86 ( 24,21)
2.50F (214.15)
1.28 ( 63, 9)
3.21
5.17
6.89
4.83
2.15F (247,1:
3.92 ( 63. i
3.76 ( 27,22
5.03F (218,15
2.11F (218,15
1.30F (173,15
1.23F (196,12
1.12 (282,21
1.81 (272,21
1.71 (327,18
1.94F (176,12
2.18 (236, 3
3.59 (258, 3
1.46F (165.12
1.13 (191,21
1.57 (164,21
4.98 (180,21
7.61F (296,12
3.27 (175.24
1.37F (210.12:
1.13 (103, 3:
1.93F (231,12!
3.04 <160,24:
3.91F (235,15)
6.44 (323, 6)
4.62 (196, 3)
0.97F (186,15)
0.77 (161, 3)
1.23 ( 63, 6)
1.15 (160,21)
-------
27(665.00,4610.00) 5.15M245.12) 3.34F (296,12) 2.47F (242,12) 1.96 (252,3) 1.50 (37,
28C 465.00,4615.00) 2.65 <252, 3) 2.34F (245,12) 2.02 <283, 9) 1.74 { 28, 3) 1.46 ( IS,
291 465.00,4620.00) 4.10 (283, 9) 2.77 ( 28, 6) 2.47 < 62,24) 2.19 (236, 6> 2.18 ( 63
30{ 475.00,4570.00) 1.54 ( 63, 9) 1.08F (283,12) 0.86F {224,15) 0.74 ( 45,24) 0.73 (186
31( 475.00,4580.00) 1.63F <187,12) 1.54 ( 63, 9) 1.0SF (283,12) 0.82 (303,18) 0.81F (114
32( 475.00,4590.00) 1.66F (216,12) 1.46 ( 93,21) 1.46F C247.15) 0.80 ( 63, 9> 0.74 (168
33( 475.00,4600.00) 2.93F (174,12) 1.68 ( 93,21) 1.39F (258,15) 0.81 ( 76, 6> 0.72F (247
34( 475.00,4605.00) 5.83 ( 63, 6) 2.79F (235,15) 2.40F (199,12) 2,23 ( 28. 9) 1.58F (242
35(475.00,4610.00) 4.40F (296,12) 4.14F (242,12) 1.57 (27,21) 1.25 (27,24) 1.07F(235
36(475.00,4615.00) 3.61F (296,12) 3.48F (242,12) 3.01F (245,12) 2.94F (187,12) 1.75 (27
37(475.00,4620.00) 3.47F (245,12) 1.26 (28,6) 1.16 (247,9) 1.13 (93,3) 1.05 (252
AECEPTOR
1( 435.00,4570.00) 0.77F (176,16) 0.68F (186,16) 0.66F (247,16) 0.56 (140,24) 0.53F (295
2( 435.00,4580.00} 1.56F (198,16) 0.70 (190,24) 0.60 (169,16) 0.58 (283,24) 0.53F (182
3( i-35.00.4590.00) 0.85 (190,24) 0.71 ( 63,24) 0.68 (360,16) 0.67 (283,24) Q.54 <323
4( 435.00,4600.00} 1.25 (272,24) 1.14 (302,24) 0.95 (175.24) 0.84 (140,24) 0.75 e
5( 445.00,4570.00) 1.3SF (231,16) 1.16F (242,16) 1.01F (229,16) 0.83F (104.16) 0.82 (.140
6( 445.00,4580.00) 1.29 (140,24) 1,16F (210,16) 1.04F (295,16) 0.99F (173,16) 0.79F (
71, 445.00,4590.00} 1.51F ( 97,16) 1.35F (210,16) 1.14F (186,16) 1.14 (197, 8) 1.12
8( 445.00,4600.00) 3.44 (327,24) 2.82F (138,16) 2.41 (103, 8} 1.49 (197,24) t .46 (272
5.15F (245,12)
2.65 (252, 3)
4.10 (283, 9)
1.54 ( 63, 9)
1.63F (187,12)
1.66F (216,12)
2.93F (174,12)
5.83 ( 63, 6)
4.40F (296,12)
3.61F (296,12)
3.47F (245,12)
FIVE HIGHEST 8- HOUR
1
0.77F (176,16)
1.56F (198,16)
0.35 (190,24)
1.25 (272,24)
1.3SF (231,16)
1.29 (140,24)
1.51F ( 97,16)
3.44 (327,24)
1.09F (231,16)
1.06F (224,24)
1.01 (164,24)
5.37 (197, 8)
9.23 (204, 8)
2.56 (267, 8)
0.83F (210,16)
0.8SF ( 97,16)
1.38F (173,24)
2.18 (186,24)
4.17F (242,16)
6.44 (113, 8) *
3.35 (295, 8)
1.08F (164,16)
0.52 ( 63, 8)
1.41 ( 63, 8)
2.22F (174,16)
3.23 ( 63, 8)
2.06F (245,16)
1.39 ( 28, 8)
1.72 (199, 8)
O.S6F (283,16)
0.75 ( 63, 8)
0.66 ( 93,24)
1.14F (174,16)
2.19 ( 63, 8)
1.6SF (296,16)
1.44F (242,16)
1.32F (245,16)
3.34F (296,12)
2.34F (245,12)
2.77 ( 28, 6)
1.08F (283,12)
1.54 ( 63, 9)
1.46 ( 93,21)
1.68 ( 93,21)
2.79F (235,15)
4.14F (242,12)
3.48F (242,12)
1.26 ( 28, 6)
2.47F (242,12)
2.02 (283, 9)
2.47 ( 62,24)
0.86F (224,15)
1.05F (283,12)
1.46F (247,15)
1.39F (258,15)
2.40F (199,12)
1.57 ( 27,21)
3.01F (245,12)
1.16 (247, 9)
S02 CONC£NTRAT(ONS((ENOIIIG ON JULIAN DAY,
(MICKOCRAMS/H**3)
2
0.68F (186,16)
0.70 (190,24)
0.71 ( 63,24)
1.14 (302,24)
1.16F (242,16)
1,16F (210,16)
1.3SF (210,16)
2.82F (138,16)
1.08F (216,16)
0.88 ( 51,24)
0.90 ( 51,24)
3.66 (235,24)
4.39 (203, 8)
2.20 ( 62.24)
0.68F ( 97,16)
0.83F (282,16)
1.18F { 97,16)
1.91 (215,24)
3.78 ( 63, 8)
5.31 ( 63, 8)
3.14 (292, 8)
0.61 (241,24)
0.45 (186,24)
1.15F (283,16)
1.75F (216,16)
1.89F (235,16)
1.25F (296,16)
1.20 (252, 8}
1.64 ( 62,24)
0.55 { 63, 8)
0.62F (187,16)
0.62F (216,16)
0.75 ( 93,24)
1.11F (235,16)
1.62F (242,16)
1.35F (296,16)
1.02 ( 28, 8)
!
0.66F (247,16)
0.60 (169,16)
0.68 (360,16)
0.95 (175.24)
1.01F (229,16)
1.04F (295,16)
1.14F (186,16)
2.41 (103, 8}
0.74F (165.16)
0.68 ( 28,16)
0.36 ( 28,16)
3,12 ( 82, 8}
4,28 ( 83, 8)
1.96 (341,24)
0.66F (173,24)
0.81F (173,24)
0.92F (224,16)
1.56F (175.16)
3.40 ( 27.24)
4.40 (298,24)
3.10 (196, 8)
0.43 { 63, 8)
0.40 { 24,24)
0.97F (187,16)
0.68 (160,24)
1.17F (242,16)
1.1 1F (242,16)
1.06 ( 93t 8)
1.64 (231, 8)
0.49 (186,24)
0.49F (283,16)
0.55F (247,16)
0.60F (258,16)
0.90F (199.16)
1.06 { 27,24)
1.31 ( 27,24)
0.92 ( 93, 8)
1.96 (252, 3)
1.74 { 28, 3)
2.19 (236, 6)
0.74 ( 45,24)
0.82 (303,18)
0.80 ( 63, 9)
0.81 ( 76, 6)
2,23 ( 28. 9)
1.25 ( 27,24)
2.94F (187,12)
1.13 ( 93, 3)
HOUR)
4
0.56 (140,24)
0.58 (283,24)
0.67 (283,24)
0.84 (140,24)
0.83F (104.16)
0.99F (173,16)
1.14 (197, 8)
1.49 (197,24)
0.69F (200,16)
0.55F (165,16)
0.85 (140,24)
3.07 (236, 8)
3.30F (296,16)
1.85 (225, 8)
0.55F (231.16)
0.69F (141.16)
0.77 (210.24)
1.55 (331,24)
2.05 (210,24)
3.89 (323, 8)
2.89 (294, 8)
0.38F (186,16)
0.39 (241,24)
0.94F (214,16)
0.66 (131,16)
1.08 ( 93,24)
1.06 (252, 8)
1.02 (231. 8)
1.34 (233, 8)
0.34 (240.24)
0.46 (160,24)
0.44 ( 63, 8)
0.32 (131,16)
0.59F (242,16)
0.42F (235,16)
1.22F (245,16)
0.73 ( 92,24)
9( 450.00,4570.00) 1.09F (231,16) 1.08F <216,16) 0.74F (165.16) 0.69F (200,16) 0.59 ( S1
10< 450.00.4580.00) 1.06F (224,24) 0.88 ( 51,24) 0.68 ( 28,16) 0.55F (165.16) 0.54F (265
11( 450.00,4590.00) 1.01 (164,24) 0.90 < 51,24) 0.86 ( 28,16) 0.85 (140,24) 0.82 (2<»1
12( 450.00,4600.00) 5.37 (197, 8) 3.66 (235,24) 3,12 ( 82, 8} 3.07 (236, 8) 2.20 CZT
13( 450.00,4605.00} « 9.23 (204, 8) 4.39 (203, 8) 4,28 ( 83, 8) 3.30F (296,16) 3.26 (22d
14< 450.00,4610.00) 2.56 (267, 8) 2.20 ( 62,24) 1.96 (341,24) 1.85 (225, 8) 1,70 (132
15( 455.00,4570.00) 0.83F (210,16) 0.68F ( 97,16) 0.66F (173,24) 0.55F (231.16) 0.55F (21!
16( 455.00,4580.00) 0.85F ( 97,16) 0.83F (282,16) 0.81F (173,24) 0.69F (141,16) 0.61F O6<
17( 455.00,4590.00) 1.38F (173,24) 1.18F { 97,16) 0.92F (224,16) 0.77 (210,24) 0.75F (23
18(455.00,4600.00) 2.18 (186,24) 1.91 (215,24) 1.56F (175.16) 1.55 (331,24) 1.46 (29
19( 455.00,4605.00) 4.17F (242,16) 3.78 ( 63, 8) 3.40 ( 27,24) 2.05 (210,24) 1.84 (10:
20< 455.00,4610.00) 6.44 (113, 8) * 5.31 ( 63, 8) 4.40 (298,24) 3.89 (323, 8) 3.48 (25!
21< 455.00,4615.00) 3.35 (295, 8) 3.U (292, S) 3.10 (196, 8) 2.89 (294, 8) 2.66 ( 5<
22( 465.00,4570.00) 1.08F (164,16) 0.61 (241,24) 0.43 { 63, 8) 0.38F (186,16) 0.31 (24(
23( 465,00,4580.00) 0.52 < 63, 8) 0.45 (186,24) 0.40 ( 24,24) 0.39 (241,24) 0.38 ( I
24{ 465,00,4590.00) 1.41 { 63, 8) 1.15F (283,16) 0.97F (187,16) 0.94F (214,16) 0.60 (16(
25( 465.00,4600.00) 2.22F (174,16) 1.75F (216,16) 0.68 (160,24) 0.66 (131,16) 0.57F (251
26( 465.00,4605.00) 3.23 ( 63, 8) 1.89F (235,16) 1.17F (242,16) 1.08 ( 93,24) 0.84F <24
27( 465.00,4610.00) 2.06F (245,16) 1.25F (296,16) 1.11F (242,16) 1.06 (252, 8} 0.90 ( 2
28( 465.00,4615.00) 1.39 ( 28, 8) 1.20 (232, 8} 1.06 ( 93t 8) 1.02 (231. 8) 0.98F (24
29( 465.00.4620.00) 1.72 (199, 8) 1.64 { 62,24) 1.64 (231. 8) 1.34 (283, 8) 1.32 ( 2;
30( 475.00,4570.00) 0.56F (283,16) 0.55 { 63, 8) 0.49 (186,24) 0.34 (240.24) 0.34 (33
31( 475.00,4580.00) 0.75 ( 63, 8) 0.62F (187,16) 0.49F (283,16) 0.46 (160,24) 0.38 (1S
32( 475.00,4590.00) 0.66 ( 93,24) 0.62F (216,16) 0.55F (247,16) 0.44 ( 63, 8) 0.42 <
33( 475.00.4600.00) 1.14F (174,16) 0.75 ( 93,24) 0.60F (258,16) 0.32 (131,16) 0.30 { 7
34(475.00,4605.00) 2.19 (63,8) 1.11F (235,16) 0.90F (199.16) 0.59F (242,16) 0.56 (2
35( 475.00,4610.00) 1.65F (296,16) 1.62F (242,16) 1.06 { 27,24) 0.42F (235,16) 0.36 ( 6
36(475.00,4615.00) 1.44F (242,16) 1.35F (296,16) 1.31 (27,24) 1.22F (245,16) 1.12F{18
37( 475.00,4620.00) 1.32F (245,16) 1.02 ( 28, 8) 0.92 ( 93, 8) 0.73 ( 92.24) 0.64 (13
-------
(MICROGRAMS/M«*3)
RECEPTOR
1( 435.00,4570.00)
2( 435.00,4580.00)
3( 435.00,4590.00)
4( 435.00.4600.00)
5( 445.00,4570.00)
6( 445.00,4580.00)
7( 445.00,4590.00)
8( 445.00,4600.00)
9( 450.00,4570.00)
10( 450.00,4580.00)
11( 450.00,4590.00)
12( 450.00,4600.00)
13( 450.00,4605.00) •
14( 450.00,4610.00)
15( 455.00,4570.00)
16( 455.00,4580.00)
17( 455.00,4590.00)
18( 455.00,4600.00)
19( 455.00,4605.00)
20( 455.00.4610.00)
21( 455.00,4615.00)
22( 465.00.4570.00)
23( 465.00,4580.00)
24( 465.00.4590.00)
25< 465.00,4600.00)
26( 465.00.4605.00)
1
0.33F (176,24)
0.54F (198,24)
0.30 (360,24)
0.51 (302.24)
0.46F (231,24)
0.50 (140,24)
0.71 (197,24)
1.25 (327,24)
0.49F (216,24)
0.36F (224.24)
0.48F (164,24)
2.29 (197.24)
3.36 (204,24)
0.97F (267,24)
0.37F (173,24)
0.29F (173.24)
0.46F (173,24)
0.97F (186.24)
1.41F (242,24)
2.30 <113,24) •
1.29 (292,24)
0.39F (164,24)
0.24 ( 63,24)
0.49 ( 63.24)
0.74F (174,24)
1.08 ( 63.24)
0.28 (197,24)
0.26 (169,24)
0.29 ( 63,24)
0.42 (272.24)
0.39F (242,24)
0.49F (173.24)
O.S1F ( 97,24)
0.9SF (138.24)
0.37F (231,24)
0.29 ( 51,24)
0.36 (140,24)
1.62F (236,24)
1.74 (342,24)
0.85 ( 62,24)
0.29F (210,24)
0.28F ( 97.24)
0.43 (323,24}
0.65F (215.24)
1.28 ( 63,24)
2.08 ( 6,24)
1.23F (295,24)
0.21 ( 63,24)
0.23F (186.24)
0.40F (187.24)
0.58F (216,24)
0.63F (235,24)
0.23F (247,24)
0.25F (190.24)
0.29F (190,24)
0.36 (140.24)
0.34F (229,24)
0.41F (295.24)
0.46F (210,24)
0.88 (103.24)
0.25F (165,24)
0.27 ( 28,24)
0.34 ( 28,24)
1.41 ( 82,24)
1.55 (203,24)
0.76 (225,24)
0.23F ( 97,24)
0.28F (282.24)
0.39F ( 97,24)
0.57F (175,24)
1.16 ( 27,24)
1.95 (323.24)
1.03F (196,24)
0.20F (241,24)
0.14F (241,24)
0.38F (283.24)
0.2S (160,24)
0.42 ( 93.24)
0.23F (186,24)
0.23F (236,24)
0.27 (169,24)
0.32F (175,24)
0.32 (140,24)
0.39F (210,24)
0.45F (236,24)
0.76F (258,24)
0.24F (200,24)
0.21 (303,24)
0.32 ( 58,24)
1.24F (235.24)
1.49 (226,24)
0.67 (139,24)
0.20F (231,24)
0.26F (164,24)
0.33F (224,24)
0.57 (213,24)
1.00F (210,24)
t.77 ( 63,24)
1.01 ( 54,24)
0.17F (186,24)
0.14 (144,24)
0.36F (186,24)
0.24F (258,24)
0.39F (242,24)
0.22 (140,2
0.21 (360,2
0.23F (283,2
0.25 ( 63,2
0.30 (327,2
0.38 ( 82,2
0.43 (227,2
0.73 (360,2^
0.20 ( H8,c
0.19 ( 58,2'
0.32 C257.2'
1.07 ,'271,2'
1.46 ( 83,2'
0.65 (341,2'
0.20F (215,2'
0.26 (323,2'
0.30F (210,2'
O.S7 (323,2'
0.97 (103,2^
1.68 ( 40,2'
0.96 (294,2'
0.16 (144,2'
0.14 (331,2'
0.31F (214.2-
0.23 (131,2'
0.28F (247,2<
27( 465.00,4610.00)
28( 465.00,4615.00)
29( 465.00,4620.00)
30( 475.00,4570.00)
31( 475.00.4580.00)
32( 475.00,4590.00)
33( 475.00,4600.00)
34( 475.00.4605.00)
35( 475.00,4610.00)
36( 475.00.4615.00)
37( 475.00,4620.00)
QUEUE
0.69F (245,24)
0.81 ( 93.24)
0.58F (199,24)
0.23F (186,24)
0.25 ( 63,24)
0.22 ( 6,24)
0.38F (174,24)
0.73 ( 63,24)
0.55F (296,24)
0.49F (242,24)
0.56 ( 93,24)
0.51 ( 93,24)
0.69 ( 92.24)
0.55F (283.24)
0.19 ( 63,24)
0.21F (186,24)
0.22 ( 93,24)
0.25 ( 93,24)
0.37F (235,24)
0.54F (242,24)
0.48F (296,24)
0.48 ( 92,24)
0.4SF (296,24)
0.46 ( 28,24)
0.55 ( 62,24)
0.19F (283,24)
0.21F (187.24)
0.21F (216.24)
0.20F (258,24)
0.30F (199.24)
0.35 ( 27.24)
0.44 ( 27,24)
0.44F (245,24)
0.41 ( 92,24)
0.43 (252,24)
0.55F (231,24)
0.14 (331,24)
0.21 (323.24)
0.18F (247,24)
0.17 (131,24)
0.28 ( 28,24)
0.23 ( 92,24)
0.41F (245,24)
0.34 ( 28,24)
0.39 (131,2*
0.40F (283,2*
0.46F C236.2*
0.13F t240,2<
0.17 (303, 21
0.15 ( 63, 2<
0.13 ( 76, 21
0.20F (242, 2<
0.14F (235, 21
0.40 ( 92, 2<
0.28 (239, 2<
-------
TECHNICAL REPORT DATA
(Please read Instructions on the reverse before completing)
1. REPORT NO. 2.
EPA-450/4-88-016
4. TITLE AND SUBTITLE
User's Guide to SDM: A Shoreline Dispersion Model,
EPA-450/4-88-016
7. AUTHORtS)
9. PERFORMING ORGANIZATION NAME AND ADDRESS
PEI Associates
11499 Chester Road
Cincinnati, OH 45246
••1. SPONSORING AGENCY NAME AND ADDRESS
Office of Air Quality Planning and Standards
Technical Support Division
U.S. Environmental Protection Agency
Research Triangle Park, NC 27711
3. RECIPIENT'S ACCESSION NO,
5. REPORT DATE
September 1938
6. PERFORMING ORGANIZATION CODE
8. PERFORMING ORGANIZATION REPORT NC
10. PROGRAM ELEMENT NO.
11. CONTRACT/GRANT NO.
68-02-4351
13. TYPE OF REPORT AND PERIOD COVERED
14. SPONSORING AGENCY CODE
15. SUPPLEMENTARY NOTES
16. ABSTRACT
The Shoreline Dispersion Model (SDM) is a multipoint Guassian dispersion model
that can be used to determine ground-level concentrations from tall stationary point
sources that are influenced by the unique meteorological phenomenon in a shoreline
environment. The SDM model is a hybrid model that utilizes a shoreline fumigation
model to determine the hours during the year when fumigation events are expected and
that uses the EPA MPTER model to determine the remaining hours. The advantage of the
SDM hybrid model is that it can provide the total impact of a source, i.e., the
source itself and other nearby sources. This user's guide provides an overview of
the program, its routines, and algorithms and describes the model input/output.
17.
KEY WORDS AND DOCUMENT ANALYSIS
DESCRIPTORS
b.IDENTIFIERS/OPEN ENDED TERMS
c. COSATI Field/Group
Air Pollution
Meteorology
Air Quality Dispersion Model
Computer Model
Shoreline/Coastal Meteorology
Industrial Sources
New Source Review
Air Pollution Control
13B
18. DISTRIBUTION STATEMENT
Release Unlimited
19. SECURITY CLASS (This Report I
Unclassified
21. NO. OF PAGES
243
20. SECURITY CLASS (Thupage)
22. PRICE
------- |