updates

akielaries · Mar 17, 2024 · c4749ab · c4749ab
1 parent ee5d0db
commit c4749ab
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 4 deletions.
diff --git a/Makefile b/Makefile
@@ -6,7 +6,7 @@ FFLAGS 		= -Wall -Wextra
 BUILDDIR 	= build
 
 # Files
-SRCS 		= dgemm.f xerbla.f lsame.f ex_dgemm.f90
+SRCS 		= dgemm.f xerbla.f lsame.f ex_dgemm0.f90
 OBJS 		= $(patsubst %.f,$(BUILDDIR)/%.o,$(patsubst %.f90,$(BUILDDIR)/%.o,$(SRCS)))
 
 # Executable

diff --git a/dgemv.f90 → dgemv.f b/dgemv.f90 → dgemv.f
diff --git a/ex_dgemm.f90 → ex_dgemm0.f90 b/ex_dgemm.f90 → ex_dgemm0.f90
@@ -1,6 +1,6 @@
 PROGRAM DGEMM_EX
-    ! the DGEMM routine is ideal, opposed to a naive implementation, for larger 
-    ! matrices
+    ! the DGEMM routine is ideal, opposed to the naive schoolbook On^3 
+    ! implementation, for larger matrices
 
     EXTERNAL DGEMM
 
@@ -65,7 +65,7 @@ PROGRAM DGEMM_EX
     CALL CPU_TIME(DGEMM_END)
 
     CALL CPU_TIME(MATMUL_ST)
-    ! Call FORTRAN MATMUL routine for matrix multiplication
+    ! Call FORTRAN MATMUL routine using intrinsics for matrix multiplication
     MATMUL_MTX_RES = MATMUL(A, B)
     CALL CPU_TIME(MATMUL_END)