Lines Matching defs:DCHK4
1409 SUBROUTINE DCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, subroutine
1424 DOUBLE PRECISION ZERO
1427 DOUBLE PRECISION EPS, THRESH
1428 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA, IORDER
1429 LOGICAL FATAL, REWI, TRACE
1430 CHARACTER*12 SNAME
1432 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1433 $ AS( NMAX*NMAX ), B( NMAX, NMAX ),
1434 $ BB( NMAX*NMAX ), BET( NBET ), BS( NMAX*NMAX ),
1435 $ C( NMAX, NMAX ), CC( NMAX*NMAX ),
1436 $ CS( NMAX*NMAX ), CT( NMAX ), G( NMAX )
1437 INTEGER IDIM( NIDIM )
1439 DOUBLE PRECISION ALPHA, ALS, BETA, BETS, ERR, ERRMAX
1440 INTEGER I, IA, IB, ICT, ICU, IK, IN, J, JC, JJ, K, KS,
1441 $ LAA, LCC, LDA, LDAS, LDC, LDCS, LJ, MA, N, NA,
1442 $ NARGS, NC, NS
1443 LOGICAL NULL, RESET, SAME, TRAN, UPPER
1444 CHARACTER*1 TRANS, TRANSS, UPLO, UPLOS
1445 CHARACTER*2 ICHU
1446 CHARACTER*3 ICHT
1448 LOGICAL ISAME( 13 )
1450 LOGICAL LDE, LDERES
1457 INTEGER INFOT, NOUTC
1458 LOGICAL OK
1460 COMMON /INFOC/INFOT, NOUTC, OK
1535 10 CONTINUE
1540 20 CONTINUE
1587 30 CONTINUE
1631 40 CONTINUE
1634 50 CONTINUE
1636 60 CONTINUE
1638 70 CONTINUE
1640 80 CONTINUE
1642 90 CONTINUE
1644 100 CONTINUE
1657 110 CONTINUE
1661 120 CONTINUE
1688 * End of DCHK4. argument