Deploying to stdlib-fpm from @ e88daa3 🚀

Author: perazz

array3.dat

@@ -0,0 +1,14 @@
+program example_gemv
+  use stdlib_linalg, only: eye
+  use stdlib_linalg_blas, only: sp,gemv
+  implicit none(type,external)
+  real(sp) :: A(2, 2), B(2)
+  B = [1.0,2.0]
+  A = eye(2)
+  
+  ! Use legacy BLAS interface 
+  call gemv('No transpose',m=size(A,1),n=size(A,2),alpha=1.0,a=A,lda=size(A,1),x=B,incx=1,beta=0.0,y=B,incy=1)
+
+  print *, B ! returns 1.0 2.0
+
+end program example_gemv

example/example_blas_gemv.f90

@@ -0,0 +1,14 @@
+program example_getrf
+  use stdlib_linalg, only: eye
+  use stdlib_linalg_lapack, only: dp,ilp,getrf
+  implicit none(type,external)
+  real(dp) :: A(3, 3)
+  integer(ilp) :: ipiv(3),info
+  
+  A = eye(3)
+  
+  ! LAPACK matrix factorization interface (overwrite result)
+  call getrf(size(A,1),size(A,2),A,size(A,1),ipiv,info)
+  print *, info ! info==0: Success!
+
+end program example_getrf

example/example_lapack_getrf.f90

@@ -8,3 +8,6 @@ copyright = "2019-2021 stdlib contributors"
 [dev-dependencies]
 test-drive.git = "https://github.com/fortran-lang/test-drive"
 test-drive.tag = "v0.4.0"
+
+[preprocess]
+[preprocess.cpp]