trend

- 4

Trapped Radiation ENvironment model Development

UL245

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

Name

    Subroutine UL245 - equatorial pitch angle

Synopsis

      RECORD /zfln/ mlin
      RECORD /zlbl/ mlab
      INTEGER*4     ifail
      
      CALL UL245 (mlin, mlab, ifail )      

Arguments

    mlin
    magnetic field line segment descriptor [in]
    mlab
    magnetic parameter of a field line segment [in/out]
    ifail
    Error flag (see diagnostics) [out]

Description

    The subroutine UL245 determines the equatorial pitch angle associated to a magnetic field line segment. The equatorial pitch angle is obtained from the magnetic field intensities Bm and B0 measured at the mirror points and at the "equatorial" point, respectively. The value of Bm has to be stored in mlab.fbmp. The behaviour of the subroutine depends strongly on the argument kmflg of common block UC190:
    • When kmflg is equal to 0 or 1, the magnetic field intensity B0 is defined by M/L3 where M is the magnetic dipole moment and L is the shell parameter. The value of L has to be stored in mlab.flmi. The value of M is obtained from the argument gmagmo of common block UC160 (when kmflg=0) or from the argument mint.gmmo of common block UC140 (when kmflg=1).
    • When kmflg is equal to 10 or 11, the magnetic field intensity is determined from the argument mlin.equat.b.dnrm which corresponds to the lowest magnetic field intensity along the field line.

Diagnostics

    -24501, value of Bm not available
    -24502, value of L not available
    -24503, problem with the minimum value of B along the field line
    -24504, sinus greater than 1, forced to 90 degrees

Common Blocks

    UC140, magnetic field description
    UC160, general constants
    UC190, control parameters, set 1
    UC192, control parameters, set 2

Dependencies

Called by

    UF415, rebuild the labels of the field line

Calls

    None

See also

    UC170, temporary magnetic field line

Reported Bugs

    None

Examples

    None