[原创]IMSL在IVF中的安装和应用(Windows系统)

主题：[原创]IMSL在IVF中的安装和应用(Windows系统)

Addison [专家分：960] 发布于 2008-01-05 16:27:00

IMSL在IVF中的安装和应用 (Windows系统)
-----------------------------------------------------

1. IMSL在IVF中的安装
2. IMSL在IVF中的调用
3. 其它程序库的调用

-----------------------------------------------------

1. IMSL在IVF中的安装

1) 如果是IVF pro版本自带的IMSL，直接安装就OK.可以直接阅读第2部分。

2) 如果是手动安装，IVF与IMSL版本不同，要注意以下问题

    a) 首先，安装IMSL到缺省目录（不同的版本，目录可能不同）
       例如，IMSL5.0的安装路径是C:\Program Files\VNI\CTT6.0\

    b)如果是在IDE环境下调用IMSL,那么需要首先设置IMSL在IVF中
      的搜索路径，其设置方法为：

      设置步骤：

        (1) 打开IVF9.*/10.* in Visual studio .net 2003/2005 IDE;

        (2) 打开菜单 Tools|options...

        (3) 选择左侧的 ”Intel(R) Fortran“ ，再选”Gerneral“或是”compiler“,
            然后在右侧找到 "Project Directories"或是“compiler Selection”.
            然后在下面你可以看到 "Libraries" 和 "Includes".
            点击右侧的 "..." 在Includes打开窗口中输入IMSL的include搜索路径，
            在Libraries打开的窗口中输入IMSL的lib搜索路径

            对于IMSL5.0,其include路径为：
            C:\Program Files\VNI\CTT6.0\include\IA32
            C:\Program Files\VNI\CTT6.0\include\IA32_s
            其lib路径是：
            C:\Program Files\VNI\CTT6.0\lib\IA32

            如果是其他版本，也请查找类似目录。在include和lib目录下的某个目录，
            一般说，include某个目录下应该有很多*.mod文件，在lib的某个目录下有很多
            *.lib或*.dll文件，这就是正确的路径所在。

        (4）选择“ok”，完成设置。

  c）如果需要在命令行的方式下调用IMSL,且IVF的版本与IMSL的版本不一致，
     则需要手动进行如下修改：

        (1) 首先找到ifortvars这个IVF的设置文件，例如：
            C:\Program Files\Intel\Compiler\Fortran\10.1.011\IA32\Bin\ifortvars.bat

        (2) 用文本编辑器打开这个文件，你会找到类似的一行：
            if exist "%FNL_DIR%\IA32\bin\fnlsetup.bat" call "%FNL_DIR%\IA32\bin\fnlsetup.bat"
            这个句子的目的是查找IMSL的目录下是否有fnlsetup.bat这个文件，如果有的话，就执行它。
            当然，不同的IVF版本，这一行可能有差别，我这里给出的是10.1.011版本的内容。

            如果你不是对应的IMSL版本，可能不存在fnlsetup.bat这个文件，例如在IMSL5.0的安装目录下存在
            C:\Program Files\VNI\CTT6.0\ctt\bin\cttsetup.bat 这个文件。那么你就需要更改ifortvars.bat
            里面的内容，从而调用正确的bat文件。例如，IMSL5.0在IVF10.1.011下，要在ifortvars.bat文件中
            加入下面一行
            if exist "C:\Program Files\VNI\CTT6.0\ctt\bin\cttsetup.bat" call "C:\Program Files\VNI\CTT6.0\ctt\bin\cttsetup.bat " IA32
            这样就可以正确在命令行方式下调用IMSL了。

---------------------------------------------------------------------------------------------------------------------------------------------------------------

2. IMSL在IVF中的调用

1）找到IMSL中合适的函数或子程序（在开始菜单中，安装IMSL的目录下会找到一个pdf文件，里面是IMSL的说明文件，包括函数和子程序的
   详细信息，并有例子）

2）在自己的程序中调用IMSL. 首先在IVF的帮助文档中“index”选项卡下输入IMSL，就可以看到
   Using from the Command Line
   Using from IDE
   这两项主要内容，请仔细阅读这个部分。一般情况下，调用IMSL需要注意两个地方：
    a) 加入 INCLUDE 'link_fnl_static.h' 或是类似的语句在你的主程序中，不同的库函数选用不同的*.h文件
    b) 加入合适的use 语句，例如
       use IMSL
       use lin_sol_gen_int
       use rand_gen_int
       use error_option_packet
       等，你可以在IMSL的帮助文档中看到如何应用合适的use 语句
    c) 在主程序中call IMSL中的functions或是subroutines
    d) 编译，链接，得到执行程序。

3）在命令行中调用和编译：
   首先在command窗口中执行ifortvars这个命令，如果不能执行，请直接从开始菜单中的IVF目录下面直接运行这个程序（Build Environment for applications running on IA-32），
   或是将此文件所在的目录写入path环境变量，使其可以执行。
   然后用ifort命令对你的主程序进行编译即可。

---------------------------------------------------------------------------------------------------------------------------------------------------------------

3. 其它程序库的调用
   学会了IMSL的调用，其实其他的程序库如CXML，LAPACK, BLAS, WFL等在IVF下的调用都是类似过程，即主要要设置好include和lib的路径，使得编译器
   可以找到需要包含的mod文件和链接的lib文件,这个过程大同小异。

-----------------------------------------------------
Good Luck！

Addison
2008.01.05

注意：上述内容可以自由转载，请保持信息完整，并不做任何修改。

Qusetions and Suggestions: addison0220_cn .AT. sina.com

本帖地址： http://bbs.pfan.cn/post/264449.html

回复列表（共12个回复）

沙发

臭石头雪球 [专家分：23030] 发布于 2008-01-05 16:36:00

楼主辛苦了，分了很多不同的情况，应该是比较完整了。

希望对一些朋友有用。

板凳

f2003 [专家分：7960] 发布于 2008-01-05 16:44:00

顶！感谢楼主。

3 楼

lishhit [专家分：2400] 发布于 2008-01-05 18:52:00

不错，IVF的帮助文档中还有IMSL的说明，这个以前还真是没发现。。。。赞楼主！

4 楼

Addison [专家分：960] 发布于 2008-01-07 10:14:00

感谢支持。

CVF或是IVF本身的HELP文档是非常好的帮助，仔细研读可以学到很多有用的东西。只是有一点，其help不够翔实，例子也不够多，所以有些东西理解起来比较费劲，所以很多人选择了放弃。可以多读一些英文的fortran书籍，可能会有所帮助。经常上Fortran的论坛，绝对是学习的最好的地方。

5 楼

zhangjie9u [专家分：20] 发布于 2008-01-08 10:47:00

谢谢你，正在找这个，急需，呵呵。

6 楼

WASPCN [专家分：80] 发布于 2008-03-29 07:52:00

谢谢分享分享！

其实C:\Program Files\VNI\imsl\fnl600\IA32\notes\Release_notes.txt中也有说明：

==<  Part 5: Using the IMSL Fortran Library from Microsoft Visual Studio .NET 200X >==

  1) Start the Microsoft Visual Studio Developer Environment. Select
      Microsoft Visual Studio .NET 2003 from Start -> Programs -> Microsoft
      Microsoft Visual Studio .NET 2003, or Microsoft Visual Studio 2005
      from Start -> Programs -> Microsoft Visual Studio 2005

   2) If you have not already defined a Solution Workspace for your
      application, you must do so before proceeding. Close all Solutions
      and choose File -> New -> Blank Solution.  Under Project Types,
      select Intel(R) Fortran Projects. Under Templates, choose
      "Console Application" as the project type, fill in the name of
      the project, select the desired location, and click OK.  In the
      Win32 Application Wizard select Application Settings.  Select
      Empty Project and Finish.

      Select Project -> Add Existing Item and add your Fortran source
      code file or for testing you may use imslmp.f90 from
      <FNL_DIR>\IA32\examples\validate

      NOTE: <FNL_DIR> denotes the main IMSL installation directory. By default,
            this is set as C:\Program Files\VNI\imsl\fnl600, but may be
            different if you installed IMSL in a different directory.

   3) Click on Project -> Properties -> Configuration Properties
      Under Fortran -> General, add <FNL_DIR>\IA32\include\DLL
      to the "Additional Include Directories" list and then click OK.

      Under Fortran -> Floating Point, check that the default setting
      for Floating Point Exception Handling is selected. It should
      be set to "Produce NaN, signed infinity, and denormal results"

      Under Linker -> General, add <FNL_DIR>\IA32\lib
      to the "Additional Library Directories" list and then click OK.

      NOTE: If you did not allow Setup to update the System Registry at
            installation time, this directory, <FNL_DIR>\IA32\lib ,
            must be added to the environment variable PATH prior to starting
            Microsoft Visual Studio .NET.

   4) Next, you must specify the IMSL libraries to link against in your
      project.  For simplicity, we will build a dynamically linked program,
      which links in the DLL version of IMSL.  You can do this by explicitly
      adding imsl_dll.lib to your Visual Studio Solution, in the Project
      Explorer or use the 'link_fnl_shared.h' include file directly in your
      source code.  In your Fortran source code, add the following header
      file in an include statement:

             include 'link_fnl_shared.h'

   5) You should now be ready to build the Solution and run the program.
      This sample project builds a very simple example, a shared console
      application, but should illustrate how easy it is to build a Visual
      Studio project that calls the IMSL libraries.  More complex and visually
      appealing applications can be built with Microsoft Visual Studio and
      the Intel Fortran compiler, see the Intel Fortran documentation for
      more information.

7 楼

WASPCN [专家分：80] 发布于 2008-03-29 07:53:00

一个简单的测试例子(动态调用)：

! ================ Program start ==============
program fnl
! Include the necessary header file:
! For the dynamic library:
INCLUDE 'link_fnl_shared.h'
! For the static library:
!INCLUDE 'link_fnl_static.h'
!!DEC$ OBJCOMMENT lib:"libguide.lib"

! Declare which IMSL functions will be used
USE LSARG_INT
USE WRRRN_INT
! Declare variables
PARAMETER (LDA=3, N=3)
REAL A(LDA,LDA), B(N), X(N)
!
! Set values for A and B
! A = (33.0 16.0 72.0)
! (-24.0 -10.0 -57.0)
! (18.0 -11.0 7.0)
! B = (129.0 -96.0 8.5)
!
DATA A/33.0, -24.0, 18.0, 16.0, -10.0, -11.0, 72.0, -57.0, 7.0/
DATA B/129.0, -96.0, 8.5/
!
! The main IMSL function call to solve for x in Ax=B.
! This is the floating point version, to use double-precision, call DLSARG.
!
CALL LSARG(A,B,X)
!
! Now print the solution x using WRRRN, a printing utility
!
CALL WRRRN('X',X,1,N,1)
Read(*,*)
END PROGRAM fnl
!================ Program End ==============

编译后的文件大小是：0.852M

8 楼

WASPCN [专家分：80] 发布于 2008-03-29 13:40:00

一个简单的测试例子(静态调用)：

! ================ Program start ==============
program fnl
! Include the necessary header file:
! For the dynamic library:
!INCLUDE 'link_fnl_shared.h'
! For the static library:
INCLUDE 'link_fnl_static.h'
!DEC$ OBJCOMMENT lib:"libguide.lib"

! Declare which IMSL functions will be used
USE LSARG_INT
USE WRRRN_INT
! Declare variables
PARAMETER (LDA=3, N=3)
REAL A(LDA,LDA), B(N), X(N)
!
! Set values for A and B
! A = (33.0 16.0 72.0)
! (-24.0 -10.0 -57.0)
! (18.0 -11.0 7.0)
! B = (129.0 -96.0 8.5)
!
DATA A/33.0, -24.0, 18.0, 16.0, -10.0, -11.0, 72.0, -57.0, 7.0/
DATA B/129.0, -96.0, 8.5/
!
! The main IMSL function call to solve for x in Ax=B.
! This is the floating point version, to use double-precision, call DLSARG.
!
CALL LSARG(A,B,X)
!
! Now print the solution x using WRRRN, a printing utility
!
CALL WRRRN('X',X,1,N,1)
Read(*,*)
END PROGRAM fnl
! ================ Program End ==============

编译后的文件大小是：2.548M

9 楼

WASPCN [专家分：80] 发布于 2008-03-29 13:46:00

静态编译的关键是：

IMSL* Fortran Libraries 6.0 (Professional Edition with IMSL* Only)
If you have licensed Intel® Visual Fortran Professional Edition with IMSL*, the IMSL* Fortran Libraries 6.0 from Visual Numerics* are provided (separate install required.)

For information on how to configure your environment for using the IMSL libraries from either Microsoft Visual Studio or the command line, please read Intel® Visual Fortran Compiler Documentation > Building Applications > Using Libraries > Using the IMSL* Mathematical and Statistical Libraries. This information has changed from previous releases. For information on the IMSL Fortran Libraries 6.0, including new features and changes, please refer to the IMSL documentation viewable using Start > All Programs > Visual Numerics.

The IMSL Fortran Libraries 6.0 are thread-safe. This requires changes in the build process for Fortran applications using IMSL.

The INCLUDE files for specifying the libraries to link against have changed their names, which will require that you change any INCLUDE lines that name the old files:
link_f90_static.h and link_f90_static_smp.h are now link_fnl_static.h, or link_fnl_static_hpc.h if you want to use both IMSL and the Intel® Math Kernel Library in static library form
link_f90_dll.h and link_f90_dll_smp.h are now link_fnl_shared.h, or link_fnl_shared_hpc.h if you want to use both IMSL and the Intel Math Kernel Library in DLL form
The folder path to the IMSL libraries has changed to %ProgramFiles%\VNI\imsl\fnl600 You will need to change this in your build scripts or in Visual Studio under Tools > Options > Intel(R) Fortran > Include Files (and Library Files).
When linking statically, the Intel OpenMP library must also be linked in. This can be done by specifying the /Qopenmp option (in Visual Studio, this is Fortran > Language > Process OpenMP Directives > Generate Parallel Code). Note that enabling this option has other effects, including making all variables automatic (stack-allocated). An alternative is to add libguide.lib to the list of libraries linked into the application; in Visual Studio, specify this in Linker > Input > Additional Dependencies. No change is required if you are linking to the DLL libraries.

10 楼

WASPCN [专家分：80] 发布于 2008-03-29 13:47:00

static link to IMSL

Either add the option /Qopenmp or (and I would recomemnd) add this line after the INCLUDE in one source:

!DEC$ OBJCOMMENT lib:"libguide.lib"

The reason for this is that the IMSL library uses OpenMP, but for some reason they chose to recommend that users add /Qopenmp rather than adding the library to the include file.

我来回复

您尚未登录，请登录后再回复。点此登录或注册

主题：[原创]IMSL在IVF中的安装和应用(Windows系统)

回复列表（共12个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

主题：[原创]IMSL在IVF中的安装和应用(Windows系统)

回复列表 （共12个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

回复列表（共12个回复）