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

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 仿真模拟 » ANSYS & ABAQUS » 求 大神看一下这段程序什么意思
北京石油化工学院2026年研究生招生接收调剂公告
51/1返回列表
查看: 1842  |  回复: 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+({ ...

你好，这下边一段我看了帮助文件感觉还是不大懂。能否帮忙分析一下？
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 个载荷步进行求解。
更具体的内容，你可以对照帮助文件自己解决。
赞一下(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+({ ...

非常谢谢你。太感谢了

发自小木虫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的回帖
查看全部 9 个回答
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 生物学308分求调剂（一志愿华东师大） +6 相信必会光芒万� 2026-03-31 7/350 2026-04-02 23:16 by JourneyLucky
[考研] 085600，320分求调剂 +6 大馋小子 2026-04-02 6/300 2026-04-02 21:54 by dongzh2009
[考研] 工科 267求调剂 +3 wanwan00 2026-04-02 5/250 2026-04-02 21:42 by wanwan00
[考研] 08工科求调剂290分 +5 1314捧花 2026-04-02 8/400 2026-04-02 13:16 by 乔哒哒哒
[考研] 262求调剂 +5 励志一定发文章 2026-04-02 6/300 2026-04-02 12:51 by yulian1987
[考研] 08开头看过来！！！ +4 wwwwffffff 2026-03-31 6/300 2026-04-02 11:42 by 均值回归
[考研] 295材料工程专硕求调剂 +19 1428151015 2026-03-27 19/950 2026-04-01 22:34 by peike
[考研] 建环，能源，土木老师路过看一看！！！ +4 嘿嘿uu 2026-04-01 4/200 2026-04-01 20:42 by 无懈可击111
[考研] 320分，材料与化工专业，求调剂 +14 一定上岸aaa 2026-03-27 18/900 2026-04-01 20:10 by 积极调剂的小学�
[考研] 353求调剂 +4 拉钩不许变 2026-04-01 4/200 2026-04-01 18:10 by 记事本2026
[考研] 0856调剂 +7 曲听筠 2026-03-30 7/350 2026-04-01 08:51 by JourneyLucky
[考研] 一志愿中海洋材料357 +4 麦恩莉. 2026-03-30 4/200 2026-03-31 14:35 by 记事本2026
[考研] 本科211生物医学工程085409求调剂339分 +7 里子木yy 2026-03-29 7/350 2026-03-31 14:35 by fmesaito
[考研] 286求调剂 +5 丢掉懒惰 2026-03-27 8/400 2026-03-31 11:27 by Delta2012
[考研] 085601一志愿西北工业大学初试346 +4 085601初试346 2026-03-30 4/200 2026-03-31 07:47 by jp9609
[考研] 一志愿华中师范化学332分求调剂 +3 Lyy930824@ 2026-03-29 3/150 2026-03-30 20:15 by DHUSHUAI
[考研] 085602 化学工程专硕 340分求调剂 +4 qianbai11 2026-03-29 4/200 2026-03-30 11:34 by 唐沐儿
[考研] 调剂考研 +3 王杰一 2026-03-29 3/150 2026-03-29 08:09 by fmesaito
[考研] 数一英一271专硕（085401）求调剂，可跨 +7 前行必有光 2026-03-28 8/400 2026-03-28 23:22 by 小木虫tim
[考研] 285求调剂 +4 AZMK 2026-03-27 7/350 2026-03-27 20:59 by AZMK
信息提示
关闭
请填处理意见
关闭