应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 仿真模拟 » ANSYS & ABAQUS » 求 大神看一下这段程序什么意思
北京石油化工学院2026年研究生招生接收调剂公告
51/1返回列表
查看: 1853  |  回复: 8
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

坏脾气磊楚

铜虫 (初入文坛)

[求助] 求 大神看一下这段程序什么意思 已有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，一头雾水啊。求大神帮帮忙。
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2016-02-18 12:56:54
已阅   回复此楼   关注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的回帖
查看全部 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 个载荷步进行求解。
更具体的内容，你可以对照帮助文件自己解决。
赞一下(1人) 回复此楼

» 本帖已获得的红花（最新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+({ ...

你好，这下边一段我看了帮助文件感觉还是不大懂。能否帮忙分析一下？
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的回帖
查看全部 9 个回答
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿北京科技大学材料工程085601，求调剂 +11 cdyw 2026-04-02 11/550 2026-04-02 23:06 by 马儿快快地跑
[考研] 318求调剂，计算材料方向 +10 吸喵有害笙命 2026-04-01 11/550 2026-04-02 16:29 by oooqiao
[考研] 318求调剂 +3 笃行致远. 2026-03-31 4/200 2026-04-02 15:56 by Jaylen.
[考研] 调剂 +3 好好读书。 2026-04-01 6/300 2026-04-02 15:49 by liumengping
[考研] 348求调剂 +6 吴彦祖24k 2026-04-02 6/300 2026-04-02 14:07 by 给你你注意休息
[考研] 一志愿北京科技大学材料学硕328分求调剂 +6 1段时间 2026-03-31 7/350 2026-04-02 13:57 by 3041
[考研] 286分调剂 +20 Faune 2026-03-30 22/1100 2026-04-02 13:24 by clyblh
[考研] 272求调剂，接受跨专业调剂！ +4 闲鱼卢 2026-03-31 4/200 2026-04-02 11:18 by guyan1000
[考研] 0710生物学，325求调剂 +3 mkkkkkl 2026-04-01 3/150 2026-04-02 09:48 by Jaylen.
[考研] 303求调剂 +8 DLkz1314. 2026-03-30 8/400 2026-04-02 09:08 by sanrepian
[考研] 379求调剂 +3 ?苦瓜不苦 2026-04-01 3/150 2026-04-01 20:09 by 暮云清寒
[考研] 求调剂 +4 图鉴212 2026-03-30 5/250 2026-04-01 15:32 by 图鉴212
[考研] 材料专硕306英一数二 +7 z1z2z3879 2026-03-31 7/350 2026-04-01 14:50 by ZXlzxl0425
[考研] 求调剂 +5 零八# 2026-03-27 5/250 2026-04-01 14:40 by yulian1987
[考研] 求调剂：085600材料与化工，考材科基，总分319 +17 678lucky 2026-03-31 21/1050 2026-04-01 01:40 by 1018329917
[考研] 340求调剂 +4 希望如此i 2026-03-31 4/200 2026-03-31 16:40 by 690616278
[考研] 调剂求院校招收 +7 鹤鲸鸽 2026-03-28 7/350 2026-03-31 11:21 by oooqiao
[考研] 293分求调剂，外语为俄语 +5 加一一九 2026-03-31 5/250 2026-03-31 09:39 by zhshch
[考研] 0703 化学 求调剂，一志愿山东大学 342 分 +7 Shern—- 2026-03-28 7/350 2026-03-30 16:31 by nothing投稿中
[考研] 348求调剂 +6 小懒虫不懒了 2026-03-28 6/300 2026-03-30 10:29 by Evan_Liu
信息提示
关闭
请填处理意见
关闭