- 积分
- 0
- 注册时间
- 2006-6-7
- 仿真币
-
- 最后登录
- 1970-1-1
|
这是我照着唐兴伦等出的那本书敲的,感谢作者
/prep7
smrt,off
/title,3D Magnetics Analysis based on GSP
et,1,SOLID98,10
et,2,INFIN47
et,3,SOURC36
emunt,mks
mp,murx,1,1
tb,bh,2,,24
tbpt,, 405, 0.8
tbpt,, 468, 0.9
tbpt,, 670, 1.1
tbpt,, 840, 1.2
tbpt,, 1060, 1.3
tbpt,, 1223, 1.35
tbpt,, 1415, 1.4
tbpt,, 1722, 1.45
tbpt,, 2130, 1.5
tbpt,, 2671, 1.55
tbpt,, 3480, 1.6
tbpt,, 5952, 1.7
tbpt,, 10105, 1.8
tbpt,, 13000, 1.85
tbpt,, 26296, 2.0
tbpt,, 32901, 2.05
tbpt,, 42700, 2.1
tbpt,, 61700, 2.15
tbpt,, 84295, 2.2
tbpt,, 110000, 2.25
r,1,1,200,0.02,0.25
local,11,0,-0.325
wpcsys,,11
n,1,0.125,0,0
n,2,0.235,0,0
n,3,0.235,0.235,0
type,3
e,2,3,1
block,0.05,0.20,0,0.05,0,0.45
block,0.20,0.50,0,0.05,0.30,0.45
block,0.50,0.60,0,0.05,0,0.45
vglue,all
block,0.,0.65,0,0.10,0,0.50
vovlap,all
asel,s,area,,8,10
asel,a,area,,4
mshk,0
msha,1,3D
msha,1,2D
esize,0.10
type,2
amesh,all
type,1
mat,2
vmesh,4,6
mat,1
vmesh,2
nsel,s,loc,z,0
d,all,mag,0
nsel,all
finish
/solu
antype,static
magsolv,4
finish
/post1
path,iron,7,,48
ppath,1,,-0.2,0,0
ppath,2,,-0.2,0,0.20
ppath,3,,-0.2,0,0.375
ppath,4,,0.025,0,0.375
ppath,5,,0.225,0,0.375
ppath,6,,0.225,0,0.20
ppath,7,,0.225,0,0
*create,mac
pdef, hx, h, x
pdef, hy, h, y
pdef, hz, h, z
pvect, tang, tx, ty, tz
pdot, d, hx, hy, hz, tx, ty, tz
pcalc, intg, mmf, d, s
*get, mmf, path, ,last, mmf
mmf=mmf*2
*status, mmf
*end
esel, s, mat ,, 2
*use, mac
plvect, h,,,, vect, elem, on |
|