diff options
Diffstat (limited to 'bench/btl/libs/f77/daxpy.f')
-rw-r--r-- | bench/btl/libs/f77/daxpy.f | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/bench/btl/libs/f77/daxpy.f b/bench/btl/libs/f77/daxpy.f deleted file mode 100644 index 29514a222..000000000 --- a/bench/btl/libs/f77/daxpy.f +++ /dev/null @@ -1,18 +0,0 @@ - SUBROUTINE DAXPYF(N,A,X,Y) -** *************************************** -** CALCULE Y = Y + A*X -** *************************************** -*>N NOMBRE D'OPERATIONS A FAIRE -*>A CONSTANTE MULTIPLICATIVE -*>X TABLEAU -*=Y TABLEAU DES RESULTATS -*A R. SANCHEZ ( EARLY WINTER 1987 ) -*V M.F. ROBEAU - REAL*8 X(1),Y(1) - REAL*8 A - DO 10 I=1,N - Y(I)=Y(I)+A*X(I) - 10 CONTINUE - RETURN - END - |