CSPQC(3)

SYNOPSIS
SUBROUTINE CSPQC (LUN, KPRINT, NERR)

NAME
cspqc - Quick check for CSPFA, CSPCO, CSPSL and CSPDI.

LIBRARY
SLATEC

KEYWORDS
QUICK CHECK

AUTHOR
Voorhees, E. A., (LANL)

DESCRIPTION
LET A*X=B BE A COMPLEX LINEAR SYSTEM WHERE THE MATRIX A IS OF THE PROPER TYPE FOR THE LINPACK SUBROUTINES BEING TESTED. THE VALUES OF A AND B AND THE PRE-COMPUTED VALUES OF C (THE SOLUTION VECTOR), AINV (INVERSE OF MATRIX A ), DC (DETERMINANT OF A ), AND RCND ( RCOND ) ARE ENTERED WITH DATA STATEMENTS. THE COMPUTED TEST RESULTS FOR X, RCOND, THE DETERMINANT, AND THE INVERSE ARE COMPARED TO THE STORED PRE-COMPUTED VALUES. FAILURE OF THE TEST OCCURS WHEN AGREEMENT TO 3 SIGNIFICANT DIGITS IS NOT ACHIEVED AND AN ERROR MESSAGE INDICATING WHICH LINPACK SUBROUTINE FAILED AND WHICH QUANTITY WAS INVOLVED IS PRINTED. A SUMMARY LINE IS ALWAYS PRINTED. NO INPUT ARGUMENTS ARE REQUIRED. ON RETURN, NERR (INTEGER TYPE) CONTAINS THE TOTAL COUNT OF ALL FAILURES DETECTED BY CSPQC.

ROUTINES CALLED
CSPCO, CSPDI, CSPFA, CSPSL

REVISION HISTORY (YYMMDD)
801021 DATE WRITTEN
890618 REVISION DATE from Version 3.2
891214 Prologue converted to Version 4.0 format. (BAB)
901010 Restructured using IF-THEN-ELSE-ENDIF and cleaned up FORMATs. (RWC)