FORTRAN调用MATLAB.doc

FORTRAN调用MATLAB************************************************** ** 一、Visual Fortran中使用Matlab引擎 ** ************************************************** source:/cgi-bin/ut/topic_show.cgi?id=16634h=1bpg=1age=-1＃1.安装 软件版本: Compaq Visual Fortran(以下简称CVF)6.5 Matlab 6.1 安装路径: CVF: C:\Program Files\Microsoft Visual Studio Matlab: D:\matlab ＃2.配置mex 在matlab下运行命令mex –setup,然后按提示选择CVF编译器 ＃3.配置编译环境 有两种选择 (1)Matlab下编译 (假设matlab安装目录为 %matlab%) 1.打开%matlab%\bin\win32\mexopts\df60engmatopts.bat 将13行中的 set DF_ROOT=%DF_ROOT % 改为set DF_ROOT =C:\Program Files\Microsoft Visual Studio (CVF安装目录) 2.将matlab的工作目录改为你的fortran源代码存放的目录 3.在matlab下运行 mex –f df60engmatopts.bat exsample.for (假设源文件为exsample.for 其中有关于matlab引擎的操作) (2)CVF下编译 1.新建一个项目 2.在tools-directory 里设置 include 和 lib目录 记住要包括以下目录 include -C:\Program Files\Microsoft Visual Studio\DF98\Include include-C:\Program Files\Microsoft Visual Studio\DF98\IMSL\Include include-D:\MATLAB\EXTERN\INCLUDE lib-D:\MATLAB\EXTERN\LIB\WIN32 lib-D:\MATLAB\EXTERN\LIB\WIN32\DIGITAL\DF60 lib-C:\Program Files\Microsoft Visual Studio\DF98\IMSL\Lib lib-C:\Program Files\Microsoft Visual Studio\DF98\Lib 3. 在project-setting-link-Object/library modules里添加libmx.lib libmat. lib libeng.lib 1。上面提到的无法定位程序输入点 的错误。 因为我是用的matlab自带的一个例程，出现这个错误肯定是自己系统的问题。不知道别人有没有遇到过。在这里发问，没结果呀。我就用“无法定位程序输入点”在“百度”上搜，查到一个mm在玩某个游戏的时候也遇到这样错误，解决的办法就是把提到的那个dll文件名前加_，如libeng.dll改为_libeng.dll，照这样按照出错提示把c:\winnt\system32中的libeng.dll、libmx.dll、libut.dll都改了一遍，再编译运行，搞定。 2。我要做的其实是想借Matlab中的用符号运算解一个二元三次方程组来求八节点等参单元中给定点整体坐标对应的局部坐标。主要就是根据matlab中的fengdemo.f来加入自己的东西，其实也很简单，一些小的地方要注意。开始的时候老是编译不通过，一度都要放弃了，因为用到Symbolic Math Toolbox中的solve，以为不支持。偶尔看fengdemo.f的源程序，在用到engEvalString时输入到matlab中的单引号（）都是用2个单引号（）来表示的，错就在这里，统统改掉，就可以了。 Matlab中的计算结果： 0.99433792247939 0.92631964961160 Fortran中调用结果： 0.994337897515527 0.926319366356284 差一点，双精度的 3。我的源程序 ! XSHHN 2004.6.22 program main double precision ElementCod(16),InquireCod(2),LocalCod(2) DATA ElementCod/-6.75000E+0