ANSYS与FORTRAN的相互调用

基于ANSYS57和Visual Fortran 6.1先详细讲一下ANSYS调用FORTRAN的步骤：
1. 首先，安装ANSYS时选择custom安装；
2. 建立一个新的用户目录, 如upf，把custom\user\intel目录下的anscust.bat，makefile和user01.f (当然也可以用你自己的fortran文件啦)这三个文件拷贝到upf下；
3. 打开makefile文件，在第一行指定ANSYS的安装路径，如：
ANSYS57_DIR=d:\ANSYS57 保存退出；
对于ANSYS7.0：
ANSYS70_DIR=d:\ansys7\v70\ANSYS
4. 复制 dfport.lib，dformd.lib, dfconcol.lib(这三个文件在fortran安装目录下的df98\lib目录中可以找到，注意不要用ANSYS自己所带的，因为ANSYS自己所带的版本可能不够高，而导致连接失败)和ansysex.def(在custom\user\intel中)到upf57目录中，以避免连接时找不到这几个文件；
5. 准备工作已经完成，运行“anscust.bat”进行编译连接。要确信你的Visual Fortran 与ANSYS版本的兼容性，如果编译连接不成功，出现诸如“Fatal error link 1120: 8 unresolved externals”的错误，则表示你的Fortran版本需要升级。
如用Vfor6.1 编译连接ansys7.0，就会出现这样的错误信息。解决的方法是安装Vfor6.6B。
对于你自己写的FORTRAN程序，先用FORTRAN编译一遍，保证没有错误。编译连接成功之后，在upf目录下会生成ansys.exe；
6. 现在你就可以运行这个新的ANSYS了。有两个方法：
第一个方法，就象“二次开发培训练习题”中所说：
在dos命令行，先敲入 ansys -p ansysul，指定ansys产品特征代码运行ansys, 然后OK， 接着 /show,win32和/menu,on启动ANSYS;
第二个方法，干脆用新生成的ansys.exe 代替ANSYS安装目录(如d:\ansys57\bin\intel)中的原ansys.exe，建议将原ansys.exe改名或备份，然后就象你平常启动ANSYS那样(如用Ansys Interactive 方式)启动ANSYS。
7. 启动并进入ANSYS交互界面之后，在命令输入行输入命令usr1(或者用/ucdm定义为你指定的名称, 如 /ucmd, aaa,1)就实现了ANSYS对Fortran程序user01.f的调用。

二 将ANSYS作为子程序调用
对于优化或参数化设计，可以在VC或FORTRAN中将ANSYS作为子程序调用。具体调用方法如下：
1.在VC中调用ANSYS
VC调用ANSYS的示例程序。
//Test.cpp
#include "stdio.h"
#include"process.h"
void main()
{
int result;
printf("Solving...");
result=system("d:/ANSYS57/BIN/INTEL/ANSYS57 -b -p ansysul -i test.txt -o test.out");
printf("Solution finished...");
}

2.在FORTRAN中调用ANSYS
LOGICAL(4) result
RESULT=SYSTEMQQ('d:\ANSYS57\BIN\INTEL\ANSYS57 -b -p
ansys_product_feature -i input_file -o output_file')

3.说明
1和2中，input_file为用APDL语言编写的ANSYS输入文件。
ansys_product_feature为你的ANSYS产品特征代码。

返回ansys文章列表>>>