Fortran如何调用模块中子程序

把你写的function放在另一个.f文件里面，或者放在主程序语句外面（即子程序形式）再来调用。主程序可调用function 和subroutine，所以，不用把子程序function写在主程序里。如此则subroutine和主程序都可以随意调用function，注意调用时的实参（subroutine里面的参数）和虚参（function里面的参数）要变量类型一致，而且实参数目不少于虚参（这个很重要）。

第一种方法：

1. 建立工作目录/ ]"

2. 将ABAQUS安装目录\6.4-pr11\site下的aba_param_dp.inc 或 aba_param_sp.inc拷贝到工作目录，并改名为aba_param.inc；

3. 将编译的fortran程序拷贝到工作目录；

4. 将.obj文件拷贝到工作目录；

5. 建立好输入文件.inp；

6. 运行abaqus job=inp_name user=fortran name即可。

第二种方法：

在Job模块里，创建工作，在Edit Job对话框中选择General选项卡，在User subroutine file中点击Select按钮，从d出对话框中选择你要调用的子程序文件（后缀为.for或.f）。

---