Lines Matching defs:CCHK4
1491 SUBROUTINE CCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, subroutine
1505 COMPLEX ZERO, HALF, ONE
1508 REAL RZERO
1511 REAL EPS, THRESH
1512 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA
1513 LOGICAL FATAL, REWI, TRACE
1514 CHARACTER*6 SNAME
1516 COMPLEX A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1517 $ AS( NMAX*NMAX ), X( NMAX ), XS( NMAX*INCMAX ),
1518 $ XX( NMAX*INCMAX ), Y( NMAX ),
1519 $ YS( NMAX*INCMAX ), YT( NMAX ),
1520 $ YY( NMAX*INCMAX ), Z( NMAX )
1521 REAL G( NMAX )
1522 INTEGER IDIM( NIDIM ), INC( NINC )
1524 COMPLEX ALPHA, ALS, TRANSL
1525 REAL ERR, ERRMAX
1526 INTEGER I, IA, IM, IN, INCX, INCXS, INCY, INCYS, IX,
1527 $ IY, J, LAA, LDA, LDAS, LX, LY, M, MS, N, NARGS,
1528 $ NC, ND, NS
1529 LOGICAL CONJ, NULL, RESET, SAME
1531 COMPLEX W( 1 )
1532 LOGICAL ISAME( 13 )
1534 LOGICAL LCE, LCERES
1541 INTEGER INFOT, NOUTC
1542 LOGICAL LERR, OK
1544 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1620 10 CONTINUE
1624 20 CONTINUE
1628 30 CONTINUE
1680 40 CONTINUE
1693 50 CONTINUE
1697 60 CONTINUE
1715 70 CONTINUE
1721 80 CONTINUE
1723 90 CONTINUE
1725 100 CONTINUE
1727 110 CONTINUE
1729 120 CONTINUE
1740 130 CONTINUE
1765 * End of CCHK4. argument