一个最简单的关于电磁铁的例子
我自己做的一个最简单的关于电磁铁的例子：（以前我一直做不对，产生的磁力线不对称，百思不得其解！后来终于发现，原来，我将两边电流密度的方向设成了一样！这样当
然得不到正确的结果。后来，将它们反过来（也就是我的命令流里面红色的提示部分）之后，就可以了）
/TITLE, alex, Simulation for magnetic field
!*go,:start
!:start !利用这个可以让ansys有选择性的读取输入文件
!JPGPRF,500,100,1
! MACRO TO SET PREFS FOR JPEG PLOTS
/PREP7
emunit,mks !定义电磁单位为国际标准单位，即μ0=4 Pi e-7 henries/meter
*afun,deg
!********************************************
! 定义单元类型*
!********************************************
ET,53,PLANE53 ! Define PLANE 53 as element type
ET,9,INFIN9 !无限外界（注意：系统原点一定不能在infin9类型的节点上）
!********************************************
! 定义材料*
!********************************************
MP,MURX,1,1 !Define material properties (permeability) !定义空气（磁导率=1）
mp,murx,9,1 !定义线圈材料（假设是铜）
MP,MURX,10,1 !定义铁芯材料 10号材料为铁芯
!********************************************
!* 建立模型*
!********************************************
wtotal = 0.4 !计算总区域的宽度
htotal=0.4 !计算总区域的高度!电磁铁的尺寸
w32=0.150
h32=0.075
w33=0.035
h33=0.075 !可以看看h33和h32不一样，结果会不会有很大差别
h33_1=(h32-h33)/2
gap=0 !线圈和磁芯的距离
w8=wtotal/2
h8=(htotal-h32)/2
n=810 !总匝数
i=5 !线圈每匝的电流（A）
acoil=w33*h33 !线圈的横截面积
jdens=n*i/acoil !线圈横截面的电流密度!建立磁铁
rectng,-w32/2,w32/2,0,h32 !建立线圈
rectng,-(w32/2+gap+w33),-(w32/2+gap),h33_1,h33_1+h33
rectng,w32/2+gap,w32/2+gap+w33,h33_1,h33_1+h33!建立外部区域
rectng,-w8,w8,-h8,h32+h8
/PNUM,AREA,1 !定义显示模式
aovlap,allnumcmp,area !将生成的面重新编号
aplot
!********************************************
!建立材料属性
!********************************************
asel,s,area,,2,3 !线圈
aatt,9asel,s,area,,1 !铁芯
aatt,10asel,s,area,,4 !空气
aatt,1 !划分网格lsel,s,line,,13,15,2
lesize,all,,,60
lsel,s,line,,14,16,2
lesize,all,,,50
lsel,a,line,,13,15,2
type,9 !定义无限边界，并且划分之
lmesh,all
lsel,s,line,,8,10,2
lsel,a,line,,2,4,2
lesize,all,,,20
lsel,s,line,,1,3,2
lesize,all,,,40
lsel,s,line,,18,20,2
lsel,a,line,,17,19,2
lesize,all,,,16
allsel,all
type,53 !定义单元53，并且划分之
amesh,all
[ 本帖最后由 16443 于 2008-5-29 19:51 编辑 ] !定义线圈的边界条件：电流密度＝＝＝＝＝一定要注意：将两边的线圈方向定义成相反的方向!!!!
asel,s,area,,2 !左边的线圈
esla,sBFE,ALL,JS,1,,,jdens ! Apply current density (A/m**2)
asel,s,area,,3 !右边的线圈
esla,sBFE,ALL,JS,1,,,-jdens! Apply current density (A/m**2)
allsel,allfinish
!********************************************
!求解
!********************************************
/SOLU
MAGSOLV
FINISH
/POST1
/dev,font,1,Verdana,400,0,-12,0,0,,, !控制图示的字体为verdana 9号
!建立一个路径
path,sur-tar,2,10,100 !定义一个path：有2个点；包含10组数据；相邻点之间有100个数据点
ppath,1,,-w32/2, h32 !分别定义这两个点
ppath,2,,w32/2, h32
!* map路径到结果上
PDEF,sur-By,B,Y,AVG
PDEF,sur-Bx,B,X,AVG
/PBC,PATH, ,0 !* 将路径结果按照graph出图＝＝＝＝＝By方向的磁场
/TITLE, BY --Electron-magnet; %n% turns, %i%A
PLPATH,sur-By
/image,save,''by'',jpg
回复：（yvette）[转帖]一个最简单的关于电磁铁的例子...
1好贴！！！
如果大家在论坛多发这样的帖子就好了！！！应送一束鲜花！！ 线圈也可以不通过实常数来定义吗？？ 有没有不用命令流，就用GUI操作的啊 很感谢楼主的分享，学习了 非常感谢楼主解决了我得一个困扰多天的问题，我一直在想怎么在2d模型中定义一个载流线圈的两个截面中的电流。再次感谢！ 这类资源少啊{:{17}:}；多谢啦
页:
[1]