找回密码
 注册
Simdroid-非首页
查看: 495|回复: 15

[子程序] 请教卢剑锋johnson-cook模型umat程序中的一些问题

[复制链接]
发表于 2011-4-22 19:45:49 | 显示全部楼层 |阅读模式 来自 宁波大学
本帖最后由 bzj986328 于 2011-5-28 13:54 编辑

C NEWTON ITERATION
C
            SYIELD=SYIEL0
          DEQPL=(SMISES-SYIELD)/EG3
            DSTRES=TOLER*SYIEL0/EG3
            DEQMIN=HALF*DTIME*EXP(1.0D-4/C)
            DO 130 KEWTON=1,NEWTON
              DEQPL=MAX(DEQPL,DEQMIN)
              CALL USERHARD(SYIELD,HARD,EQPLAS+DEQPL,PROPS(4))
              TVP=C*LOG(DEQPL/DTIME)
              TVP1=TVP+ONE
              HARD1=HARD*TVP1+SYIELD*C/DEQPL
              SYIELD=SYIELD*TVP1
              RHS=SMISES-EG3*DEQPL-SYIELD
              DEQPL=DEQPL+RHS/(EG3+HARD1)
              IF(ABS(RHS/EG3) .LE. DSTRES ) GOTO 140
130         CONTINUE
            WRITE(6,2) NEWTON
2           FORMAT(//,30X,'***WARNING - PLASTICITY ALGORITHM DID NOT ',
     1                              'CONVERGE AFTER ',I3,' ITERATI*****')
140         CONTINUE
            EFFHRD=EG3*HARD1/(EG3+HARD1)





其中红色标记的,不是很明了。。。
请教高手指点迷津,点拨一下。。。
发表于 2011-11-6 23:58:07 | 显示全部楼层 来自 北京
Simdroid开发平台
红色部分的意思求解,
这个在后面的USERHEAD里面有。
斑竹可以给我加分了吧

但是我还有一点不明白,就是这个公式对应变求导后是什么样呢?程序的算法好像不太符合我的预期

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×
回复 1 不支持 0

使用道具 举报

 楼主| 发表于 2011-4-22 19:46:19 | 显示全部楼层 来自 宁波大学
自己先顶一下。。。不让帖子沉下去!
回复 不支持

使用道具 举报

 楼主| 发表于 2011-4-22 19:46:48 | 显示全部楼层 来自 宁波大学
继续鼎一下!期盼高手出现。。。
回复 不支持

使用道具 举报

发表于 2011-4-22 19:52:10 | 显示全部楼层 来自 新加坡
3# bzj986328

lz这样顶很不厚道吧.....
                       






话说lz直接贴上程序,仅仅加上一个“请教高手指点迷津啊。。。”,那些高手除了子程序技术以外还需要卜卦技术:“我先来算一卦,看看这位lz是哪个地方需要指点迷津”

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×
回复 不支持

使用道具 举报

 楼主| 发表于 2011-5-21 14:37:32 | 显示全部楼层 来自 宁波大学
我顶。。。望高手看得到。。。
回复 不支持

使用道具 举报

 楼主| 发表于 2011-5-23 19:57:45 | 显示全部楼层 来自 宁波大学
我在顶一下。。。以防帖子沉掉,没能让高手帮我解答。。。
回复 不支持

使用道具 举报

发表于 2011-5-23 20:02:19 | 显示全部楼层 来自 北京
LZ你不但想当不厚道而且你还不看回帖呀,你没看Z大问你的问题吗?
你到底让高手指点你哪里的迷津呀
回复 不支持

使用道具 举报

 楼主| 发表于 2011-5-23 20:30:04 | 显示全部楼层 来自 宁波大学
本帖最后由 bzj986328 于 2011-5-28 13:55 编辑

4# zsq-w 这是完整的子程序

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×
回复 不支持

使用道具 举报

 楼主| 发表于 2011-5-23 20:30:54 | 显示全部楼层 来自 宁波大学
谢谢提示。。。我忘记了。。。现在附上!错了。。。回帖了!
回复 不支持

使用道具 举报

 楼主| 发表于 2011-5-23 20:31:18 | 显示全部楼层 来自 宁波大学



谢谢提示。。。我忘记了。。。现在附上!错了。。。回帖了!
7# kalvens
回复 不支持

使用道具 举报

 楼主| 发表于 2011-5-26 19:25:19 | 显示全部楼层 来自 宁波大学
我再鼎一下。。。帖子沉得太快。。。前辈们看不见了。。。
回复 不支持

使用道具 举报

发表于 2011-5-26 19:29:21 | 显示全部楼层 来自 香港
这种不负责任的问法是不会有人回答的
回复 不支持

使用道具 举报

发表于 2011-5-26 20:23:53 | 显示全部楼层 来自 湖南湘潭
呵呵  还以为能学到什么呢。。。失望哦
回复 不支持

使用道具 举报

 楼主| 发表于 2011-5-28 13:52:11 | 显示全部楼层 来自 宁波大学
请问,如何提问才是负责任的呢? 12# magiconly_2010
回复 不支持

使用道具 举报

发表于 2020-8-9 13:38:05 | 显示全部楼层 来自 江苏常州
回复 不支持

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Simapps系列直播

Archiver|小黑屋|联系我们|仿真互动网 ( 京ICP备15048925号-7 )

GMT+8, 2024-10-1 23:37 , Processed in 0.037073 second(s), 14 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表