FMSGET

PURPOSE: Read a FMS Vector File

SYNOPSIS

INPUT PARAMETERS:

• LUFMS(25) = Integer array.
  FMS Vector File Attribute List which defines the file where the data is to be read.

• NROWS = Integer.
  The number of rows to transfer.

• NCOLS = Integer.
  The number of columns to transfer.

• IROW1 = Integer.
  The starting global row where you want to read the block.

• JCOL1 = Integer.
  The starting global column where you want to read the block.

• LDA = Integer.
  The leading dimension of the DATA array. This must be at least as big as NROWS.

OUTPUT PARAMETERS:

• DATA(NROWS,NCOLS) = Real or Complex array.
  This is the array of data you want to transfer from the file, in normal FORTRAN storage.

FMS PARAMETERS:

Parameter	Description
IOKIDS	Allow children to access a file

DESCRIPTION:

To use this subroutine, the file LUFMS must be opened and populated with data.

You then initialize FMSGET to receive data by making the following call:

CALL FMSGET (LUFMS, 0, 0, 0, 0, 0, 0)

The 0 value arguments direct FMS to initialize the files for read access. This call must precede calls to FMSGET which transfer data.

The second step is to call FMSGET as many times as you want to read the data.

The final step is to direct FMS to release any storage. This is accomplished by making the following call:

CALL FMSGET (LUFMS, 0, 0, NUMEQ+1, 0, 0, 0)

where the value of IROW1=NUMEQ+1 is greater than the number of equations.

You may call FMSGET from subroutines you are running in parallel (which you started by calls to FMSPAR). To use this feature, you must direct FMS to open the file LUFMS for access by multiple processes. Use the FMS Parameter IOKIDS before the call which opens file LUFMS.

Examples