24小时热门版块排行榜

返回列表

wangx208

新虫 (初入文坛)

应助: 0 (幼儿园)
金币: 166.5
帖子: 4
在线: 4.3小时
虫号: 4254382
注册: 2015-11-29
性别: MM
专业: 交通工程

[求助] 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

回复此楼

» 猜你喜欢

深圳大学2026年秋博士招生-物理学-活性胶体方向-高永祥课题组已经有17人回复
论物质与能量的统一模型及物理现象解释已经有0人回复
物理学I论文润色/翻译怎么收费? 已经有195人回复
基于基元I统一理论的数学相关应用推导已经有0人回复
基元I统一理论：宇宙本质、层级演化与修炼文明的本源规律已经有1人回复
基元I理论下三大核心空间现象精准推导与细节解析已经有0人回复
基于基元 I 统一理论的反重力理论推导已经有0人回复
基于基元I统一理论的量子力学本源推导已经有1人回复
推荐一款可以AI辅助写作的Latex编辑器SmartLatexEditor，超级好用，AI润色，全免费已经有15人回复
【EI|Scopus 双检索】第六届智能机器人系统国际会议（ISoIRS 2026）已经有0人回复
2026年第四届电动车与车辆工程国际会议（CEVVE 2026）已经有0人回复

1楼 2015-12-03 16:46:35

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

相关版块跳转我要订阅楼主 wangx208 的主题更新

返回列表