Lines Matching full:precision
19 *> Test program for the DOUBLE PRECISION Level 2 Blas.
117 DOUBLE PRECISION ZERO, ONE
125 DOUBLE PRECISION EPS, ERR, THRESH
134 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ),
144 DOUBLE PRECISION DDIFF
282 * Compute EPS (the machine precision).
398 9998 FORMAT( ' RELATIVE MACHINE PRECISION IS TAKEN TO BE', 1P, D9.1 )
405 9993 FORMAT( ' TESTS OF THE DOUBLE PRECISION LEVEL 2 BLAS', //' THE F',
444 DOUBLE PRECISION ZERO, HALF
447 DOUBLE PRECISION EPS, THRESH
453 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
461 DOUBLE PRECISION ALPHA, ALS, BETA, BLS, ERR, ERRMAX, TRANSL
785 DOUBLE PRECISION ZERO, HALF
788 DOUBLE PRECISION EPS, THRESH
794 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
802 DOUBLE PRECISION ALPHA, ALS, BETA, BLS, ERR, ERRMAX, TRANSL
1127 DOUBLE PRECISION ZERO, HALF, ONE
1130 DOUBLE PRECISION EPS, THRESH
1135 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ),
1141 DOUBLE PRECISION ERR, ERRMAX, TRANSL
1485 DOUBLE PRECISION ZERO, HALF, ONE
1488 DOUBLE PRECISION EPS, THRESH
1493 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1500 DOUBLE PRECISION ALPHA, ALS, ERR, ERRMAX, TRANSL
1506 DOUBLE PRECISION W( 1 )
1746 DOUBLE PRECISION ZERO, HALF, ONE
1749 DOUBLE PRECISION EPS, THRESH
1754 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1761 DOUBLE PRECISION ALPHA, ALS, ERR, ERRMAX, TRANSL
1768 DOUBLE PRECISION W( 1 )
2024 DOUBLE PRECISION ZERO, HALF, ONE
2027 DOUBLE PRECISION EPS, THRESH
2032 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
2039 DOUBLE PRECISION ALPHA, ALS, ERR, ERRMAX, TRANSL
2047 DOUBLE PRECISION W( 2 )
2344 DOUBLE PRECISION ALPHA, BETA
2346 DOUBLE PRECISION A( 1, 1 ), X( 1 ), Y( 1 )
2668 DOUBLE PRECISION ZERO, ONE
2670 DOUBLE PRECISION ROGUE
2673 DOUBLE PRECISION TRANSL
2679 DOUBLE PRECISION A( NMAX, * ), AA( * )
2684 DOUBLE PRECISION DBEG
2839 DOUBLE PRECISION ZERO, ONE
2842 DOUBLE PRECISION ALPHA, BETA, EPS, ERR
2847 DOUBLE PRECISION A( NMAX, * ), G( * ), X( * ), Y( * ), YT( * ),
2850 DOUBLE PRECISION ERRI
2957 DOUBLE PRECISION RI( * ), RJ( * )
2991 DOUBLE PRECISION AA( LDA, * ), AS( LDA, * )
3033 DOUBLE PRECISION FUNCTION DBEG( RESET )
3079 DOUBLE PRECISION FUNCTION DDIFF( X, Y )
3087 DOUBLE PRECISION X, Y
