Lines Matching defs:DCHK2
637 SUBROUTINE DCHK2( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, subroutine
652 DOUBLE PRECISION ZERO
655 DOUBLE PRECISION EPS, THRESH
656 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA
657 LOGICAL FATAL, REWI, TRACE
658 CHARACTER*6 SNAME
660 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
661 $ AS( NMAX*NMAX ), B( NMAX, NMAX ),
662 $ BB( NMAX*NMAX ), BET( NBET ), BS( NMAX*NMAX ),
663 $ C( NMAX, NMAX ), CC( NMAX*NMAX ),
664 $ CS( NMAX*NMAX ), CT( NMAX ), G( NMAX )
665 INTEGER IDIM( NIDIM )
667 DOUBLE PRECISION ALPHA, ALS, BETA, BLS, ERR, ERRMAX
668 INTEGER I, IA, IB, ICS, ICU, IM, IN, LAA, LBB, LCC,
669 $ LDA, LDAS, LDB, LDBS, LDC, LDCS, M, MS, N, NA,
670 $ NARGS, NC, NS
671 LOGICAL LEFT, NULL, RESET, SAME
672 CHARACTER*1 SIDE, SIDES, UPLO, UPLOS
673 CHARACTER*2 ICHS, ICHU
675 LOGICAL ISAME( 13 )
677 LOGICAL LDE, LDERES
684 INTEGER INFOT, NOUTC
685 LOGICAL LERR, OK
687 COMMON /INFOC/INFOT, NOUTC, OK, LERR
775 10 CONTINUE
779 20 CONTINUE
784 30 CONTINUE
833 40 CONTINUE
861 50 CONTINUE
863 60 CONTINUE
865 70 CONTINUE
867 80 CONTINUE
869 90 CONTINUE
871 100 CONTINUE
904 * End of DCHK2. argument