Intel® Fortran Compiler
Build applications that can scale for the future with optimized code designed for Intel® Xeon® and compatible processors.
Ankündigungen
FPGA community forums and blogs have moved to the Altera Community. Existing Intel Community members can sign in with their current credentials.

can't join the library MKL.

wladimir47
Einsteiger
538Aufrufe
Hello!

Intel Fortran 11.1.051, Visual Studio 2008, Windows 7 HB.
Implemented full installation. We are trying to link the project:

Program Csptrs_ex
! Solution of system of linear equations with complex symmetric matrix
use lapack95
Integer,parameter::m=200,mm=m*(m+1)/2
Complex R(m,1),A(mm)
Dimension Rran(2*mm),Ipiv(m)
Call Random_seed()
Call Random_number(Rran(1:2*m))
R(:,1)=(Cmplx(Rran(1:m),Rran(m+1:2*m))-(.5,.5))/.382 !Right part
Call Random_number(Rran)
A=(Cmplx(Rran(1:mm),Rran(mm+1:2*mm))-(.5,.5))/.382 !Packed matrix
! Call CSPTRS('U',m,1,A,Ipiv,R,m,info) ! Fortran 77
Call CSPTRS(A,R,Ipiv,'U',info) ! Fortran 95
! Test solutions:
Print "('CSPTRS/MKL(LAPACK)/:'/' info=',i4)",info
If (info/=0) Stop
pause 'OK'
End program Csptrs_ex

As a result of error:

Error 1 error LNK2019: unresolved external symbol CSPTRS referenced in function MAIN__ Csptrs_ex.obj
Error 2 fatal error LNK1120: 1 unresolved externals x64 \ Debug \ Console3.exe

What's wrong?

Thanks, Wladimir.
0 Kudos
1 Antworten
TimP
Geehrter Beitragender III
538Aufrufe
Quoting - wladimir47

! Call CSPTRS('U',m,1,A,Ipiv,R,m,info) ! Fortran 77
Call CSPTRS(A,R,Ipiv,'U',info) ! Fortran 95

Did you consult the link advisor on the MKL forum
http://software.intel.com/en-us/articles/intel-mkl-link-line-advisor/
in your choice of MKL libraries?
Antworten