Hi Guys,
I m with an error that a really do not understand. The code is really simple:
module grids
contains
subroutine get_conic_parameters(pts,fcl, X)
use lslrg_int, only: d_lslrg ! IMSL subroutine
implicit none
doublecomplex , intent(in) :: pts(4)
doubleprecision , intent(in) :: fcl(4)
doubleprecision , intent(out) :: X(4)
doubleprecision :: sme, A(4,4), B(4)
integer :: jk
do jk = 1, 4
sme = cdabs(pts(jk))*cdabs(pts(jk))
A(jk,1) = -dexp(-fcl(jk))
A(jk,2) = 2.0d0*dreal(pts(jk))
A(jk,3) = 2.0d0*dimag(pts(jk))
A(jk,4) = sme - 1.0d0
B(jk) = sme + 1.0d0
enddo
call d_lslrg(A,B,X)
return
end subroutine get_conic_parameters
module grids
Errors:
Error 1 error LNK2019: unresolved external symbol D_LSLRG referenced in function GRIDS_mp_GET_CONIC_PARAMETERS grids.obj
Error 2 fatal error LNK1120: 1 unresolved externals x64\Debug\OffsetShaper.exe
I use this instructions https://software.intel.com/en-us/articles/installing-and-using-the-imsl-... to config IMSL.
Thank you very much for help.