European Space Agency¶
Royal Belgian Institute for Aeronomy¶
ua634 - compute mass density from number density¶
- subroutine ua634(dens, nsp, ksp, kflg, cs, tmass, ifail)¶
- Parameters:
dens (30) [real8,in] :: number density (see note in
ua630())nsp [integer4,in] :: number of species
ksp (30) [integer4,in] :: list of species codes
kflg [integer4,in] :: control parameter
cs (30) [real8,in] :: cross section (see note in
ua630())tmass [real8,out] :: averaged mass
ifail [integer4,out] :: error flag (see Diagnostics)
Description¶
The subroutine
ua634()averages the number densities of atmospheric component with different weighting. The weighting algorithm is selected by the argumentkflg:
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 argumentcs;when
kflg=2, the number densities are only weighted by the factor stored in argumentcs.Generally the argument
csis used to specify a particle cross section.
Diagnostics¶
-63401, invalid species code
-63402, invalid value for kflg
Common Blocks¶
Dependencies¶
Called by
Calls¶
None
See also¶
None
Reported Bugs¶
None
Examples¶
None
UNILIB/tags/v3.03