UA634
Subroutine UA634 - compute mass density from number density
REAL*8 dens(30), cs(30), tmass
INTEGER*4 nsp, ksp(30), kflg, ifail
CALL UA634 (dens, nsp, ksp, kflg, cs, tmass, ifail)
-
dens
-
Number density (see note of subroutine
UA630) [in]
-
nsp
-
Number of species [in]
-
ksp
-
List of species code [in]
-
kflg
-
Control parameter [in]
-
cs
-
Cross section (see note of subroutine
UA630) [in]
-
tmass
-
Averaged mass [out]
-
ifail
-
Error flag (see diagnostics) [out]
The subroutine UA634 averages the number densities of atmospheric
component with different weighting. The weighting algorithm is selected
by the argument kflg
:
- when
kflg
=0, the number densities are weighted
with the atomic mass of the constituents and argument tmass
corresponds to the total mass;
- when
kflg
=1, the number densities are weighted
by the atomic mass of the constituents and the factor stored in argument
cs
;
- when
kflg
=2, the number densities are only
weighted by the factor stored in argument cs
.
Generally the argument cs
is used to specify a particle
cross section.
Called by
UA630,
evaluate the atmospheric densities
UA636,
evaluate a weighted atmospheric mass
Calls