QXBDF(3)

SYNOPSIS
SUBROUTINE QXBDF (LUN, KPRINT, IPASS)

NAME
qxbdf - Test the DEPAC routine DEBDF.

LIBRARY
SLATEC

TYPE
SINGLE PRECISION (QXBDF-S, QXDBDF-D)

KEYWORDS
QUICK CHECK

AUTHOR
Chow, Jeff, (LANL)

DESCRIPTION
*Usage: INTEGER LUN, KPRINT, IPASS CALL QXBDF (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: DEBDF is tested by solving the equations of motion of a body moving in a plane about a spherical earth, namely (D/DT)(D/DT)X = -G*X/R**3 (D/DT)(D/DT)Y = -G*Y/R**3 where G = 1, R = SQRT(X**2 + Y**2) and X(0) = 1 (D/DT)X(0) = 0 Y(0) = 0 (D/DT)Y(0) = 1.

ROUTINES CALLED
DEBDF, FDEQC, JAC, R1MACH

REVISION HISTORY (YYMMDD)
810801 DATE WRITTEN
890618 REVISION DATE from Version 3.2
891214 Prologue converted to Version 4.0 format. (BAB)
900415 Code extensively revised. (WRB)