| /dports/benchmarks/hpl/hpl-2.3/src/blas/ |
| H A D | HPL_dgemv.c | 262 F77lda = LDA, F77incx = INCX, F77incy = INCY; local
267 #define F77incx INCX macro
277 F77dgemv( &ctran, &F77M, &F77N, &alpha, A, &F77lda, X, &F77incx,
282 F77dgemv( ftran, &F77M, &F77N, &alpha, A, &F77lda, X, &F77incx,
287 F77dgemv( ftran, &F77M, &F77N, &alpha, A, &F77lda, X, &F77incx,
292 F77dgemv( &ftran, &F77M, &F77N, &alpha, A, &F77lda, X, &F77incx,
300 F77dgemv( &ctran, &F77N, &F77M, &alpha, A, &F77lda, X, &F77incx,
305 F77dgemv( ftran, &F77N, &F77M, &alpha, A, &F77lda, X, &F77incx,
310 F77dgemv( ftran, &F77N, &F77M, &alpha, A, &F77lda, X, &F77incx,
315 F77dgemv( &ftran, &F77N, &F77M, &alpha, A, &F77lda, X, &F77incx,
|
| H A D | HPL_dger.c | 176 F77lda = LDA, F77incx = INCX, F77incy = INCY; local
181 #define F77incx INCX macro
186 { F77dger( &F77M, &F77N, &alpha, X, &F77incx, Y, &F77incy, A, &F77lda ); }
188 { F77dger( &F77N, &F77M, &alpha, Y, &F77incy, X, &F77incx, A, &F77lda ); }
|
| H A D | HPL_dswap.c | 144 const F77_INTEGER F77N = N, F77incx = INCX, F77incy = INCY; local
147 #define F77incx INCX macro
150 F77dswap( &F77N, X, &F77incx, Y, &F77incy );
|
| H A D | HPL_daxpy.c | 162 const F77_INTEGER F77N = N, F77incx = INCX, F77incy = INCY;
165 #define F77incx INCX
168 F77daxpy( &F77N, &alpha, X, &F77incx, Y, &F77incy );
|
| H A D | HPL_dcopy.c | 155 const F77_INTEGER F77N = N, F77incx = INCX, F77incy = INCY; local
158 #define F77incx INCX macro
161 F77dcopy( &F77N, X, &F77incx, Y, &F77incy );
|
| H A D | HPL_dscal.c | 166 const F77_INTEGER F77N = N, F77incx = INCX; local
169 #define F77incx INCX macro
172 F77dscal( &F77N, &alpha, X, &F77incx );
|
| H A D | HPL_idamax.c | 152 const F77_INTEGER F77N = N, F77incx = INCX; local
155 #define F77incx INCX macro
159 if( N > 0 ) imax = F77idamax( &F77N, X, &F77incx ) - 1;
|
| H A D | HPL_dtrsv.c | 474 const F77_INTEGER F77N = N, F77lda = LDA, F77incx = INCX; local
478 #define F77incx INCX macro
495 F77dtrsv( &cuplo, &ctran, &cdiag, &F77N, A, &F77lda, X, &F77incx,
501 F77dtrsv( fuplo, ftran, fdiag, &F77N, A, &F77lda, X, &F77incx );
506 F77dtrsv( fuplo, ftran, fdiag, &F77N, A, &F77lda, X, &F77incx );
511 F77dtrsv( &fuplo, &ftran, &fdiag, &F77N, A, &F77lda, X, &F77incx );
|