C8.04. FMS Subroutine FMSPRM

FMSPRM

PURPOSE: Print a FMS Matrix

To print a matrix stored in FMS format.

SYNOPSIS



CALL FMSPRM (LUA, NMSG)

INPUT PARAMETERS:

LUA(25) = Integer array.
File attribute list for the matrix.
NMSG = Integer.
Heading message number.
= 1, 'LOWER TRIANGLE MATRIX BEFORE FACTORING.' 'MATRIX DIAGONAL.' 'UPPER TRIANGLE MATRIX BEFORE FACTORING.' = 2, 'LOWER TRIANGLE MATRIX AFTER FACTORING.' 'DIAGONAL FACTOR RECIPROCALS.' 'UPPER TRIANGLE MATRIX AFTER FACTORING.'

OUTPUT PARAMETERS:

None.

FMS PARAMETERS:

The following FMS Parameters are especially important to this routine:

Parameter Description
LUPR Output unit number
NEQPR1 Lower limit on equation to print
NEQPR2 Upper limit on equation to print
NROWPG Number of rows per page
NCOLPG Number of columns per page
IFMAT Format for printing integers
RFMAT Format for printing real numbers
CFMAT Format for printing complex numbers

Parameter	Description
LUPR	Output unit number
NEQPR1	Lower limit on equation to print
NEQPR2	Upper limit on equation to print
NROWPG	Number of rows per page
NCOLPG	Number of columns per page
IFMAT	Format for printing integers
RFMAT	Format for printing real numbers
CFMAT	Format for printing complex numbers

DESCRIPTION:

This subroutine prints the lower triangular, diagonal, and upper triangular (nonsymmetric) parts of a matrix. Terms that fall outside the matrix profile are printed as blanks. This subroutine may be used to print the original matrix [A] or the matrix factors [L], [1/D], and [U]. For symmetric matrices, no upper triangle data is printed.

The FMS parameters NEQPR1 and NEQPR2 may be used to set lower and upper limits on the range of equations printed. For the lower triangular matrix, the range is on rows. For the upper triangular matrix, the range is on columns. Only the diagonals between NEQPR1 and NEQPR2 are printed.