/dports/math/xlapack/lapack-3.10.0/TESTING/LIN/ |
H A D | dget04.f | 123 DOUBLE PRECISION DIFFNM, EPS, XNORM 158 DIFFNM = ZERO 160 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 163 IF( DIFFNM.GT.ZERO ) 166 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
H A D | sget04.f | 123 REAL DIFFNM, EPS, XNORM 158 DIFFNM = ZERO 160 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 163 IF( DIFFNM.GT.ZERO ) 166 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
H A D | zget04.f | 123 DOUBLE PRECISION DIFFNM, EPS, XNORM 165 DIFFNM = ZERO 167 DIFFNM = MAX( DIFFNM, CABS1( X( I, J )-XACT( I, J ) ) ) 170 IF( DIFFNM.GT.ZERO ) 173 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
H A D | cget04.f | 123 REAL DIFFNM, EPS, XNORM 165 DIFFNM = ZERO 167 DIFFNM = MAX( DIFFNM, CABS1( X( I, J )-XACT( I, J ) ) ) 170 IF( DIFFNM.GT.ZERO ) 173 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
/dports/math/blas/lapack-3.10.0/TESTING/LIN/ |
H A D | dget04.f | 123 DOUBLE PRECISION DIFFNM, EPS, XNORM local 158 DIFFNM = ZERO 160 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 163 IF( DIFFNM.GT.ZERO ) 166 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
H A D | sget04.f | 123 REAL DIFFNM, EPS, XNORM local 158 DIFFNM = ZERO 160 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 163 IF( DIFFNM.GT.ZERO ) 166 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
H A D | zget04.f | 123 DOUBLE PRECISION DIFFNM, EPS, XNORM local 165 DIFFNM = ZERO 167 DIFFNM = MAX( DIFFNM, CABS1( X( I, J )-XACT( I, J ) ) ) 170 IF( DIFFNM.GT.ZERO ) 173 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
H A D | cget04.f | 123 REAL DIFFNM, EPS, XNORM 165 DIFFNM = ZERO 167 DIFFNM = MAX( DIFFNM, CABS1( X( I, J )-XACT( I, J ) ) ) 170 IF( DIFFNM.GT.ZERO ) 173 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
/dports/math/lapacke/lapack-3.10.0/TESTING/LIN/ |
H A D | dget04.f | 123 DOUBLE PRECISION DIFFNM, EPS, XNORM 158 DIFFNM = ZERO 160 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 163 IF( DIFFNM.GT.ZERO ) 166 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
H A D | sget04.f | 123 REAL DIFFNM, EPS, XNORM 158 DIFFNM = ZERO 160 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 163 IF( DIFFNM.GT.ZERO ) 166 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
H A D | zget04.f | 123 DOUBLE PRECISION DIFFNM, EPS, XNORM 165 DIFFNM = ZERO 167 DIFFNM = MAX( DIFFNM, CABS1( X( I, J )-XACT( I, J ) ) ) 170 IF( DIFFNM.GT.ZERO ) 173 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
/dports/math/lapack/lapack-3.10.0/TESTING/LIN/ |
H A D | dget04.f | 123 DOUBLE PRECISION DIFFNM, EPS, XNORM 158 DIFFNM = ZERO 160 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 163 IF( DIFFNM.GT.ZERO ) 166 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
H A D | sget04.f | 123 REAL DIFFNM, EPS, XNORM 158 DIFFNM = ZERO 160 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 163 IF( DIFFNM.GT.ZERO ) 166 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
/dports/math/libflame/libflame-5.2.0/netlib-test/lapack-3.4.2/TESTING/LIN/ |
H A D | dget04.f | 126 DOUBLE PRECISION DIFFNM, EPS, XNORM local 161 DIFFNM = ZERO 163 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 166 IF( DIFFNM.GT.ZERO ) 169 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
H A D | sget04.f | 126 REAL DIFFNM, EPS, XNORM local 161 DIFFNM = ZERO 163 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 166 IF( DIFFNM.GT.ZERO ) 169 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.4.2/LIN/ |
H A D | dget04.f | 126 DOUBLE PRECISION DIFFNM, EPS, XNORM local 161 DIFFNM = ZERO 163 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 166 IF( DIFFNM.GT.ZERO ) 169 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
H A D | sget04.f | 126 REAL DIFFNM, EPS, XNORM 161 DIFFNM = ZERO 163 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 166 IF( DIFFNM.GT.ZERO ) 169 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.5.0/LIN/ |
H A D | dget04.f | 126 DOUBLE PRECISION DIFFNM, EPS, XNORM 161 DIFFNM = ZERO 163 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 166 IF( DIFFNM.GT.ZERO ) 169 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
H A D | sget04.f | 126 REAL DIFFNM, EPS, XNORM 161 DIFFNM = ZERO 163 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 166 IF( DIFFNM.GT.ZERO ) 169 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/TESTING/LIN/ |
H A D | dget04.f | 126 DOUBLE PRECISION DIFFNM, EPS, XNORM 161 DIFFNM = ZERO 163 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 166 IF( DIFFNM.GT.ZERO ) 169 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
H A D | sget04.f | 126 REAL DIFFNM, EPS, XNORM local 161 DIFFNM = ZERO 163 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 166 IF( DIFFNM.GT.ZERO ) 169 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
/dports/math/cblas/lapack-3.10.0/TESTING/LIN/ |
H A D | dget04.f | 123 DOUBLE PRECISION DIFFNM, EPS, XNORM 158 DIFFNM = ZERO 160 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 163 IF( DIFFNM.GT.ZERO ) 166 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
H A D | sget04.f | 123 REAL DIFFNM, EPS, XNORM 158 DIFFNM = ZERO 160 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 163 IF( DIFFNM.GT.ZERO ) 166 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/TESTING/LIN/ |
H A D | dget04.f | 126 DOUBLE PRECISION DIFFNM, EPS, XNORM 161 DIFFNM = ZERO 163 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 166 IF( DIFFNM.GT.ZERO ) 169 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|
H A D | sget04.f | 126 REAL DIFFNM, EPS, XNORM 161 DIFFNM = ZERO 163 DIFFNM = MAX( DIFFNM, ABS( X( I, J )-XACT( I, J ) ) ) 166 IF( DIFFNM.GT.ZERO ) 169 RESID = MAX( RESID, ( DIFFNM / XNORM )*RCOND )
|