24小时热门版块排行榜    

查看: 703  |  回复: 1

N@天河

新虫 (初入文坛)

[交流] ANSYS做瞬态热分析代码(送给有需要的朋友) 已有1人参与

/CLEAR
/FILNAME,EXAMPLE32
/PREP7
ET,1,PLANE77
MP,KXX,1,383
MP,DENS,1,8889
MP,C,1,390
MP,KXX,2,70
MP,DENS,2,7833
MP,C,2,445
MP,KXX,3,2
MP,DENS,3,996
MP,C,3,4185
RECTNG,0,0.6,0,0.5
RECTNG,0.15,0.225,0.225,0.27
RECTNG,0.342,0.42,0.225,0.27
AOVLAP,ALL      !交叠所有面
AATT,1,1,1     !指定单元属性
MSHAPE,0     !指定单元形状为四边形
MSHKEY,1     !指定映射网格
ESIZE,0.01
AMESH,2
AATT,2,1,1
AMESH,3
AATT,3,1,1
MSHKEY,0       !指定自由网格
ESIZE,0.03
AMESH,4
FINISH
/SOLU
ANTYPE,TRANS
!进行稳态分析,施加初始温度
TIMINT,OFF    !关闭积分时间
TIME,0.01     !时间
DELTIM,0.01   !时间步长
DA,2,TEMP,400 !在面上施加载荷
DA,3,TEMP,500 !
DA,4,TEMP,20  !
SOLVE
!开始瞬态热分析
TIME,3600
TIMINT,ON     !打开时间积分
DELTIM,50,10,200   !时间步长
AUTOTS,ON         !自动时间步长
DADELE,ALL,TEMP   !删除稳态分析时施加的温度自由度
OUTRES,ALL,ALL    !输出控制
SOLVE
SAVE              !保存数据库
FINISH
/POST26
NSOL,2,106,TEMP,,TEMP_106  !
PLVAR,2
FINISH
回复此楼

» 猜你喜欢

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

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

tiaozao1989

新虫 (初入文坛)

★ ★ ★
小木虫: 金币+0.5, 给个红包,谢谢回帖
茉莉新西兰: 金币+2, 鼓励新虫多多交流! 2013-07-09 17:57:00
新手,多谢楼主的贡献!
2楼2013-07-06 20:27:21
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 N@天河 的主题更新
普通表情 高级回复 (可上传附件)
信息提示
请填处理意见