Cross Reference: /external/cblas/testing/c

Lines Matching defs:EPS
82       DOUBLE PRECISION   EPS, ERR, THRESH
253 *     Compute EPS (the machine precision).
255       EPS = RONE
257       IF( DDIFF( RONE + EPS, RONE ).EQ.RZERO )
259       EPS = RHALF*EPS
262       EPS = EPS + EPS
263       WRITE( NOUT, FMT = 9998 )EPS
282      $            YY, EPS, ERR, FATAL, NOUT, .TRUE. )
290      $            YY, EPS, ERR, FATAL, NOUT, .TRUE. )
320             CALL ZCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
326             CALL ZCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
334            CALL ZCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
340            CALL ZCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
349            CALL ZCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
355            CALL ZCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
363            CALL ZCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
369            CALL ZCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
377            CALL ZCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
383            CALL ZCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
391            CALL ZCHK6( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
397            CALL ZCHK6( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
462       SUBROUTINE ZCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
482       DOUBLE PRECISION   EPS, THRESH
746      $                                       INCY, YT, G, YY, EPS, ERR,
818       SUBROUTINE ZCHK2( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
838       DOUBLE PRECISION   EPS, THRESH
1101      $                                    YY, EPS, ERR, FATAL, NOUT,
1175       SUBROUTINE ZCHK3( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1195       DOUBLE PRECISION   EPS, THRESH
1474      $                                    XX, EPS, ERR, FATAL, NOUT,
1488      $                                    XX, EPS, ERR, FATAL, NOUT,
1557       SUBROUTINE ZCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1578       DOUBLE PRECISION   EPS, THRESH
1777      $                                 AA( 1 + ( J - 1 )*LDA ), EPS,
1835       SUBROUTINE ZCHK5( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1856       DOUBLE PRECISION   EPS, THRESH
2057      $                              AA( JA ), EPS, ERR, FATAL, NOUT,
2129       SUBROUTINE ZCHK6( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
2150       DOUBLE PRECISION   EPS, THRESH
2382      $                                YT, G, AA( JA ), EPS, ERR, FATAL,
2458      $                  INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV )
2475       DOUBLE PRECISION   EPS, ERR
2554          ERRI = ABS( YT( I ) - YY( 1 + ( I - 1 )*ABS( INCY ) ) )/EPS
2558          IF( ERR*SQRT( EPS ).GE.RONE )