马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?立即注册
x
我做了一个模型,可是空气层不能划分网格,请高手指点,代码如下:
/PREP7
emunit,mks !定义电磁单位为国际标准单位,即μ0=4 Pi e-7 henries/meter
! 定义单元类型
ET,1,96
ET,2,96
! 定义材料
MP,MURX,1,1 !定义空气(磁导率=1)
HC=895000 !表示矫顽力895000
TB,BH,2,,30
TBPT,, 130.000000 , 0.100000000
TBPT,, 170.000000 , 0.200000000
TBPT,, 197.000000 , 0.300000000
TBPT,, 218.000000 , 0.400000000
TBPT,, 250.000000 , 0.500000000
TBPT,, 290.000000 , 0.600000000
TBPT,, 338.000000 , 0.700000000
TBPT,, 400.000000 , 0.800000000
TBPT,, 472.000000 , 0.900000000
TBPT,, 570.000000 , 1.00000000
TBPT,, 682.000000 , 1.10000000
TBPT,, 810.000000 , 1.20000000
TBPT,, 975.000000 , 1.30000000
TBPT,, 1600.00000 , 1.40000000
TBPT,, 2520.00000 , 1.50000000
TBPT,, 3520.00000 , 1.60000000
TBPT,, 4760.00000 , 1.70000000
TBPT,, 8300.00000 , 1.80000000
TBPT,, 12000.0000 , 1.90000000
TBPT,, 17000.0000 , 2.00000000
TBPT,, 23000.0000 , 2.10000000
TBPT,, 32000.0000 , 2.20000000
TBPT,, 42500.0000 , 2.30000000
TBPT,, 44500.0000 , 2.32000000
TBPT,, 48200.0000 , 2.35000000
TBPT,, 52200.0000 , 2.37000000
TBPLOT,BH,2,,,
/IMAGE,SAVE,BH2,JPEG !将材料2的B-H曲线存储成bh2.jpg
mp,mgxx,2,hc
mp,mgyy,2,0
mp,mgzz,2,0 !定义永磁铁矫顽力
!建立模型
!建立永磁体
block,0,0.03,0,0.05,0,0.04
block,0.080,0.111,0,0.05,0,0.04
!建立线圈
K, ,0.0400,0,0,0
k, ,0.0400,0,0.04,
k, ,0.0412,0,0.0,
k, ,0.0412,0,0.0388,
k, ,0.0436,0,0.0,
k, ,0.0436,0,0.0388,
k, ,0.0448,0,0.0012,
k, ,0.0448,0,0.04,
k, ,0.0472,0,0.0012,
k, ,0.0472,0,0.04,
k, ,0.0484,0,0.0,
k, ,0.0484,0,0.0388,
k, ,0.0508,0,0.0,
k, ,0.0508,0,0.0388,
k, ,0.0520,0,0.0012,
k, ,0.0520,0,0.04,
k, ,0.0544,0,0.0012,
k, ,0.0544,0,0.04,
k, ,0.0556,0,0.0,
k, ,0.0556,0,0.0388,
k, ,0.0580,0,0.0,
k, ,0.0580,0,0.0388,
k, ,0.0592,0,0.0012,
k, ,0.0592,0,0.04,
k, ,0.0616,0,0.0012,
k, ,0.0616,0,0.04,
k, ,0.0628,0,0.0,
k, ,0.0628,0,0.0388,
k, ,0.0652,0,0.0,
k, ,0.0652,0,0.0388,
k, ,0.0664,0,0.0012,
k, ,0.0664,0,0.04,
k, ,0.0688,0,0.0012,
k, ,0.0688,0,0.04,
k, ,0.0700,0,0.0,
k, ,0.0700,0,0.04,
l,17,18
l,19,20
l,21,22
l,23,24
l,25,26
l,27,28
l,29,30
lstr,31,32
lstr,33,34
lstr,35,36
lstr,37,38
lstr,39,40
lstr,41,42
lstr,43,44
lstr,45,46
lstr,47,48
lstr,49,50
lstr,51,52
lstr,17,19
lstr,21,27
lstr,23,25
lstr,29,35
lstr,31,33
lstr,37,43
lstr,39,41
lstr,45,51
lstr,47,49
lstr,18,24
lstr,20,22
lstr,26,32
lstr,28,30
lstr,34,40
lstr,36,38
lstr,42,48
lstr,44,46
lstr,50,52
FLST,2,36,4
FITEM,2,25
FITEM,2,26
FITEM,2,43
FITEM,2,52
FITEM,2,53
FITEM,2,27
FITEM,2,28
FITEM,2,44
FITEM,2,45
FITEM,2,29
FITEM,2,30
FITEM,2,55
FITEM,2,54
FITEM,2,31
FITEM,2,32
FITEM,2,46
FITEM,2,47
FITEM,2,33
FITEM,2,34
FITEM,2,56
FITEM,2,57
FITEM,2,35
FITEM,2,36
FITEM,2,48
FITEM,2,49
FITEM,2,37
FITEM,2,38
FITEM,2,58
FITEM,2,59
FITEM,2,39
FITEM,2,40
FITEM,2,50
FITEM,2,51
FITEM,2,41
FITEM,2,42
FITEM,2,60
AL,P51X
APLOT
FLST,2,1,5,ORDE,1
FITEM,2,13
VEXT,P51X, , ,0,0.0005,0,,,,
!建立钢板模型
block,-0.25,0.25,-0.011,-0.001,-0.25,0.25
!建立空气层
block,-0.3,0.3,-0.02,0.06,-0.3,0.3
vovlap,all
numcmp,volu !将生成的体重新编号
vsel,s,volu,,1
vatt,2
vsel,s,volu,,2
vatt,2
vsel,s,volu,,4
vatt,1
vsel,s,volu,,5 !air
vatt,1
!建立单元类型,并划分网格
vsel,all
smrtsize,6
mshape,1,3d
mshkey,0
vmesh,all
!求解
finish
/sol
solve
finish
还有中间的线圈我想加交流电,有什么单元,怎么赋值
|