/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/ |
H A D | ilatrans.f | 59 INTEGER FUNCTION ILATRANS( TRANS ) 83 ILATRANS = BLAS_NO_TRANS 85 ILATRANS = BLAS_TRANS 87 ILATRANS = BLAS_CONJ_TRANS 89 ILATRANS = -1
|
H A D | cla_geamv.f | 210 EXTERNAL ILATRANS 211 INTEGER ILATRANS 227 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 228 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 229 $ .OR. ( TRANS.EQ.ILATRANS( 'C' ) ) ) ) THEN 256 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 288 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 342 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
H A D | sla_geamv.f | 206 EXTERNAL ILATRANS 207 INTEGER ILATRANS 217 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 218 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 219 $ .OR. ( TRANS.EQ.ILATRANS( 'C' )) ) ) THEN 246 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 278 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 332 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
H A D | dla_geamv.f | 206 EXTERNAL ILATRANS 207 INTEGER ILATRANS 217 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 218 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 219 $ .OR. ( TRANS.EQ.ILATRANS( 'C' )) ) ) THEN 246 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 278 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 332 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
H A D | zla_geamv.f | 210 EXTERNAL ILATRANS 211 INTEGER ILATRANS 227 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 228 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 229 $ .OR. ( TRANS.EQ.ILATRANS( 'C' ) ) ) ) THEN 256 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 288 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 342 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
/dports/math/xlapack/lapack-3.10.0/SRC/ |
H A D | ilatrans.f | 57 INTEGER FUNCTION ILATRANS( TRANS ) 80 ILATRANS = BLAS_NO_TRANS 82 ILATRANS = BLAS_TRANS 84 ILATRANS = BLAS_CONJ_TRANS 86 ILATRANS = -1
|
H A D | zla_geamv.f | 207 EXTERNAL ILATRANS 208 INTEGER ILATRANS 224 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 225 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 226 $ .OR. ( TRANS.EQ.ILATRANS( 'C' ) ) ) ) THEN 253 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 285 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 339 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
H A D | dla_geamv.f | 203 EXTERNAL ILATRANS 204 INTEGER ILATRANS 214 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 215 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 216 $ .OR. ( TRANS.EQ.ILATRANS( 'C' )) ) ) THEN 243 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 275 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 329 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
H A D | sla_geamv.f | 203 EXTERNAL ILATRANS 204 INTEGER ILATRANS 214 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 215 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 216 $ .OR. ( TRANS.EQ.ILATRANS( 'C' )) ) ) THEN 243 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 275 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 329 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
H A D | cla_geamv.f | 207 EXTERNAL ILATRANS 208 INTEGER ILATRANS 224 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 225 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 226 $ .OR. ( TRANS.EQ.ILATRANS( 'C' ) ) ) ) THEN 253 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 285 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 339 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
/dports/math/blas/lapack-3.10.0/SRC/ |
H A D | ilatrans.f | 57 INTEGER FUNCTION ILATRANS( TRANS ) 80 ILATRANS = BLAS_NO_TRANS 82 ILATRANS = BLAS_TRANS 84 ILATRANS = BLAS_CONJ_TRANS 86 ILATRANS = -1
|
H A D | dla_geamv.f | 203 EXTERNAL ILATRANS 204 INTEGER ILATRANS 214 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 215 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 216 $ .OR. ( TRANS.EQ.ILATRANS( 'C' )) ) ) THEN 243 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 275 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 329 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
H A D | zla_geamv.f | 207 EXTERNAL ILATRANS 208 INTEGER ILATRANS 224 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 225 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 226 $ .OR. ( TRANS.EQ.ILATRANS( 'C' ) ) ) ) THEN 253 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 285 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 339 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
H A D | sla_geamv.f | 203 EXTERNAL ILATRANS 204 INTEGER ILATRANS 214 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 215 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 216 $ .OR. ( TRANS.EQ.ILATRANS( 'C' )) ) ) THEN 243 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 275 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 329 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
H A D | cla_geamv.f | 207 EXTERNAL ILATRANS 208 INTEGER ILATRANS 224 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 225 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 226 $ .OR. ( TRANS.EQ.ILATRANS( 'C' ) ) ) ) THEN 253 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 285 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 339 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
/dports/math/lapack/lapack-3.10.0/SRC/ |
H A D | ilatrans.f | 57 INTEGER FUNCTION ILATRANS( TRANS ) 80 ILATRANS = BLAS_NO_TRANS 82 ILATRANS = BLAS_TRANS 84 ILATRANS = BLAS_CONJ_TRANS 86 ILATRANS = -1
|
H A D | cla_geamv.f | 207 EXTERNAL ILATRANS 208 INTEGER ILATRANS 224 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 225 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 226 $ .OR. ( TRANS.EQ.ILATRANS( 'C' ) ) ) ) THEN 253 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 285 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 339 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
H A D | dla_geamv.f | 203 EXTERNAL ILATRANS 204 INTEGER ILATRANS 214 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 215 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 216 $ .OR. ( TRANS.EQ.ILATRANS( 'C' )) ) ) THEN 243 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 275 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 329 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
H A D | sla_geamv.f | 203 EXTERNAL ILATRANS 204 INTEGER ILATRANS 214 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 215 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 216 $ .OR. ( TRANS.EQ.ILATRANS( 'C' )) ) ) THEN 243 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 275 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 329 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
H A D | zla_geamv.f | 207 EXTERNAL ILATRANS 208 INTEGER ILATRANS local 224 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 225 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 226 $ .OR. ( TRANS.EQ.ILATRANS( 'C' ) ) ) ) THEN 253 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 285 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 339 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
/dports/math/lapacke/lapack-3.10.0/SRC/ |
H A D | ilatrans.f | 57 INTEGER FUNCTION ILATRANS( TRANS ) 80 ILATRANS = BLAS_NO_TRANS 82 ILATRANS = BLAS_TRANS 84 ILATRANS = BLAS_CONJ_TRANS 86 ILATRANS = -1
|
H A D | dla_geamv.f | 203 EXTERNAL ILATRANS 204 INTEGER ILATRANS 214 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 215 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 216 $ .OR. ( TRANS.EQ.ILATRANS( 'C' )) ) ) THEN 243 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 275 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 329 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
H A D | cla_geamv.f | 207 EXTERNAL ILATRANS 208 INTEGER ILATRANS 224 IF ( .NOT.( ( TRANS.EQ.ILATRANS( 'N' ) ) 225 $ .OR. ( TRANS.EQ.ILATRANS( 'T' ) ) 226 $ .OR. ( TRANS.EQ.ILATRANS( 'C' ) ) ) ) THEN 253 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 285 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN 339 IF( TRANS.EQ.ILATRANS( 'N' ) )THEN
|
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/ |
H A D | ilatrans.f | 59 INTEGER FUNCTION ILATRANS( TRANS ) function 83 ILATRANS = BLAS_NO_TRANS 85 ILATRANS = BLAS_TRANS 87 ILATRANS = BLAS_CONJ_TRANS 89 ILATRANS = -1
|
/dports/math/cblas/lapack-3.10.0/SRC/ |
H A D | ilatrans.f | 57 INTEGER FUNCTION ILATRANS( TRANS ) 80 ILATRANS = BLAS_NO_TRANS 82 ILATRANS = BLAS_TRANS 84 ILATRANS = BLAS_CONJ_TRANS 86 ILATRANS = -1
|