Abaqus子程序中 INCLUDE 'ABA_PARAM.INC'嘛意思？

今天我们来谈一谈有关Fortran中INCLUDE的用法。

本文先说明Abaqus子程序中常见include的问题，然后记录一下Fortran中INCLUDE的使用。

Abaqus常用的INCLUDE

写这篇推文初心是想回答：子程序开发过程中头文件经常有INCLUDE 'ABA_PARAM.INC'语句是什么意思？

该语句将Abaqus编写好的数值精度声明包含其中，可使用文件搜索ABA_PARAM，可查询到在Abaqus安装目录下有该文件：

 

目录中的文件以aba_param_dp.inc和aba_param_sp.inc，我们可以打开aba_param_dp.inc文件：

 

其实也就是声明了数值精度，即以a-h和o-z开头的变量都是双精度。

Fortran中Include语法

PROGRAM main
IMPLICIT NONE
    WRITE(*,*) "This is main program!"
    !引入文件
    INCLUDE 'sub.f90'
END

sub.f90:WRITE(*,*) "This is sub program!"

结果

 

可以看到程序中通过Include的使用将文件sub.f90的内容应用到主程序中，我们在自己的程序中也可以仿照Abaqus的做法，将常数、实数精度、子程序等都可以使用INCLUDE，这样一来，大大提升了代码的易读性。