trend

- 4

Trapped Radiation ENvironment model Development

UA610

[ Name | Synopsis | Arguments | Description | Diagnostics | Common Blocks | Dependencies | See Also | Reported Bugs | Examples ]

Name

    Subroutine UA610 - select an atmospheric, ionospheric and/or plasmaspheric model

Synopsis

      INTEGER*4     kmodel, kunit, ifail
      RECORD /zdat/ mdate
      REAL*8        rzss, f107a, f107, fkpx,
     :              ap0, ap3, ap6, ap9, ap24, ap48
      CHARACTER*(*) lbatm
      
      CALL UA610 (kmodel, mdate, rzss, f107a, f107, fkpx,
                  ap0, ap3, ap6, ap9, ap24, ap48, lbatm, 
                  kunit,ifail)

Arguments

    kmodel
    Index of the model [in]
    mdate
    Date and time [in]
    rzss
    Sunspot number [in]
    f107a
    81-day averaged of F10.7 solar flux, centred on required day [in]
    f107
    daily F10.7 solar flux for previous day [in]
    fkpx
    maximum Kp value [in]
    ap0
    3-hour Ap index for current time [in]
    ap3
    3-hour Ap index for 3 hours before current time [in]
    ap6
    3-hour Ap index for 6 hours before current time [in]
    ap9
    3-hour Ap index for 9 hours before current time [in]
    ap24
    average of eight 3-hour Ap indexes form 12 to 35 hours prior to current time [in]
    ap48
    average of eight 3-hour Ap indexes form 36 to 59 hours prior to current time [in]
    lbatm
    label of the model [out]
    kunit
    file unit for the summary table (see note of subroutine UT990) [in]
    ifail
    Error flag (see diagnostics) [out]

Description

    The subroutine UA610 can be used to initialize the atmosphere, ionosphere, and plasmasphere description inside the common block UC150. The argument kmodel allows to select different models listed in the table below.

    kmodelModel description
    0
    No atmospheric model
    1
    MSISE-90 neutral atmosphere model including the species H, He, Ar, N2, O2, O. and N..
    2
    MSISE-90 atmospheric model combined with the ionospheric model IRI-90. The species included are H, He, Ar, N2, O2,O., N., H+, He+, N+, O+, NO+, O+2 and electrons.
    3
    Anderson & Francis atmospheric and ionospheric model including the species H, He, N2, O2, O., N., H+, He+, O+, NO+, O+2 and electrons.
    4
    A simple atmospheric model based on table of densities published in "Astrophysical Quantities" (Allen, 1985).
    5
    Pfitzer atmospheric model

    Note that the two last models do not include particular species. These two models provide only the mean density of neutral atmospheric constituents. The MSISE-90 and IRI-90 models depend on a set of flags stored in the common block UC150 for the subroutine UT990 assigns default values. The MSISE-90 model depends on the time, the F10.7 solar fluxes and all the planetary indices Ap. The Anderson & Francis model and the simple Allen model depend on the altitude only. The Pfitser model depends on the altitude and the the F10.7 solar fluxes. The IRI-90 model depends on the time, the sunspot number. The extension of the IRI-90 model to the plasmasphere (Carpenter & Anderson, 1992) depends also on the maximum Kp index.

Diagnostics

    -61001, incorrect date in argument mdate
    -61002, invalid model number
    -61003, error on output device

Common Blocks

    UC150, atmospheric model description

Dependencies

Called by

    None

Calls

    UT540, compute modified Julian Day from date
    UA612, provide a list of atmospheric constituents

See also

    UA630, evaluate the atmospheric densities
    UA631, Anderson and Francis atmosphere
    EXT630, Neutral Atmosphere Empirical Model MSISE-90
    FAQ G.04, International Reference Ionosphere (IRI)

Reported Bugs

    None

Examples

    #5, namelist to initialize UNILIB