shfxzb918 发表于 2009-6-8 20:18:58

ansys磁场

我这里有一段程序,想在中心的有效区内产生均匀的稳定的磁场,可是结果不对,谁能帮我改一改啊?
/TITLE,2DCONSTANDMAGNET!定义工作标题
/FILNAM,MAGNET_2D,1!定义工作文件名
KEYW,MAGNOD,1!指定磁场分析
/PREP7
!!!!!!!!!!!!!!!!!!!单元和材料设置
ET,1,53,,,1!指定空气单元类型
ET,2,53,,,1!指定内层铷铁硼的单元类型
ET,3,53,,,1!指定外层铷铁硼的单元类型
ET,4,53,,,1!指定软铁的单元类型
EMUNIT,MKS!指定单位制
MP,MURX,1,1!材料!定义空气区域材料特性
MP,MURX,4,6000!定义软铁的材料特性
MP,MURX,2,1
HC1=955!定义N45型铷铁硼的材料特性
MP,MURX,11,1
MP,MGXX,11,HC1*cos(90)
MP,MURX,12,1!充磁方向
MP,MGXX,12,HC1*cos(45)
MP,MURX,13,1
MP,MGXX,13,HC1*(0)
MP,MURX,14,1
MP,MGXX,14,HC1*cos(-45)
MP,MURX,15,1
MP,MGXX,15,HC1*cos(-90)
MP,MURX,3,1
HC2=732
MP,MURX,16,1
MP,MGXX,16,HC2*cos(0)
MP,MURX,17,1
MP,MGXX,17,HC2*cos(-45)
MP,MURX,18,1
MP,MGXX,18,HC2*cos(-90)
!!!!!!!!!!!!!!!!!建立模型
/PNUM,AREA,1!打开面区域编号定义显示模式
K,1,0,0
K,2,60,0
K,3,147.25,0
K,4,147.25,29.289846
K,5,60,11.974342
K,6,50.865548,33.987271
K,7,124.832522,83.410430
K,8,83.410430,124.832522
K,9,33.987271,50.865548
K,10,11.974342,60
K,11,0,60
K,12,0,200.5
K,13,39.881930,200.5
K,14,39,58.367625
K,15,234.5,0
K,16,234.5,46.644950
K,17,198.799501,132.833580
K,18,132.833580,198.799501
K,19,46.644950,234.5
K,20,0,234.5
K,21,300,0
K,22,300,59.673710
K,23,254.327720,169.936349
K,24,169.936349,254.327720
K,25,59.673710,300
K,26,0,300
K,27,37,186.011562
A,1,2,5,6,9,10,11
A,10,11,12,13
A,12,13,19,20
A,9,14,27,10
A,14,18,19,13,27
A,6,7,8,9
A,7,17,18,8
A,5,4,7,6
A,4,16,17,7
A,2,3,4,5
A,3,15,16,4
A,15,16,17,18,19,20,26,25,24,23,22,21
NUMCMP,AREA!压缩编码
!!!!!!!!!!!!!!!!网格划分
ASEL,S,AREA,,1
ASEL,A,AREA,,12
AATT,1,,1
ASEL,S,AREA,,2
ASEL,A,AREA,,4
AATT,4,,1
ASEL,S,AREA,,3
AATT,11,,2
ASEL,S,AREA,,5
AATT,12,,2
ASEL,S,AREA,,7
AATT,13,,2
ASEL,S,AREA,,9
AATT,14,,2
ASEL,S,AREA,,11
AATT,15,,2
ASEL,S,AREA,,6
AATT,16,,3
ASEL,S,AREA,,8
AATT,17,,3
ASEL,S,AREA,,10
AATT,18,,3
MSHAPE,1,2D!指定网格形状为三角形
ASEL,ALL
SMRTsize,2
AMESH,ALL
ALLSEL
NSEL,EXT
D,ALL,AZ,0
SAVE
FINISH
!!!!!!!!!!!!!!!!!!!求解
/SOLU
ANTYPE,STATIC!定义分析类型为静态
ALLSEL,ALL
SOLVE
FINISH
!!!!!!!!!!!!!后处理
/POST1
ALLSEL
PLF2D
PLNSOL,B,SUM!绘制二维磁力线图

wnz1125 发表于 2009-6-10 04:02:25

看完楼主的帖子,我的心情竟是久久不能平静。正如老子所云:大音希声,大象无形。我现在终于明白我缺乏的是什么了,正是楼主那种对真理的执着追求和楼主那种对理想的艰苦实践所产生的厚重感。面对楼主的帖子,我震惊得几乎不能动弹了,楼主那种裂纸欲出的大手笔,竟使我忍不住一次次地翻开楼主的帖子,每看一次,赞赏之情就激长数分,我总在想,是否有神灵活在它灵秀的外表下,以至能使人三月不知肉味,使人有余音绕梁、三日不绝的感受。楼主,你写得实在是太好了。我惟一能做的,就只有把这个帖子顶上去这件事了。
页: [1]
查看完整版本: ansys磁场