/PREP7
!
ET,1,SOLID97!汇流排周围空气SOLID97
ET,2,SOLID96!外层空气单元SOLID96
ET,3,INTER115 !汇流排周围空气97与外层空气96单元间用INTER115
ET,4,INFIN47!最外层表面用INFIN47
ET,5,SOLID97!汇流排SOLID97
!*
!
!空气属于材料1,μr=1
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,MURX,1,,1!材料1
!汇流排属于材料2,μr=1ρ=0.5E-7Ω?m,EX=6.9E10
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,MURX,2,,1材料2
MPDATA,RSVX,2,,0.5E-7 !材料2
MPDATA,EX,2,,6.9E10 !材料2
MPDATA,PRXY,2,, !材料2
!FINISH
! /EXIT,MODEL
!
BLOCK,0,64.008,0,15.24,0,1.27, !
BLOCK,64.008-15.24,64.008,15.24,60.96+15.24,0,1.27, !
BLOCK,64.008,64.008+21.336,60.96,60.96+15.24,0,1.27,!
FLST,2,3,6,ORDE,2
FITEM,2,1
FITEM,2,-3
VADD,P51X
!
BLOCK,-2,88,-2,78,0,1.27,
SAVE
!
LOCAL,12,0,42.672,38.1,0, , , ,1,1,
CSYS,12,
WPSTYLE,,,,,,,,0
WPSTYLE,,,,,,,,1
FLST,2,1,8
FITEM,2,42.672,38.1,0
WPAVE,P51X
!
CYLIND,70, ,0,1.27,0,360,
SAVE
!
FLST,2,3,6,ORDE,3
FITEM,2,1
FITEM,2,-2
FITEM,2,4
VOVLAP,P51X
!
NUMCMP,VOLU
!
/PNUM,KP,0
/PNUM,LINE,0
/PNUM,AREA,0
/PNUM,VOLU,1
/PNUM,NODE,0
/PNUM,TABN,0
/PNUM,SVAL,0
/NUMBER,0
!*
/PNUM,ELEM,0
/REPLOT
!汇流排单元与材料设置
CM,_Y,VOLU
VSEL, , , , 2
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT, 2, , 5, 0
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
!汇流排周围空气块
CM,_Y,VOLU
VSEL, , , , 3
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT, 1, , 1, 0
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
! 选择最外层空气圆柱
CM,_Y,VOLU
VSEL, , , , 1
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT, 1, , 2, 0
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
!空气体间的面
!选择空气长方体块的四个面赋inter115单元
/VIEW,1,1,2,3
/ANG,1
/REP,FAST
FLST,5,4,5,ORDE,3
FITEM,5,4
FITEM,5,7
FITEM,5,-9
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CMSEL,S,_Y
!*
CMSEL,S,_Y1
AATT, 1, , 3, 0,
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
!空气最外层面
!选择空气圆柱外表面赋infin47单元
FLST,5,2,5,ORDE,2
FITEM,5,14
FITEM,5,16
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CMSEL,S,_Y
!*
CMSEL,S,_Y1
AATT, 1, , 4, 0,
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
SAVE
!划分网格
SMRT,6
SMRT,2
MSHAPE,1,3D
MSHKEY,0
!*
FLST,5,3,6,ORDE,2
FITEM,5,1
FITEM,5,-3
CM,_Y,VOLU
VSEL, , , ,P51X
CM,_Y1,VOLU
CHKMSH,'VOLU'
CMSEL,S,_Y
!*
VMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
/UI,MESH,OFF
!汇流排单元定义BUS组件
ESEL,S,TYPE,,5 !选择5号单元类型的汇流排
EPLOT !画出汇流排
CM,busmagnet,ELEM !定义汇流排组件bus
!汇流排单元转换成SOLID69电流传导分析单元
ET,5,SOLID69
!汇流排施加载荷
/VIEW,1,,,1
/ANG,1
/REP,FAST
/ANG,1,-30,YS,1
/REP,FAST
/ANG,1,-30,YS,1
/REP,FAST
/ANG,1,30,YS,1
/REP,FAST
FLST,2,1,3,ORDE,1
FITEM,2,5
/GO
!*
FK,P51X,AMPS,50000
/ANG,1,30,YS,1
/REP,FAST
/ANG,1,30,YS,1
/REP,FAST
/ANG,1,30,YS,1
/REP,FAST
/ANG,1,-30,YS,1
/REP,FAST
/ANG,1,-30,YS,1
/REP,FAST
/ANG,1,30,YS,1
/REP,FAST
FLST,2,1,5,ORDE,1
FITEM,2,18
/GO
!*
DA,P51X,VOLT,0
!画出全部
ALLSEL,ALL
EPLOT
/AUTO,1
/REP,FAST
!电流传导分析
/SOL
!*
ANTYPE,0
SAVE
/STATUS,SOLU
SOLVE
!!!!!提示错误 mixed magnetic scalar and vector elements are not permitted without INTER115 |