HP 3000 Manuals

Compiler Library/XL Reference Manual

INVERT 

INVERT inverts a square matrix containing real numbers; the resulting
inverse is stored over the input matrix.

Declaration 

        TYPE real_matx=ARRAY[1..N, 1..N] OF real;

        PROCEDURE INVERT(n:SHORTINT; ANYVAR a:REAL_matx;
                         VAR d:SHORTINT); EXTERNAL;

Attributes 

Parameters:               For n, an integer for the order of the matrix;
                          for a, a real identifier of the matrix; for d,
                          an integer identifier.

Result:                   INVERT replaces the original matrix, and d is
                          equal to one if the matrix is non-singular or
                          zero if the matrix is singular and no inverse
                          exists.

HP FORTRAN 77/XL:         Callable as a system intrinsic:

                                    CALL INVERT(n, a, d)

Error:                    None.

MPE/iX 5.0 Documentation