24小时热门版块排行榜    

查看: 1780  |  回复: 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的回帖

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的回帖

坏脾气磊楚

铜虫 (初入文坛)

引用回帖:
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的回帖

shgao20

专家顾问 (职业作家)

【答案】应助回帖

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

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

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

坏脾气磊楚

铜虫 (初入文坛)

引用回帖:
5楼: Originally posted by shgao20 at 2016-02-21 08:14:31
具体哪个 (些) 命令不明白,请说明。

不好意思麻烦你了,
NSUBST,50,50,50    类似的这些命令,是什么意思
6楼2016-02-21 19:42:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

坏脾气磊楚

铜虫 (初入文坛)

送红花一朵
引用回帖:
5楼: Originally posted by shgao20 at 2016-02-21 08:14:31
具体哪个 (些) 命令不明白,请说明。

具体到,这一段:
TIME,L/V !设置求解时间
AUTOTS,-1   
NSUBST,50,50,50
KBC,0   
TSRES,ERASE
LSWRITE,1,  !写入载荷文件为1
是什么作用?
7楼2016-02-21 19:50:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

shgao20

专家顾问 (职业作家)

【答案】应助回帖

具体到这一段,是用来定义第一个载荷步的一些参数,并写入载荷步文件:
  TIME,L/V           !设置求解时间     第一个载荷步的计算终止时间: L/V = 1E-1 / 0.01 = 10
  AUTOTS,-1           !设置是否打开自动时间步: -1 表示有程序选择  
  NSUBST,50,50,50          ! 设置第一个载荷步的初始子步数、最大子步数和最小子步数。这里三个参数相等,表示子步数 50 不变。
  KBC,0             !  设置加载方式为 0  - Ranped 方式 - 斜坡方式
  TSRES,ERASE           ! 可以使用数组指定必须输出结构的时间,ERASE 表示不指定
  LSWRITE,1,  !写入载荷文件为1
这些命令帮助文件中都有详细说明,你应该自己看过帮助文件后在提出搞不懂的地方。
这里解释一次,下不为例。

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

8楼2016-02-22 07:48:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

坏脾气磊楚

铜虫 (初入文坛)

送红花一朵
引用回帖:
8楼: Originally posted by shgao20 at 2016-02-22 07:48:41
具体到这一段,是用来定义第一个载荷步的一些参数,并写入载荷步文件:
  TIME,L/V           !设置求解时间     第一个载荷步的计算终止时间: L/V = 1E-1 / 0.01 = 10
  AUTOTS,-1           !设置是否打开自动 ...

嗯,谢谢你了

发自小木虫IOS客户端
9楼2016-02-22 12:40:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 坏脾气磊楚 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 4/200 2026-02-07 22:24 by ioveiuleh5
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 2h7du0nuhk 2026-02-07 4/200 2026-02-07 22:11 by ioveiuleh5
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 2h7du0nuhk 2026-02-07 5/250 2026-02-07 22:06 by ioveiuleh5
[教师之家] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 2h7du0nuhk 2026-02-07 5/250 2026-02-07 22:04 by ioveiuleh5
[教师之家] 有院领导为了换新车,用横向课题经费买了俩车 +7 瞬息宇宙 2026-02-04 7/350 2026-02-07 21:47 by tfang
[找工作] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 2h7du0nuhk 2026-02-07 5/250 2026-02-07 21:46 by ioveiuleh5
[公派出国] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 2h7du0nuhk 2026-02-07 6/300 2026-02-07 21:44 by ioveiuleh5
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 2h7du0nuhk 2026-02-07 6/300 2026-02-07 21:31 by ioveiuleh5
[教师之家] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 2h7du0nuhk 2026-02-07 6/300 2026-02-07 21:26 by ioveiuleh5
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 2h7du0nuhk 2026-02-07 6/300 2026-02-07 21:11 by ioveiuleh5
[有机交流] 酰胺脱乙酰基 10+5 chibby 2026-02-03 12/600 2026-02-07 19:29 by 江东闲人
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 2h7du0nuhk 2026-02-07 3/150 2026-02-07 18:31 by 6ntj4f1rhx
[基金申请] 同年申请2项不同项目,第1个项目里不写第2个项目的信息,可以吗 +4 hitsdu 2026-02-06 4/200 2026-02-07 13:07 by jurkat.1640
[基金申请] 有时候真觉得大城市人没有县城人甚至个体户幸福 +9 苏东坡二世 2026-02-04 10/500 2026-02-07 12:37 by 小毛球
[考博] 天津大学招2026.09的博士生,欢迎大家推荐交流(博导是本人) +4 a793625982 2026-02-05 5/250 2026-02-07 10:57 by a793625982
[公派出国] CSC & MSCA 博洛尼亚大学能源材料课题组博士/博士后招生|MSCA经费充足、排名优 +4 雨念 2026-02-01 6/300 2026-02-06 23:32 by MelissaPon
[基金申请] 面上项目申报 +3 Tide man 2026-02-01 3/150 2026-02-05 22:56 by god_tian
[硕博家园] 博士延得我,科研能力直往上蹿 +7 偏振片 2026-02-02 7/350 2026-02-04 17:36 by 陈氏帝国
[基金申请] 面上基金申报没有其他的参与者成吗 +5 默默的小虫子 2026-01-31 5/250 2026-02-04 11:26 by 学员fOzRO9
[教师之家] 遇见不省心的家人很难过 +18 otani 2026-02-03 22/1100 2026-02-04 11:06 by tangmnt
信息提示
请填处理意见