Lines Matching defs:CCHK4
1554 SUBROUTINE CCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, subroutine
1568 COMPLEX ZERO, HALF, ONE
1571 REAL RZERO
1574 REAL EPS, THRESH
1575 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA,
1576 $ IORDER
1577 LOGICAL FATAL, REWI, TRACE
1578 CHARACTER*12 SNAME
1580 COMPLEX A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1581 $ AS( NMAX*NMAX ), X( NMAX ), XS( NMAX*INCMAX ),
1582 $ XX( NMAX*INCMAX ), Y( NMAX ),
1583 $ YS( NMAX*INCMAX ), YT( NMAX ),
1584 $ YY( NMAX*INCMAX ), Z( NMAX )
1585 REAL G( NMAX )
1586 INTEGER IDIM( NIDIM ), INC( NINC )
1588 COMPLEX ALPHA, ALS, TRANSL
1589 REAL ERR, ERRMAX
1590 INTEGER I, IA, IM, IN, INCX, INCXS, INCY, INCYS, IX,
1591 $ IY, J, LAA, LDA, LDAS, LX, LY, M, MS, N, NARGS,
1592 $ NC, ND, NS
1593 LOGICAL CONJ, NULL, RESET, SAME
1595 COMPLEX W( 1 )
1596 LOGICAL ISAME( 13 )
1598 LOGICAL LCE, LCERES
1605 INTEGER INFOT, NOUTC
1606 LOGICAL OK
1608 COMMON /INFOC/INFOT, NOUTC, OK
1684 10 CONTINUE
1688 20 CONTINUE
1692 30 CONTINUE
1744 40 CONTINUE
1757 50 CONTINUE
1761 60 CONTINUE
1779 70 CONTINUE
1785 80 CONTINUE
1787 90 CONTINUE
1789 100 CONTINUE
1791 110 CONTINUE
1793 120 CONTINUE
1804 130 CONTINUE
1828 * End of CCHK4. argument