Fortran MEX: add missing “implicit none” in blas and lapack modules

time-shift
Sébastien Villemot 2021-06-04 11:36:12 +02:00
parent 2a1183e1fa
commit 3a2335975a
No known key found for this signature in database
GPG Key ID: 2CECE9350ECEBE4A
1 changed files with 2 additions and 0 deletions

View File

@ -17,6 +17,7 @@
module blas
use iso_fortran_env
implicit none
#if defined(MATLAB_MEX_FILE) && __SIZEOF_POINTER__ == 8
integer, parameter :: blint = int64
@ -51,6 +52,7 @@ end module blas
module lapack
use blas
implicit none
interface
subroutine dgesv(n, nrhs, a, lda, ipiv, b, ldb, info)