European Space Agency

European Space Agency

Royal Belgian Institute for Aeronomy

Royal Belgian Institute for Aeronomy

../_images/whiteSpace.png

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 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.

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.02