24小时热门版块排行榜    

查看: 1746  |  回复: 8
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

坏脾气磊楚

铜虫 (初入文坛)

[求助] 求 大神看一下这段程序什么意思 已有1人参与

/SOL  
ANTYPE,4  
TRNOPT,FULL
LUMPM,0
*DEL,_FNCNAME   
*DEL,_FNCMTID   
*DEL,_FNC_C1
*DEL,_FNC_C2
*DEL,_FNC_C3
*DEL,_FNCCSYS   
*SET,_FNCNAME,'GAOSI'   
*DIM,_FNC_C1,,1
*DIM,_FNC_C2,,1
*DIM,_FNC_C3,,1
*SET,_FNC_C1(1),QM  
*SET,_FNC_C2(1),V   
*SET,_FNC_C3(1),R   
*SET,_FNCCSYS,0
! /INPUT,HANJIE.func,,,1      这个地方是要自己手动导入HANJIE.func么??
*DIM,%_FNCNAME%,TABLE,6,19,1,,,,%_FNCCSYS%  
!   
! Begin of equation: Qm*exp(-3*({X}^2+({Y}-V*{TIME})^2)/R^2)            这个地方又是什么意思??
*SET,%_FNCNAME%(0,0,1), 0.0, -999   
*SET,%_FNCNAME%(2,0,1), 0.0
*SET,%_FNCNAME%(3,0,1), %_FNC_C1(1)%
*SET,%_FNCNAME%(4,0,1), %_FNC_C2(1)%
*SET,%_FNCNAME%(5,0,1), %_FNC_C3(1)%
*SET,%_FNCNAME%(6,0,1), 0.0
*SET,%_FNCNAME%(0,1,1), 1.0, -1, 0, 0, 0, 0, 0  
*SET,%_FNCNAME%(0,2,1), 0.0, -2, 0, 1, 0, 0, -1
*SET,%_FNCNAME%(0,3,1),   0, -3, 0, 1, -1, 2, -2
*SET,%_FNCNAME%(0,4,1), 0.0, -1, 0, 3, 0, 0, -3
*SET,%_FNCNAME%(0,5,1), 0.0, -2, 0, 1, -3, 3, -1
*SET,%_FNCNAME%(0,6,1), 0.0, -1, 0, 2, 0, 0, 2  
*SET,%_FNCNAME%(0,7,1), 0.0, -3, 0, 1, 2, 17, -1
*SET,%_FNCNAME%(0,8,1), 0.0, -1, 0, 1, 18, 3, 1
*SET,%_FNCNAME%(0,9,1), 0.0, -4, 0, 1, 3, 2, -1
*SET,%_FNCNAME%(0,10,1), 0.0, -1, 0, 2, 0, 0, -4
*SET,%_FNCNAME%(0,11,1), 0.0, -5, 0, 1, -4, 17, -1  
*SET,%_FNCNAME%(0,12,1), 0.0, -1, 0, 1, -3, 1, -5   
*SET,%_FNCNAME%(0,13,1), 0.0, -3, 0, 1, -2, 3, -1   
*SET,%_FNCNAME%(0,14,1), 0.0, -1, 0, 2, 0, 0, 19
*SET,%_FNCNAME%(0,15,1), 0.0, -2, 0, 1, 19, 17, -1  
*SET,%_FNCNAME%(0,16,1), 0.0, -1, 0, 1, -3, 4, -2   
*SET,%_FNCNAME%(0,17,1), 0.0, -1, 7, 1, -1, 0, 0
*SET,%_FNCNAME%(0,18,1), 0.0, -2, 0, 1, 17, 3, -1   
*SET,%_FNCNAME%(0,19,1), 0.0, 99, 0, 1, -2, 0, 0
! End of equation: Qm*exp(-3*({X}^2+({Y}-V*{TIME})^2)/R^2)    这里呢???
TUNIF,20, !定义初始温度
!定义对流换热边界
SFA,15,1,CONV,30,20
SFA,20,1,CONV,30,20

SFA,9,1,CONV,30,20
SFA,14,1,CONV,30,20
SFA,19,1,CONV,30,20
SFA,24,1,CONV,30,20
SFA,23,1,CONV,30,20

SFA,7,1,CONV,30,20
SFA,12,1,CONV,30,20
SFA,17,1,CONV,30,20
SFA,22,1,CONV,30,20

SFA,1,1,CONV,30,20
SFA,2,1,CONV,30,20
SFA,3,1,CONV,30,20
SFA,4,1,CONV,30,20

!施加高斯热源  
SFA,5,1,HFLUX, %GAOSI%  
SFA,10,1,HFLUX, %GAOSI%  

OUTRES,ALL,ALL,

TIME,L/V !设置求解时间
AUTOTS,-1   
NSUBST,50,50,50
KBC,0   
TSRES,ERASE
LSWRITE,1,  !写入载荷文件为1
TIME,20
AUTOTS,1
NSUBST,20,20,20
KBC,0   
TSRES,ERASE
LSWRITE,2,

TIME,50
AUTOTS,1
NSUBST,30,30,30
KBC,0   
TSRES,ERASE
LSWRITE,3,

TIME,1100
AUTOTS,1
NSUBST,105,105,105
KBC,0     
TSRES,ERASE
LSWRITE,4,
  
LSSOLVE,1,4,1,  !开始求解
  刚开始学习ansys,一头雾水啊。求大神帮帮忙。
回复此楼

» 猜你喜欢

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

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

坏脾气磊楚

铜虫 (初入文坛)

引用回帖:
2楼: Originally posted by shgao20 at 2016-02-19 08:14:22
命令流太长,不给你详细解释了,只说几句:
1  这段命令流是使用函数加载进行瞬态分析。
2  函数文件名是 gaosi.fuc,已经读入到命令流中,应该是高斯热源:
    从  ! Begin of equation: Qm*exp(-3*({X}^2+({ ...

你好,这下边一段我看了帮助文件感觉还是不大懂。能否帮忙分析一下?
L=1E-1
V=0.01

TIME,L/V !设置求解时间
AUTOTS,-1   
NSUBST,50,50,50
KBC,0   
TSRES,ERASE
LSWRITE,1,  !写入载荷文件为1
TIME,20
AUTOTS,1
NSUBST,20,20,20
KBC,0   
TSRES,ERASE
LSWRITE,2,

TIME,50
AUTOTS,1
NSUBST,30,30,30
KBC,0   
TSRES,ERASE
LSWRITE,3,

TIME,1100
AUTOTS,1
NSUBST,105,105,105
KBC,0     
TSRES,ERASE
LSWRITE,4,
  
LSSOLVE,1,4,1,  !开始求解
4楼2016-02-20 14:44:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 9 个回答

shgao20

专家顾问 (职业作家)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
坏脾气磊楚: 金币+10, ★★★★★最佳答案 2016-02-20 14:50:36
命令流太长,不给你详细解释了,只说几句:
1  这段命令流是使用函数加载进行瞬态分析。
2  函数文件名是 gaosi.fuc,已经读入到命令流中,应该是高斯热源:
    从  ! Begin of equation: Qm*exp(-3*({X}^2+({Y}-V*{TIME})^2)/R^2)            这个地方又是什么意思??
    到  ! End of equation: Qm*exp(-3*({X}^2+({Y}-V*{TIME})^2)/R^2)    这里呢???
  之间是函数定义部分。这两句中给出了相应的函数方程,是随时间和 (圆柱) 坐标变化的。
3  载荷条件:
    初始温度 20 度;
    在 15 个面上有对流载荷;
    在面 5 和 10 上有高斯热源。
    然后分为 4 个载荷步进行求解。
更具体的内容,你可以对照帮助文件自己解决。

» 本帖已获得的红花(最新10朵)

2楼2016-02-19 08:14:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

坏脾气磊楚

铜虫 (初入文坛)

送红花一朵
引用回帖:
2楼: Originally posted by shgao20 at 2016-02-19 08:14:22
命令流太长,不给你详细解释了,只说几句:
1  这段命令流是使用函数加载进行瞬态分析。
2  函数文件名是 gaosi.fuc,已经读入到命令流中,应该是高斯热源:
    从  ! Begin of equation: Qm*exp(-3*({X}^2+({ ...

非常谢谢你。太感谢了

发自小木虫IOS客户端
3楼2016-02-20 13:26:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

shgao20

专家顾问 (职业作家)

【答案】应助回帖

具体哪个 (些) 命令不明白,请说明。

» 本帖已获得的红花(最新10朵)

5楼2016-02-21 08:14:31
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
信息提示
请填处理意见