Fortran MEX interface: minor fix for interface to dgemv
parent
6f415dff61
commit
4e16ffcda2
|
@ -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
|
||||||
|
|
Loading…
Reference in New Issue