| 查看: 1651 | 回复: 0 | ||
[求助]
abaqus子程序编译错误
|
|
各位大神，想用子程序模拟车辆动荷载，子程序如下，但是子程序调试出现Syntax error, found END-OF-STATEMENT when expecting one of: ) ，abaqus调用时一直出现编译错误，求帮忙，多谢！ subroutine dload(f,kstep,kinc,time,noel,npt,layer,kspt,coords,jltyp,sname) C include 'aba_param.inc' parameter(zini=1,speed=0.2,length=0.2,pressure=0.7d6) C dimension time(2),coords(3) character*80 sname C -------------------------------------------------------------------- C speed 为车速 C bcmax 和 bcmin 分别为荷载的上下边界 C length 为车轮荷载的长度 C distance 为 time（2）时间内荷载移动的距离 C -------------------------------------------------------------------- distance=speed*time(2) bcmid=zini-distance bcmax= bcmid bcmin=bcmax-length do 100 k=1,npt if(coords(2).lt.bcmax.and.coords(2).ge.bcmin) then f=pressure else f=0 end if 100 continue return end |
回复此楼» 猜你喜欢
基金申请
已经有44人回复
-
CSC与新西兰维多利亚大学PhD奖学金项目
已经有0人回复
-
物理学I论文润色/翻译怎么收费?
已经有142人回复
-
新西兰Robinson研究所 招聘CSC公派访问人员
已经有0人回复
-
帮我的英语口语老师找学生
已经有0人回复
-
什么时候开奖？
已经有13人回复
-
散金币祈福
已经有94人回复
-
青基已中
已经有1人回复
-
散金币祈福
已经有66人回复
-
求助，如何提取ELK的rt-TDDFT在某一时刻的自旋密度分布和电子密度分布
已经有1人回复
10