| 查看: 2483 | 回复: 7 | |||
yanwentao新虫 (正式写手)
|
[求助]
2种焊接移动高斯热源的程序，有什么区别吗 已有1人参与
|
|
我在相关书籍 上看见 2种形式的高斯热源的程序,但是我不知道2者有何区别，可以通用吗？第一个如下*dim,flux2,table,max_x,max_y,max_time,x,y,time *do,k,1,max_time,1 *do,i,1,max_x,1 flux2(i,0,k)=(i-1)*lsize *enddo *do,j,1,max_y,1 flux2(0,j,k)=(j-1)*lsize *enddo *do,i,1,max_x,1 *do,j,1,max_y,1 xcenter=v*(k-1)*tinc ycenter=30 distance=sqrt(((i-1)*lsize-xcenter)**2+((j-1)*lsize-ycenter)**2) *if,distance,le,r,then flux2(i,j,k)=Qmax*exp(-3*kk*distance**2/(r**2)) *else flux2(i,j,k)=0 *endif *enddo *enddo flux2(0,0,k)=(k-1)*tinc *enddo 第2个如下 *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 *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) 请ANSYS大神指点 |
回复此楼» 收录本帖的淘帖专辑推荐
 焊接有限元分析 |
» 猜你喜欢
国自然面上和省基金B类撒花
已经有14人回复
-
有没有学校收留
已经有3人回复
-
312求调剂
已经有3人回复
-
华师大读博
已经有5人回复
-
又一批高校组建人工智能学院 师资行吗 不是骗人吗
已经有5人回复
-
急需审稿人！！！
已经有3人回复
-
申博/考博
已经有8人回复
-
295分求调剂
已经有6人回复
-
一志愿中科大材料与化工，353分还有调剂学校吗
已经有13人回复
-
085600材料与化工调剂
已经有6人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 深熔焊和热导焊的区别
已经有8人回复
- 激光焊接udf，加载温度场不对
已经有7人回复
- fluent中的体热源加载问题（实际上是热流密度，不是热生成率）
已经有19人回复
- 【求助】关于高斯热源峰值功率随时间变化的问题
已经有7人回复
2楼2013-04-28 21:28:20
3楼2013-04-29 21:22:10
4楼2013-04-29 22:51:42
5楼2013-04-29 23:22:20
yanwentao
新虫 (正式写手)
- 应助: 10 (幼儿园)
- 金币: 1208.9
- 散金: 278
- 红花: 6
- 帖子: 650
- 在线: 183.9小时
- 虫号: 1742885
- 注册: 2012-04-07
- 专业: 金属材料
6楼2013-04-30 09:16:12
7楼2013-05-06 10:43:06
8楼2014-04-10 14:13:06
5