Hi,
I am trying to use LAPACK's "sytrd" subroutine in my code, but it is not recognized. I am trying the following simple code:
program comp USE mkl95_lapack USE mkl95_PRECISION USE mkl95_BLAS implicit none real, dimension(2,2) :: A integer, dimension(1) :: t A = reshape((/-5., 2., 2., -2./),(/2,2/)) call sytrd(A, t) end program comp
This is the error I get:
error #6285: There is no matching specific subroutine for this generic subroutine call. [SYTRD]
But when I use another of LAPACK's subroutines like "getrf", everything's fine:
program comp USE mkl95_lapack USE mkl95_PRECISION USE mkl95_BLAS implicit none real, dimension(2,2) :: A integer, dimension(2) :: t A = reshape((/-5., 2., 2., -2./),(/2,2/)) call getrf(A, t) end program comp
What might cause this problem?