Lines Matching defs:CCHK6
2013 SUBROUTINE CCHK6( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, subroutine
2027 COMPLEX ZERO, HALF, ONE
2030 REAL RZERO
2033 REAL EPS, THRESH
2034 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA
2035 LOGICAL FATAL, REWI, TRACE
2036 CHARACTER*6 SNAME
2038 COMPLEX A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
2039 $ AS( NMAX*NMAX ), X( NMAX ), XS( NMAX*INCMAX ),
2040 $ XX( NMAX*INCMAX ), Y( NMAX ),
2041 $ YS( NMAX*INCMAX ), YT( NMAX ),
2042 $ YY( NMAX*INCMAX ), Z( NMAX, 2 )
2043 REAL G( NMAX )
2044 INTEGER IDIM( NIDIM ), INC( NINC )
2046 COMPLEX ALPHA, ALS, TRANSL
2047 REAL ERR, ERRMAX
2048 INTEGER I, IA, IC, IN, INCX, INCXS, INCY, INCYS, IX,
2049 $ IY, J, JA, JJ, LAA, LDA, LDAS, LJ, LX, LY, N,
2050 $ NARGS, NC, NS
2051 LOGICAL FULL, NULL, PACKED, RESET, SAME, UPPER
2052 CHARACTER*1 UPLO, UPLOS
2053 CHARACTER*2 ICH
2055 COMPLEX W( 2 )
2056 LOGICAL ISAME( 13 )
2058 LOGICAL LCE, LCERES
2065 INTEGER INFOT, NOUTC
2066 LOGICAL LERR, OK
2068 COMMON /INFOC/INFOT, NOUTC, OK, LERR
2152 10 CONTINUE
2156 20 CONTINUE
2160 30 CONTINUE
2217 40 CONTINUE
2230 50 CONTINUE
2234 60 CONTINUE
2239 70 CONTINUE
2243 80 CONTINUE
2273 90 CONTINUE
2280 100 CONTINUE
2282 110 CONTINUE
2284 120 CONTINUE
2286 130 CONTINUE
2288 140 CONTINUE
2299 150 CONTINUE
2302 160 CONTINUE
2332 * End of CCHK6. argument