24小时热门版块排行榜    

查看: 1475  |  回复: 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 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料工程(专)一志愿985 初试335求调剂 +3 hiloiy 2026-03-17 4/200 2026-03-21 03:04 by JourneyLucky
[考研] 化学求调剂 +4 临泽境llllll 2026-03-17 5/250 2026-03-21 02:23 by JourneyLucky
[考研] 一志愿 西北大学 ,070300化学学硕,总分287,双非一本,求调剂。 +3 晨昏线与星海 2026-03-18 3/150 2026-03-21 00:46 by JourneyLucky
[考研] 一志愿武汉理工材料工程专硕调剂 +9 Doleres 2026-03-19 9/450 2026-03-20 22:36 by JourneyLucky
[考研] 317求调剂 +5 申子申申 2026-03-19 9/450 2026-03-20 22:26 by JourneyLucky
[考研] 290求调剂 +7 ^O^乜 2026-03-19 7/350 2026-03-20 21:43 by JourneyLucky
[考研] 295复试调剂 +8 简木ChuFront 2026-03-19 8/400 2026-03-20 20:44 by zhukairuo
[考研] 求调剂 +3 eation27 2026-03-20 3/150 2026-03-20 19:32 by JourneyLucky
[考研] 材料与化工专硕调剂 +7 heming3743 2026-03-16 7/350 2026-03-20 19:31 by zhukairuo
[考研] 广西大学家禽遗传育种课题组2026年硕士招生(接收计算机专业调剂) +3 123阿标 2026-03-17 3/150 2026-03-20 15:58 by 飞行琦
[考研] 08工学调剂 +5 用户573181 2026-03-20 5/250 2026-03-20 15:47 by xia_2003
[论文投稿] 申请回稿延期一个月,编辑同意了。但系统上的时间没变,给编辑又写邮件了,没回复 10+3 wangf9518 2026-03-17 4/200 2026-03-19 23:55 by babero
[考研] 288求调剂,一志愿华南理工大学071005 +5 ioodiiij 2026-03-17 5/250 2026-03-19 18:22 by zcl123
[考研] 0703化学 305求调剂 +4 FY_yy 2026-03-14 4/200 2026-03-19 05:54 by anny19840123
[考研] 材料专硕306英一数二 +10 z1z2z3879 2026-03-16 13/650 2026-03-18 14:20 by 007_lilei
[考研] 302求调剂 +10 呼呼呼。。。。 2026-03-17 10/500 2026-03-18 12:45 by Linda Hu
[考研] 302求调剂 +4 小贾同学123 2026-03-15 8/400 2026-03-17 10:33 by 小贾同学123
[论文投稿] 有没有大佬发小论文能带我个二作 +3 增锐漏人 2026-03-17 4/200 2026-03-17 09:26 by xs74101122
[考研] 333求调剂 +3 文思客 2026-03-16 7/350 2026-03-16 18:21 by 文思客
[考研] 0854控制工程 359求调剂 可跨专业 +3 626776879 2026-03-14 9/450 2026-03-16 17:42 by 626776879
信息提示
请填处理意见