Lines Matching defs:CCHK6
2124 SUBROUTINE CCHK6( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, subroutine
2138 COMPLEX ZERO, HALF, ONE
2141 REAL RZERO
2144 REAL EPS, THRESH
2145 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA,
2146 $ IORDER
2147 LOGICAL FATAL, REWI, TRACE
2148 CHARACTER*12 SNAME
2150 COMPLEX A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
2151 $ AS( NMAX*NMAX ), X( NMAX ), XS( NMAX*INCMAX ),
2152 $ XX( NMAX*INCMAX ), Y( NMAX ),
2153 $ YS( NMAX*INCMAX ), YT( NMAX ),
2154 $ YY( NMAX*INCMAX ), Z( NMAX, 2 )
2155 REAL G( NMAX )
2156 INTEGER IDIM( NIDIM ), INC( NINC )
2158 COMPLEX ALPHA, ALS, TRANSL
2159 REAL ERR, ERRMAX
2160 INTEGER I, IA, IC, IN, INCX, INCXS, INCY, INCYS, IX,
2161 $ IY, J, JA, JJ, LAA, LDA, LDAS, LJ, LX, LY, N,
2162 $ NARGS, NC, NS
2163 LOGICAL FULL, NULL, PACKED, RESET, SAME, UPPER
2164 CHARACTER*1 UPLO, UPLOS
2165 CHARACTER*14 CUPLO
2166 CHARACTER*2 ICH
2168 COMPLEX W( 2 )
2169 LOGICAL ISAME( 13 )
2171 LOGICAL LCE, LCERES
2178 INTEGER INFOT, NOUTC
2179 LOGICAL OK
2181 COMMON /INFOC/INFOT, NOUTC, OK
2270 10 CONTINUE
2274 20 CONTINUE
2278 30 CONTINUE
2335 40 CONTINUE
2348 50 CONTINUE
2352 60 CONTINUE
2357 70 CONTINUE
2361 80 CONTINUE
2391 90 CONTINUE
2398 100 CONTINUE
2400 110 CONTINUE
2402 120 CONTINUE
2404 130 CONTINUE
2406 140 CONTINUE
2417 150 CONTINUE
2420 160 CONTINUE
2448 * End of CCHK6. argument