Lines Matching defs:CCHK3
1130 SUBROUTINE CCHK3( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, subroutine
1143 COMPLEX ZERO, HALF, ONE
1146 REAL RZERO
1149 REAL EPS, THRESH
1150 INTEGER INCMAX, NIDIM, NINC, NKB, NMAX, NOUT, NTRA
1151 LOGICAL FATAL, REWI, TRACE
1152 CHARACTER*6 SNAME
1154 COMPLEX A( NMAX, NMAX ), AA( NMAX*NMAX ),
1155 $ AS( NMAX*NMAX ), X( NMAX ), XS( NMAX*INCMAX ),
1156 $ XT( NMAX ), XX( NMAX*INCMAX ), Z( NMAX )
1157 REAL G( NMAX )
1158 INTEGER IDIM( NIDIM ), INC( NINC ), KB( NKB )
1160 COMPLEX TRANSL
1161 REAL ERR, ERRMAX
1162 INTEGER I, ICD, ICT, ICU, IK, IN, INCX, INCXS, IX, K,
1163 $ KS, LAA, LDA, LDAS, LX, N, NARGS, NC, NK, NS
1164 LOGICAL BANDED, FULL, NULL, PACKED, RESET, SAME
1165 CHARACTER*1 DIAG, DIAGS, TRANS, TRANSS, UPLO, UPLOS
1166 CHARACTER*2 ICHD, ICHU
1167 CHARACTER*3 ICHT
1169 LOGICAL ISAME( 13 )
1171 LOGICAL LCE, LCERES
1179 INTEGER INFOT, NOUTC
1180 LOGICAL LERR, OK
1182 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1204 10 CONTINUE
1279 20 CONTINUE
1283 30 CONTINUE
1396 40 CONTINUE
1420 50 CONTINUE
1435 60 CONTINUE
1437 70 CONTINUE
1439 80 CONTINUE
1441 90 CONTINUE
1443 100 CONTINUE
1445 110 CONTINUE
1456 120 CONTINUE
1488 * End of CCHK3. argument