常用的有:
1.新建一个txt文档,在里面写好你的用户子程序Fortran代码,然后保存好,并将文件名的后缀改为.for或者.f90就可以了。
2.如果你需要fortran语法的检查方便,可以打开安装好的fortran软件,然后在里面编写你的用户子程序,写好之后保存就可以了。32位windows *** 作系统可以用compaq
visual
fortran
6.5或6.6版本的;64位windows *** 作系统,例如win7的,可以安装
microsoft
visual
studio
和
intel
visual
fortran
来编写代码。
ABAQUS调用用户子程序的话,只要在inp文件中加入
调用子程序的关键词
就可以调用子程序了。
希望对你有帮助,如果觉得答案好,请采纳。
写完主程序,在最后一句写上FEND接下来在左母线写下P几
记得每个P结束后都要写上SRET才能继续写下一个子程序或者END
至于跳转到子程序,只需要在主程序里用CALL指令,注意,这个指令的内容如果断电,子程序就会马上断电。
C语言 把别的计算机语言中称“函数”或称“子程序”的程序块 统称为 “函数”,没有术语“子程序”。别的计算机语言中称为“子程序”的程序块,C语言叫 void 型 函数。C语言 函数定义 出现在 main() 函数 以后的,则要在 main() 函数 以前 加写 函数原型声明。
例如:计算10个数的平均值,最大值,最小值子程序:
#include<stdio.h>
#include<stdlib.h>
void f(int n, int *a, int *a_max, int *a_min, float *a_mean);// 函数原型声明
void main()
{
int a[10]={1,2,3,4,5,6,7,8,9,10}
int a_max,a_min
float av
f(10,a,&a_max,&a_min,&av) // 函数调用
printf("max=%d min=%d mean=%f\n",a_max,a_min,av)
}
//函数定义
void f(int n, int *a, int *a_max, int *a_min, float *a_mean){
int i,b,s
float m=0.0
b = a[0]s=a[0]
for (i=0i<ni++){
if (a[i] >b) b = a[i]
if (a[i] <s) s = a[i]
m = m + a[i]
}
*a_mean = m / n
*a_max = b
*a_min = s
}
如果把 函数定义 写到 main() 以前,就不要 函数原型声明 那行
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)