European Space Agency

Royal Belgian Institute for Aeronomy

ut993 - Store a magnetic field drift shell

subroutine  ut993(kusumma, kushell, ifail)

Parameters:

• kusumma [integer4,in] :: File unit.

• kushell [integer4,in] :: File unit.

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

Description

The subroutine ut993() prints two files with data relative to the magnetic drift shell stored in the common blocks uc110, uc120, and uc130. The arguments kusumma and kushell are used to specify the file units. Both files are printed in ASCII format.

The body of the first file (kusumma) contains one text line per magnetic field line which includes the location of the foot and mirror points, the location where the magnetic field intensity is minimum on the field line, the value of minimum intensity, and the total length between the two mirror points. One should note that the generated text contains 136 characters and that for some FORTRAN compilers the record length has to be given explicitely. The header of the file contains the exact definitions of each column present in the body part.

The second file (kushell) contains all the magnetic field line segments of the drift shell. The body of the file is divided in blocks, each block containing a field line segment. The first line of each block contains the number of points listed in the block. Each following text line is relative to a single geographic point along the field line. Only the points located between the two mirror points are included. The text line includes the geographic location, the intensity and spherical components of the magnetic field, the local radius of curvature of the field line, and the arc length along the field line. See the header of the file for an exact definition of each column present in the body part.

The header of both files has a similar format that includes the number of columns (first integer), the number of field line segments (third integer), and the column definitions. Note that the format has been choosen to be easily read by IDL or other graphical tools.

Diagnostics

• -99301, incorrect file number

• -99302, no drift shell

• -99303,-99304, corrupted field line

• -99305, error on output device kusumma

• -99306, error on output device kushell

Common Blocks

• uc110 - magnetic drift shell

• uc120 - magnetic field line

• uc130 - magnetic field line segments

• uc160 - general constants

Dependencies

Called by

None

Calls

None

See also

• ut992 - print the magnetic drift shell

Reported Bugs

None

Examples

None

---

UNILIB/tags/v3.02