Lines Matching defs:DCHK6
2010 SUBROUTINE DCHK6( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, subroutine
2024 DOUBLE PRECISION ZERO, HALF, ONE
2027 DOUBLE PRECISION EPS, THRESH
2028 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA
2029 LOGICAL FATAL, REWI, TRACE
2030 CHARACTER*6 SNAME
2032 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
2033 $ AS( NMAX*NMAX ), G( NMAX ), X( NMAX ),
2034 $ XS( NMAX*INCMAX ), XX( NMAX*INCMAX ),
2035 $ Y( NMAX ), YS( NMAX*INCMAX ), YT( NMAX ),
2036 $ YY( NMAX*INCMAX ), Z( NMAX, 2 )
2037 INTEGER IDIM( NIDIM ), INC( NINC )
2039 DOUBLE PRECISION ALPHA, ALS, ERR, ERRMAX, TRANSL
2040 INTEGER I, IA, IC, IN, INCX, INCXS, INCY, INCYS, IX,
2041 $ IY, J, JA, JJ, LAA, LDA, LDAS, LJ, LX, LY, N,
2042 $ NARGS, NC, NS
2043 LOGICAL FULL, NULL, PACKED, RESET, SAME, UPPER
2044 CHARACTER*1 UPLO, UPLOS
2045 CHARACTER*2 ICH
2047 DOUBLE PRECISION W( 2 )
2048 LOGICAL ISAME( 13 )
2050 LOGICAL LDE, LDERES
2057 INTEGER INFOT, NOUTC
2058 LOGICAL LERR, OK
2060 COMMON /INFOC/INFOT, NOUTC, OK, LERR
2144 10 CONTINUE
2148 20 CONTINUE
2152 30 CONTINUE
2209 40 CONTINUE
2222 50 CONTINUE
2226 60 CONTINUE
2231 70 CONTINUE
2235 80 CONTINUE
2265 90 CONTINUE
2272 100 CONTINUE
2274 110 CONTINUE
2276 120 CONTINUE
2278 130 CONTINUE
2280 140 CONTINUE
2291 150 CONTINUE
2294 160 CONTINUE
2322 * End of DCHK6. argument