PCHQK2(3)

SYNOPSIS
SUBROUTINE PCHQK2 (LUN, KPRINT, IPASS)

NAME
pchqk2 - Test the PCHIP integrators PCHIA and PCHID.

LIBRARY
SLATEC (PCHIP)

TYPE
SINGLE PRECISION (PCHQK2-S, DPCHQ2-D)

KEYWORDS
PCHIP INTEGRATOR QUICK CHECK

AUTHOR
Fritsch, F. N., (LLNL)

DESCRIPTION
PCHIP QUICK CHECK NUMBER 2 TESTS THE INTEGRATORS: PCHIA, PCHID. *Usage: INTEGER LUN, KPRINT, IPASS CALL PCHQK2 (LUN, KPRINT, IPASS) *Arguments: LUN :IN is the unit number to which output is to be written. KPRINT:IN controls the amount of output, as specified in the SLATEC Guidelines. IPASS:OUT will contain a pass/fail flag. IPASS=1 is good. IPASS=0 indicates one or more tests failed. *Description: This routine constructs data from a cubic, integrates it with PCHIA and compares the results with the correct answer. Since PCHIA calls PCHID, this tests both integrators.

ROUTINES CALLED
PCHIA, R1MACH

REVISION HISTORY (YYMMDD)
820601 DATE WRITTEN
890306 Changed IPASS to the more accurate name IFAIL. (FNF)
890316 Added declarations as in DPCHQ2. (FNF)
890629 Appended E0 to real constants to reduce S.P./D.P. differences.
890706 Cosmetic changes to prologue. (WRB)
891004 Cosmetic changes to prologue. (WRB)
891214 Prologue converted to Version 4.0 format. (BAB)
900314 Improved some output formats. (FNF)
900315 Revised prologue and improved some output formats. (FNF)
900316 Additional minor cosmetic changes. (FNF)
900321 Removed IFAIL from call sequence for SLATEC standards and made miscellaneous cosmetic changes. (FNF)
901130 Added 1P's to formats; changed to allow KPRINT.gt.3. (FNF)
910708 Minor modifications in use of KPRINT. (WRB)
930317 Improved output formats. (FNF)