KPG1_ASFIL

Reads spatial positions from a text file

Description:

This routine obtains formatted positions from a text file specified by an environment parameter. The positions are assumed to represent axis values in the supplied Frame.

The file should contain one position per line. Each position is given by a set of strings delimited by comma, space or tab (the first gives the value for Axis 1, the second for Axis 2, etc.). The number of strings per line should equal the number of axes in the supplied Frame. The user can specify the columns to use using Parameter PARAM2.

The file may contain blank lines, and comment lines commencing with " !" or " #" .

Invocation

CALL KPG1_ASFIL( PARAM1, PARAM2, FRM, NP, IPOUT, FNAME, STATUS )

Arguments

PARAM1 = CHARACTER ( ) (Given)
The name of an environment parameter to use to get the file.
PARAM2 = CHARACTER ( ) (Given)
The name of an environment parameter to use to get the indices of the columns within the text file which are to be used. If blank, the file must contain a column for every axis in FRM, all of which are used in the order 1, 2, 3, etc.
FRM = INTEGER (Given)
A pointer to an AST Frame.
NP = INTEGER (Returned)
The number of positions read from the file.
IPOUT = INTEGER (Returned)
A pointer to an _DOUBLE array " COR( NP, )" holding the obtained co-ordinates. The second dimension of the array is equal to the number of axes in the suppleid Frame. Should be released using PSX_FREE when no longer needed.
FNAME = CHARACTER ( ) (Returned)
The file s name. Not accesed if the declared length of the supplied string is 1 character.
STATUS = INTEGER (Given and Returned)
The global status.