Cross Reference: /external/cblas/testing/c

Lines Matching refs:EPS
78       REAL               EPS, ERR, THRESH
249 *     Compute EPS (the machine precision).
251       EPS = ONE
253       IF( SDIFF( ONE + EPS, ONE ).EQ.ZERO )
255       EPS = HALF*EPS
258       EPS = EPS + EPS
259       WRITE( NOUT, FMT = 9998 )EPS
278      $            YY, EPS, ERR, FATAL, NOUT, .TRUE. )
286      $            YY, EPS, ERR, FATAL, NOUT, .TRUE. )
316             CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
322             CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
330             CALL SCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
336             CALL SCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
345             CALL SCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
351             CALL SCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
359             CALL SCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
365             CALL SCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
373             CALL SCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
379             CALL SCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
387             CALL SCHK6( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
393             CALL SCHK6( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
456       SUBROUTINE SCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
473       REAL               EPS, THRESH
735      $                                       INCY, YT, G, YY, EPS, ERR,
816       SUBROUTINE SCHK2( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
833       REAL               EPS, THRESH
1094      $                                    YY, EPS, ERR, FATAL, NOUT,
1176       SUBROUTINE SCHK3( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1192       REAL               EPS, THRESH
1470      $                                    XX, EPS, ERR, FATAL, NOUT,
1484      $                                    XX, EPS, ERR, FATAL, NOUT,
1563       SUBROUTINE SCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1580       REAL               EPS, THRESH
1767      $                                 AA( 1 + ( J - 1 )*LDA ), EPS,
1835       SUBROUTINE SCHK5( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1852       REAL               EPS, THRESH
2049      $                              AA( JA ), EPS, ERR, FATAL, NOUT,
2131       SUBROUTINE SCHK6( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
2148       REAL               EPS, THRESH
2378      $                                 YT, G, AA( JA ), EPS, ERR, FATAL,
2640      $                  INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV )
2654       REAL               ALPHA, BETA, EPS, ERR
2721          ERRI = ABS( YT( I ) - YY( 1 + ( I - 1 )*ABS( INCY ) ) )/EPS
2725          IF( ERR*SQRT( EPS ).GE.ONE )