dgssrp


NAME

dgssrp - Return permutation.


SYNOPSIS

 SUBROUTINE DGSSRP ( PERM, HANDLE, IER )
 INTEGER           PERM(*), IER
 DOUBLE PRECISION  HANDLE(150)


PURPOSE

DGSSRP - Returns the permutation used by the solver for the fill-reducing ordering.


PARAMETERS

PERM(NEQNS) - INTEGER array
Undefined on entry. PERM(NEQNS) is the permutation array used by the sparse solver for the fill-reducing ordering. Modified on exit.

HANDLE(150) - DOUBLE PRECISION array
On entry, HANDLE(*) is an array containing information needed by the solver, and must be passed unchanged to each sparse solver subroutine. Modified on exit.

IER - INTEGER
Error number. If no error encountered, unchanged on exit. If error encountered, it is set to a non-zero integer. Error numbers set by this subroutine:

 -600 : Invalid calling sequence - need to call DGSSOR first.

.