未使用过子程序的伙伴建议结合本专栏里的 ABAQUS 子程序|安装与应用教程一起“食用”。
【常见问题及注意事项】:
1、编译fortran语言时,应注意代码格式,特别是缩进关系,可在编译器里进行检查,否则在提交分析后,因代码格式问题而报错;
2、模型不报错,但结果不理想,一般是因作用位置或区域有误导致的(坐标设置或代码编写可能不正确),即载荷没能有效作用在结构上;
3、建议先以简单荷载形式调试代码整体逻辑,如 IF (x >= 0) THEN F = 1 ELSE F=0 END IF ;
4、模型计算报错,建议及时查看日志文件,好对症下药解决问题。
P.S. 文末附示例程序代码

















【附:文内示例代码】:
SUBROUTINE DLOAD(F,KSTEP,KINC,TIME,NOEL,NPT,LAYER,KSPT,
1 COORDS,JLTYP,SNAME)
C
INCLUDE 'ABA_PARAM.INC'
C
DIMENSION TIME(2), COORDS (3)
CHARACTER*80 SNAME
c user coding to define F
REAL x,z,t,v,s
x = COORDS(1)
z = COORDS(3)
t = TIME(1)
v = 60+4
s = v*t
IF (x>=0.45 .AND. x<=0.75) THEN
IF (z >=s-0.2 .AND. z<=s) THEN
F=60*16667
ELSEIF (z>=s-4 .AND. z<=s-3.8) THEN
F=60*16667
ELSE
F=0
END IF
ELSEIF (x>=2.25 .AND. x<=2.55) THEN
...同上
ELSE
F=0
END IF
RETURN
END
免责声明:本文系网络转载或改编,未找到原创作者,版权归原作者所有。如涉及版权,请联系删