Lines Matching defs:CCHK5
1611 SUBROUTINE CCHK5( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, subroutine
1626 COMPLEX ZERO, ONE
1628 REAL RONE, RZERO
1631 REAL EPS, THRESH
1632 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA
1633 LOGICAL FATAL, REWI, TRACE
1634 CHARACTER*6 SNAME
1636 COMPLEX AA( NMAX*NMAX ), AB( 2*NMAX*NMAX ),
1637 $ ALF( NALF ), AS( NMAX*NMAX ), BB( NMAX*NMAX ),
1638 $ BET( NBET ), BS( NMAX*NMAX ), C( NMAX, NMAX ),
1639 $ CC( NMAX*NMAX ), CS( NMAX*NMAX ), CT( NMAX ),
1640 $ W( 2*NMAX )
1641 REAL G( NMAX )
1642 INTEGER IDIM( NIDIM )
1644 COMPLEX ALPHA, ALS, BETA, BETS
1645 REAL ERR, ERRMAX, RBETA, RBETS
1646 INTEGER I, IA, IB, ICT, ICU, IK, IN, J, JC, JJ, JJAB,
1647 $ K, KS, LAA, LBB, LCC, LDA, LDAS, LDB, LDBS,
1648 $ LDC, LDCS, LJ, MA, N, NA, NARGS, NC, NS
1649 LOGICAL CONJ, NULL, RESET, SAME, TRAN, UPPER
1650 CHARACTER*1 TRANS, TRANSS, TRANST, UPLO, UPLOS
1651 CHARACTER*2 ICHT, ICHU
1653 LOGICAL ISAME( 13 )
1655 LOGICAL LCE, LCERES
1662 INTEGER INFOT, NOUTC
1663 LOGICAL LERR, OK
1665 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1767 10 CONTINUE
1771 20 CONTINUE
1780 30 CONTINUE
1843 40 CONTINUE
1881 50 CONTINUE
1903 60 CONTINUE
1922 70 CONTINUE
1925 80 CONTINUE
1927 90 CONTINUE
1929 100 CONTINUE
1931 110 CONTINUE
1933 120 CONTINUE
1935 130 CONTINUE
1946 140 CONTINUE
1950 150 CONTINUE
1981 * End of CCHK5. argument