Parallel Studio XE 调用 BLAS95 + LAPACK95 + IMSL

标签：

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)\VNI\imsl\fnl700\winin111e64\include\dll

 C:\Program Files (x86)\VNI\imsl\fnl700\winin111e64\include\static

另外，在 Project - Properties - Linker - General - Additional Library Directories 添加

 C:\Program Files (x86)\VNI\imsl\fnl700\winin111e64\lib

Parallel Studio XE 调用 BLAS95 + LAPACK95 + IMSL

标签：

原文地址：http://www.cnblogs.com/pankejia/p/4473333.html