QCKIN(3)

SYNOPSIS
SUBROUTINE QCKIN (LUN, KPRINT, IPASS)

NAME
qckin - Quick check for BSKIN.

LIBRARY
SLATEC

KEYWORDS
QUICK CHECK

AUTHOR
Amos, D. E., (SNLA)

DESCRIPTION
ABSTRACT QCKIN IS A QUICK CHECK ROUTINE WHICH EXERCISES THE MAJOR LOOPS IN SUBROUTINE BSKIN (X,N,KODE,M,Y,NZ,IERR) FOR BICKLEY FUNCTIONS KI(J,X). MORE PRECISELY, QCKIN DOES CONSISTENCY CHECKS ON THE OUTPUT FROM BSKIN BY COMPARING SINGLE EVALUATIONS (M=1) AGAINST SELECTED MEMBERS OF SEQUENCES WHICH ARE GENERATED BY RECURSION. IF THE RELATIVE ERROR IS LESS THAN 1000 TIMES UNIT ROUND OFF, THEN THE TEST IS PASSED - IF NOT, THEN X, THE VALUES TO BE COMPARED, THE RELATIVE ERROR AND PARAMETERS KODE, N, M AND K ARE WRITTEN ON LOGICAL UNIT 6 WHERE K IS THE MEMBER OF THE SEQUENCE OF LENGTH M WHICH FAILED THE TEST. THAT IS, THE INDEX OF THE FUNCTION WHICH FAILED THE TEST IS J=N+K-1. UNDERFLOW TESTS ARE MADE AND ERROR CONDITIONS ARE TRIGGERED. FUNCTIONS I1MACH AND R1MACH MUST BE INITIALIZED ACCORDING TO THE PROLOGUE IN EACH FUNCTION FOR THE MACHINE ENVIRONMENT BEFORE QCKIN OR BSKIN CAN BE EXECUTED. FIFTEEN MACHINE ENVIRONMENTS CAN BE DEFINED IN I1MACH AND R1MACH.

ROUTINES CALLED
BSKIN, I1MACH, R1MACH

REVISION HISTORY (YYMMDD)
820601 DATE WRITTEN
890911 Removed unnecessary intrinsics. (WRB)
890911 REVISION DATE from Version 3.2
891214 Prologue converted to Version 4.0 format. (BAB)