Lines Matching defs:SCHK6
1971 SUBROUTINE SCHK6( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, subroutine
1985 REAL ZERO, HALF, ONE
1988 REAL EPS, THRESH
1989 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA
1990 LOGICAL FATAL, REWI, TRACE
1991 CHARACTER*6 SNAME
1993 REAL A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1994 $ AS( NMAX*NMAX ), G( NMAX ), X( NMAX ),
1995 $ XS( NMAX*INCMAX ), XX( NMAX*INCMAX ),
1996 $ Y( NMAX ), YS( NMAX*INCMAX ), YT( NMAX ),
1997 $ YY( NMAX*INCMAX ), Z( NMAX, 2 )
1998 INTEGER IDIM( NIDIM ), INC( NINC )
2000 REAL ALPHA, ALS, ERR, ERRMAX, TRANSL
2001 INTEGER I, IA, IC, IN, INCX, INCXS, INCY, INCYS, IX,
2002 $ IY, J, JA, JJ, LAA, LDA, LDAS, LJ, LX, LY, N,
2003 $ NARGS, NC, NS
2004 LOGICAL FULL, NULL, PACKED, RESET, SAME, UPPER
2005 CHARACTER*1 UPLO, UPLOS
2006 CHARACTER*2 ICH
2008 REAL W( 2 )
2009 LOGICAL ISAME( 13 )
2011 LOGICAL LSE, LSERES
2018 INTEGER INFOT, NOUTC
2019 LOGICAL LERR, OK
2021 COMMON /INFOC/INFOT, NOUTC, OK, LERR
2105 10 CONTINUE
2109 20 CONTINUE
2113 30 CONTINUE
2170 40 CONTINUE
2183 50 CONTINUE
2187 60 CONTINUE
2192 70 CONTINUE
2196 80 CONTINUE
2226 90 CONTINUE
2233 100 CONTINUE
2235 110 CONTINUE
2237 120 CONTINUE
2239 130 CONTINUE
2241 140 CONTINUE
2252 150 CONTINUE
2255 160 CONTINUE
2283 * End of SCHK6. argument