Lines Matching defs:CCHK4
1452 SUBROUTINE CCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, subroutine
1466 COMPLEX ZERO, HALF, ONE
1469 REAL RZERO
1472 REAL EPS, THRESH
1473 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA
1474 LOGICAL FATAL, REWI, TRACE
1475 CHARACTER*6 SNAME
1477 COMPLEX A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1478 $ AS( NMAX*NMAX ), X( NMAX ), XS( NMAX*INCMAX ),
1479 $ XX( NMAX*INCMAX ), Y( NMAX ),
1480 $ YS( NMAX*INCMAX ), YT( NMAX ),
1481 $ YY( NMAX*INCMAX ), Z( NMAX )
1482 REAL G( NMAX )
1483 INTEGER IDIM( NIDIM ), INC( NINC )
1485 COMPLEX ALPHA, ALS, TRANSL
1486 REAL ERR, ERRMAX
1487 INTEGER I, IA, IM, IN, INCX, INCXS, INCY, INCYS, IX,
1488 $ IY, J, LAA, LDA, LDAS, LX, LY, M, MS, N, NARGS,
1489 $ NC, ND, NS
1490 LOGICAL CONJ, NULL, RESET, SAME
1492 COMPLEX W( 1 )
1493 LOGICAL ISAME( 13 )
1495 LOGICAL LCE, LCERES
1502 INTEGER INFOT, NOUTC
1503 LOGICAL LERR, OK
1505 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1581 10 CONTINUE
1585 20 CONTINUE
1589 30 CONTINUE
1641 40 CONTINUE
1654 50 CONTINUE
1658 60 CONTINUE
1676 70 CONTINUE
1682 80 CONTINUE
1684 90 CONTINUE
1686 100 CONTINUE
1688 110 CONTINUE
1690 120 CONTINUE
1701 130 CONTINUE
1726 * End of CCHK4. argument