24小时热门版块排行榜    

Znn3bq.jpeg
查看: 1500  |  回复: 3

junfang138

新虫 (初入文坛)

[求助] 求助:abaqus 子程序问题

刚学abaqus 子程序,下面是子程序:     subroutine dload(f, kstep, kinc, time, noel, npt, layer, kspt,
      1    coords, jltyp, sname)
C
       include 'aba_param.inc'
       parameter (zini=10d0,
      1           speed=5.5556d0,
      1           length=0.22d0,
      1           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(3).lt.bcmax.and.coords(3).ge.bcmin) then
                f=pressure
        else
                f=0
        end if
100     continue
        return
        end   
模拟行车荷载,(注:子程序他人学术文献中的),
运行时错误:problem during compliation -c:\ljf\temp\dload.for

我想问:是子程序本身的问题?是安装的程序有问题?
请赐教,将不甚感激!!
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

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

890520kk

新虫 (初入文坛)

支持一下!我也碰到了这个问题,楼主解决了吗
2楼2014-09-19 11:20:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

Liusumei16

新虫 (初入文坛)

楼主,你问题解决了吗?我也遇到了同样的问题,我运用上面的程序也出错,后来程序改动了一点,能运行出来,但发现力没施加上去。想请教您有关移动荷载子程序dload的问题。您能发给我个Dload子程序吗,您能加我好友吗,Q1152609427。谢谢
3楼2015-04-25 09:54:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

青年小饭

新虫 (初入文坛)

我也在研究ANSYS模拟行车荷载的问题 ,是该模拟四个轮子,还是只要模拟一个轴重呢?
4楼2015-10-10 18:13:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 junfang138 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 广东省 085601 329分求调剂 +9 Eddieddd 2026-04-10 9/450 2026-04-10 21:00 by gong120082
[考研] 286求调剂 +7 草木不言 2026-04-04 7/350 2026-04-10 16:15 by 柴小白
[考研] 282,电气工程专业,求调剂,不挑专业 +9 jggshjkkm 2026-04-10 9/450 2026-04-10 14:55 by 逆水乘风
[考研] 0703化学 +31 妮妮ninicgb 2026-04-04 35/1750 2026-04-09 21:06 by zhouxiaoyu
[考研] 086003调剂求助 +19 苏弋万 2026-04-09 20/1000 2026-04-09 20:48 by bljnqdcc
[考研] 调剂 +8 只叙离别辞 2026-04-09 10/500 2026-04-09 20:25 by zl8213662
[考研] 调剂 +19 2261744733 2026-04-08 19/950 2026-04-09 19:11 by vgtyfty
[考研] 一志愿电子科技大学085600材料与化工 329分求调剂 +14 Naiko 2026-04-04 14/700 2026-04-09 16:56 by luoyongfeng
[考研] 308求调剂 +17 墨墨漠 2026-04-06 17/850 2026-04-09 09:25 by 壹往無前
[考研] 286求调剂 +19 Faune 2026-04-08 20/1000 2026-04-09 08:36 by 哦哦123
[考研] 一志愿吉大化学327求调剂 +12 王王白石 2026-04-06 13/650 2026-04-08 16:05 by luoyongfeng
[考研] 材料调剂 +13 汉123456 2026-04-07 14/700 2026-04-07 22:53 by 来看流星雨10
[考研] 0854电子信息319求调剂(接受跨专业调剂) +5 星星不眨眼喽 2026-04-05 6/300 2026-04-07 22:16 by hemengdong
[考研] 071000生物学,一志愿深圳大学296分,求调剂 +12 TIckLw 2026-04-06 13/650 2026-04-07 20:34 by lijunpoly
[考研] 085404 293求调剂 +8 勇远库爱314 2026-04-06 9/450 2026-04-07 13:05 by flydream1314
[考研] 考研调剂 +3 Wwwwwww哇 2026-04-06 3/150 2026-04-06 20:55 by lbsjt
[考研] 求助 +3 卡卡东88 2026-04-06 4/200 2026-04-06 15:28 by going home
[考研] 一志愿上海海洋大学083200食品学硕,求调剂,接受其他专业083200 +4 what张 2026-04-04 5/250 2026-04-05 14:07 by chw1980_0
[考研] 085600调剂 +9 东照照照 2026-04-04 9/450 2026-04-05 13:44 by ujn_zhuj
[考研] 可跨专业调剂 +3 周的得地 2026-04-04 6/300 2026-04-04 22:21 by barlinike
信息提示
请填处理意见