Lines Matching defs:SCHK4
1432 SUBROUTINE SCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, subroutine
1446 REAL ZERO, HALF, ONE
1449 REAL EPS, THRESH
1450 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA
1451 LOGICAL FATAL, REWI, TRACE
1452 CHARACTER*6 SNAME
1454 REAL A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1455 $ AS( NMAX*NMAX ), G( NMAX ), X( NMAX ),
1456 $ XS( NMAX*INCMAX ), XX( NMAX*INCMAX ),
1457 $ Y( NMAX ), YS( NMAX*INCMAX ), YT( NMAX ),
1458 $ YY( NMAX*INCMAX ), Z( NMAX )
1459 INTEGER IDIM( NIDIM ), INC( NINC )
1461 REAL ALPHA, ALS, ERR, ERRMAX, TRANSL
1462 INTEGER I, IA, IM, IN, INCX, INCXS, INCY, INCYS, IX,
1463 $ IY, J, LAA, LDA, LDAS, LX, LY, M, MS, N, NARGS,
1464 $ NC, ND, NS
1465 LOGICAL NULL, RESET, SAME
1467 REAL W( 1 )
1468 LOGICAL ISAME( 13 )
1470 LOGICAL LSE, LSERES
1477 INTEGER INFOT, NOUTC
1478 LOGICAL LERR, OK
1480 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1555 10 CONTINUE
1559 20 CONTINUE
1563 30 CONTINUE
1608 40 CONTINUE
1621 50 CONTINUE
1625 60 CONTINUE
1641 70 CONTINUE
1647 80 CONTINUE
1649 90 CONTINUE
1651 100 CONTINUE
1653 110 CONTINUE
1655 120 CONTINUE
1666 130 CONTINUE
1690 * End of SCHK4. argument