Lines Matching defs:ZCHK5
1851 SUBROUTINE ZCHK5( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, subroutine
1867 COMPLEX*16 ZERO, ONE
1869 DOUBLE PRECISION RONE, RZERO
1872 DOUBLE PRECISION EPS, THRESH
1873 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA, IORDER
1874 LOGICAL FATAL, REWI, TRACE
1875 CHARACTER*12 SNAME
1877 COMPLEX*16 AA( NMAX*NMAX ), AB( 2*NMAX*NMAX ),
1878 $ ALF( NALF ), AS( NMAX*NMAX ), BB( NMAX*NMAX ),
1879 $ BET( NBET ), BS( NMAX*NMAX ), C( NMAX, NMAX ),
1880 $ CC( NMAX*NMAX ), CS( NMAX*NMAX ), CT( NMAX ),
1881 $ W( 2*NMAX )
1882 DOUBLE PRECISION G( NMAX )
1883 INTEGER IDIM( NIDIM )
1885 COMPLEX*16 ALPHA, ALS, BETA, BETS
1886 DOUBLE PRECISION ERR, ERRMAX, RBETA, RBETS
1887 INTEGER I, IA, IB, ICT, ICU, IK, IN, J, JC, JJ, JJAB,
1888 $ K, KS, LAA, LBB, LCC, LDA, LDAS, LDB, LDBS,
1889 $ LDC, LDCS, LJ, MA, N, NA, NARGS, NC, NS
1890 LOGICAL CONJ, NULL, RESET, SAME, TRAN, UPPER
1891 CHARACTER*1 TRANS, TRANSS, TRANST, UPLO, UPLOS
1892 CHARACTER*2 ICHT, ICHU
1894 LOGICAL ISAME( 13 )
1896 LOGICAL LZE, LZERES
1903 INTEGER INFOT, NOUTC
1904 LOGICAL LERR, OK
1906 COMMON /INFOC/INFOT, NOUTC, OK, LERR
2008 10 CONTINUE
2012 20 CONTINUE
2021 30 CONTINUE
2088 40 CONTINUE
2126 50 CONTINUE
2148 60 CONTINUE
2167 70 CONTINUE
2170 80 CONTINUE
2172 90 CONTINUE
2174 100 CONTINUE
2176 110 CONTINUE
2178 120 CONTINUE
2180 130 CONTINUE
2193 140 CONTINUE
2197 150 CONTINUE
2207 160 CONTINUE
2233 * End of ZCHK5. argument