两个子程序调用时子程序不运行的问题

duderi · 发表于 2009-12-17 22:36:32

本帖最后由 duderi 于 2010-1-13 12:18 编辑

帮助里面的一个关于温度的子程序UMATHT，我试着调用两个UMATHT。按照以前帖子里面介绍的方法：http://forum.simwe.com/viewthread.php?tid=817311&highlight=%B5%F7%D3%C3
http://forum.simwe.com/viewthread.php?tid=836677&highlight=%B5%F7%D3%C3
http://forum.simwe.com/viewthread.php?tid=817696&highlight=%2Bwwiem

现在的问题是能计算完，但子程序不运行，所以得到的结果就是温度全部是0 。

请有经验的帮忙看看是那里有问题

duderi · 发表于 2009-12-18 09:53:28

本帖最后由 duderi 于 2009-12-18 10:14 编辑

还有一个奇怪的问题，在模型中将材料的名字分如果取为MAT1和MAT2，计算的时候就会出现错误提示：aborted with system error code 693，如果材料的名字取为别的任何名字都不会出现这个问题。有人碰到这样的问题吗？

这个问题可能是MAT1和MAT2跟内部的命令冲突造成的。

duderi · 发表于 2009-12-18 10:41:12

将问题退化为只调用一个子程序的情形是可以的，结果也正确。为什么调用两个子程序的时候就不行呢？里面的if语句似乎是没有反应的。

http://forum.simwe.com/viewthrea ... hlight=%B5%F7%D3%C3这个帖子中提到

IF (CMNAME(1:4) .EQ. 'MAT1') THEN
CALL UMAT_MAT1(argument_list)
ELSE IF(CMNAME(1:4) .EQ. 'MAT2') THEN
CALL UMAT_MAT2(argument_list)
END IF

诸如这样的语句里面， 'MAT1'， 'MAT2'  必须用大写，无论ABAQUS/CAE里面，你用大写还是小写字母或者大小写混合的名字给材料命名。否则，那个条件判断不成立, IF里的UMAT也不会执行了。

大写了  'MAT1'， 'MAT2'  ，if语句还是不执行。

amani · 发表于 2009-12-18 13:47:47

I am sorry这个问题我没弄过，我只会UMAT和UEL

duderi · 发表于 2009-12-18 14:12:39

本帖最后由 duderi 于 2009-12-18 14:23 编辑

谢谢amani ，我的问题是子程序中的 if 语句不执行，这让我很无奈，，，，，，，，

cdstudio · 发表于 2009-12-18 16:23:42

本帖最后由 cdstudio 于 2009-12-18 09:26 编辑

CMNAME(1:4)是指材料名的第1个字符到第4个字符的内容, 都不符合判断条件
{ CMNAME(1:4).eq."material1" }, 因为4个字符不可能等于9个字符, 所以不执行.

duderi · 发表于 2009-12-18 16:45:33

非常感谢 cdstudio ，问题解决了。

chwq1987 · 发表于 2011-3-23 10:46:08

留着以后肯定用的着

shiyu_vincent · 发表于 2011-10-2 19:29:15

duderi 发表于 2009-12-18 16:45
非常感谢 cdstudio ，问题解决了。

请问现在你的两个子程序能同时计算了吗？我也遇到一样的问题，名字命名的就是“MAT1”和“MAT2”，但是算到一半出错了，感觉还是不对啊。我就是把两个子程序和inp里材料名分别命名的“MAT1”和“MAT2”，结果还是不大行。而且对不同材料，是不是要定义两个不同的section，在不同section里分别调用子程序呢？？？

jakiepeng · 发表于 2015-7-12 16:54:44

后期来学习

huangrijin · 发表于 2015-7-13 11:23:15

连接打不开。

账号		自动登录	找回密码
密码			注册

账号		自动登录	找回密码
密码			立即注册

[子程序] 两个子程序调用时子程序不运行的问题