Lines Matching defs:SCHK4
1212 SUBROUTINE SCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, subroutine
1227 REAL ZERO
1230 REAL EPS, THRESH
1231 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA
1232 LOGICAL FATAL, REWI, TRACE
1233 CHARACTER*6 SNAME
1235 REAL A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1236 $ AS( NMAX*NMAX ), B( NMAX, NMAX ),
1237 $ BB( NMAX*NMAX ), BET( NBET ), BS( NMAX*NMAX ),
1238 $ C( NMAX, NMAX ), CC( NMAX*NMAX ),
1239 $ CS( NMAX*NMAX ), CT( NMAX ), G( NMAX )
1240 INTEGER IDIM( NIDIM )
1242 REAL ALPHA, ALS, BETA, BETS, ERR, ERRMAX
1243 INTEGER I, IA, IB, ICT, ICU, IK, IN, J, JC, JJ, K, KS,
1244 $ LAA, LCC, LDA, LDAS, LDC, LDCS, LJ, MA, N, NA,
1245 $ NARGS, NC, NS
1246 LOGICAL NULL, RESET, SAME, TRAN, UPPER
1247 CHARACTER*1 TRANS, TRANSS, UPLO, UPLOS
1248 CHARACTER*2 ICHU
1249 CHARACTER*3 ICHT
1251 LOGICAL ISAME( 13 )
1253 LOGICAL LSE, LSERES
1260 INTEGER INFOT, NOUTC
1261 LOGICAL LERR, OK
1263 COMMON /INFOC/INFOT, NOUTC, OK, LERR
1338 10 CONTINUE
1343 20 CONTINUE
1390 30 CONTINUE
1434 40 CONTINUE
1437 50 CONTINUE
1439 60 CONTINUE
1441 70 CONTINUE
1443 80 CONTINUE
1445 90 CONTINUE
1447 100 CONTINUE
1458 110 CONTINUE
1484 * End of SCHK4. argument