Skip to content
Snippets Groups Projects
Verified Commit 4e16ffcd authored by Sébastien Villemot's avatar Sébastien Villemot
Browse files

Fortran MEX interface: minor fix for interface to dgemv

parent 6f415dff
No related branches found
No related tags found
No related merge requests found
Show whitespace changes
Inline Side-by-side
mex/sources/blas_lapack.F08
+ 1
− 1
View file @ 4e16ffcd
...@@ -29,7 +29,7 @@ module blas ...@@ -29,7 +29,7 @@ module blas
interface interface
subroutine dgemv(trans, m, n, alpha, a, lda, x, incx, beta, y, incy) subroutine dgemv(trans, m, n, alpha, a, lda, x, incx, beta, y, incy)
import :: blint, real64 import :: blint, real64
character :: trans character, intent(in) :: trans
integer(blint), intent(in) :: m, n, lda, incx, incy integer(blint), intent(in) :: m, n, lda, incx, incy
real(real64), dimension(*), intent(in) :: a, x real(real64), dimension(*), intent(in) :: a, x
real(real64), intent(in) :: alpha, beta real(real64), intent(in) :: alpha, beta
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment