1、调用 BLAS95 + LAPACK95 (函数参数较少,调用方便)
在程序里加上语句:
use BLAS95
use LAPACK95
real*8, external::DZNRM2 !DZNRM2 computes the Euclidean (L2) norm of a double precision complex
另外,在 Project - Properties - Linker - Input - Additional Dependencies
添加:mkl_blas95_ilp64.lib mkl_lapack95_ilp64.lib
2、调用 IMSL
在程序里加上语句:
INCLUDE 'link_fnl_shared.h'
USE QDAG3D_INT !Integrates a function of three variables with a possible internal or endpoint singularity.
另外,在 Project - Properties - Fortran - General - Additional Include Directories 添加
C:Program Files (x86)VNIimslfnl700winin111e64includedll
C:Program Files (x86)VNIimslfnl700winin111e64includestatic
另外,在 Project - Properties - Linker - General - Additional Library Directories 添加
C:Program Files (x86)VNIimslfnl700winin111e64lib