CGEQC(3)

SYNOPSIS
SUBROUTINE CGEQC (LUN, KPRINT, NERR)

NAME
cgeqc - Quick check for CGEFS and CGEIR.

LIBRARY
SLATEC

TYPE
COMPLEX (SGEQC-S, DGEQC-D, CGEQC-C)

KEYWORDS
QUICK CHECK

AUTHOR
Jacobsen, Nancy, (LANL)

DESCRIPTION
Let A*X=B be a COMPLEX linear system where the matrix is of the proper type for the Linpack subroutines being called. The values of A and B and the pre-computed values of BXEX (the solution vector) are given in DATA statements. The computed test results for X are compared to the stored pre-computed values. Failure of the test occurs when there is less than 80% agreement between the absolute values. There are 2 tests - one for the normal case and one for the singular case. A message is printed indicating whether each subroutine has passed or failed for each case. On return, NERR (INTEGER type) contains the total count of all failures detected.

ROUTINES CALLED
CGEFS, CGEIR

REVISION HISTORY (YYMMDD)
801029 DATE WRITTEN
890618 REVISION DATE from Version 3.2
891214 Prologue converted to Version 4.0 format. (BAB)
920601 Code reworked and TYPE section added. (RWC, WRB)