European Space Agency

Royal Belgian Institute for Aeronomy

ua612 - provide a list of atmospheric constituents

subroutine  ua612(ksp, n, lbl, ifail)

Parameters:

• ksp (30) [integer4,in] :: list of species number

• n [integer4,in] :: number of species

• lbl [character(*),out] :: output string

• ifail [integer4,out] :: error flag (see Diagnostics)

Description

The subroutine ua612() returns a string in argument lbl containing the list of the species set in the argument ksp. The valid values for argument ksp are listed in the table below.

1 = H	11 = CO2	21 = He+
2 = He	12 = NH3	22 = C+
3 = Ne	13 = CH4	23 = N+
4 = Ar	14 not used	24 = O+
5 = Kr	15 not used	25 = Ne+
6 = Xe	16 = O.	26 = N2+
7 = H2	17 = N.	27 = NO+
8 = N2	18 not used	28 = O2+
9 = O2	19 = e-	29 not used
10 = CO	20 = p+	30 not used

Diagnostics

• -61201, invalid species number

Common Blocks

None

Dependencies

Called by

• ua610 - select an atmospheric, ionospheric and/or plasmaspheric model

Calls

None

Reported Bugs

None

Examples

None

---

UNILIB/tags/v3.02