Lines Matching full:precision
3 * Test program for the DOUBLE PRECISION Level 2 Blas.
70 DOUBLE PRECISION ZERO, HALF, ONE
78 DOUBLE PRECISION EPS, ERR, THRESH
87 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ),
97 DOUBLE PRECISION DDIFF
249 * Compute EPS (the machine precision).
424 9998 FORMAT( ' RELATIVE MACHINE PRECISION IS TAKEN TO BE', 1P, D9.1 )
431 9993 FORMAT( ' TESTS OF THE DOUBLE PRECISION LEVEL 2 BLAS', //' THE F',
470 DOUBLE PRECISION ZERO, HALF
473 DOUBLE PRECISION EPS, THRESH
479 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
487 DOUBLE PRECISION ALPHA, ALS, BETA, BLS, ERR, ERRMAX, TRANSL
830 DOUBLE PRECISION ZERO, HALF
833 DOUBLE PRECISION EPS, THRESH
839 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
847 DOUBLE PRECISION ALPHA, ALS, BETA, BLS, ERR, ERRMAX, TRANSL
1189 DOUBLE PRECISION ZERO, HALF, ONE
1192 DOUBLE PRECISION EPS, THRESH
1198 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ),
1204 DOUBLE PRECISION ERR, ERRMAX, TRANSL
1577 DOUBLE PRECISION ZERO, HALF, ONE
1580 DOUBLE PRECISION EPS, THRESH
1586 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1593 DOUBLE PRECISION ALPHA, ALS, ERR, ERRMAX, TRANSL
1599 DOUBLE PRECISION W( 1 )
1849 DOUBLE PRECISION ZERO, HALF, ONE
1852 DOUBLE PRECISION EPS, THRESH
1858 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1865 DOUBLE PRECISION ALPHA, ALS, ERR, ERRMAX, TRANSL
1873 DOUBLE PRECISION W( 1 )
2145 DOUBLE PRECISION ZERO, HALF, ONE
2148 DOUBLE PRECISION EPS, THRESH
2154 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
2161 DOUBLE PRECISION ALPHA, ALS, ERR, ERRMAX, TRANSL
2170 DOUBLE PRECISION W( 2 )
2480 DOUBLE PRECISION ZERO, ONE
2482 DOUBLE PRECISION ROGUE
2485 DOUBLE PRECISION TRANSL
2491 DOUBLE PRECISION A( NMAX, * ), AA( * )
2496 DOUBLE PRECISION DBEG
2651 DOUBLE PRECISION ZERO, ONE
2654 DOUBLE PRECISION ALPHA, BETA, EPS, ERR
2659 DOUBLE PRECISION A( NMAX, * ), G( * ), X( * ), Y( * ), YT( * ),
2662 DOUBLE PRECISION ERRI
2769 DOUBLE PRECISION RI( * ), RJ( * )
2803 DOUBLE PRECISION AA( LDA, * ), AS( LDA, * )
2846 DOUBLE PRECISION FUNCTION DBEG( RESET )
2892 DOUBLE PRECISION FUNCTION DDIFF( X, Y )
2900 DOUBLE PRECISION X, Y