nepdizhang 发表于 2011-7-5 23:53

绝缘子串ansys 三维电场分析 如何加载边界条件

!/BACH,LIST
/TITLE,NaiZhangChuanChangQiangFenBu      
/FILNAME,Elc_3D NaiZhangChuan,1             ! 定义工作文件名
KEYW,MAGELC,1                               ! 指定电场分析
/prep7                                    ! 前处理几何建模
!几何尺寸参数(MKS单位,笛卡尔坐标)
MP,PERX,1,1                                 !空气介电常数
mp,PERX,2,1e6                               !瓷介电常数
mp,perx,3,1e-6                              !良导体介电常数
ET,1,122                                    !三维电场单元                                 
ET,2,111,2                                  !三维远场单元                  
R1=150
R2=125
R3=45
H1=20
H2=110
H3=150
H=170
V1=100
V0=0
CYLIND,0,R1,H3,H,0,360    !生成圆柱体1
CYLIND,R2,R1,H1,H3,0,360!生成圆柱体2
VADD,1,2
NUMCMP,VOLU                      !生成圆柱体1=1+2
CYLIND,0,R3,0,H3,0,360         !生成圆柱体2
CYLIND,0,2*R1,-2*H,2*H,0,360   !生成圆柱体3
VOVLAP,ALL
NUMCMP,VOLU
CYLIND,0,4*R1,-4*H,4*H,0,360!生成圆柱体4
VOVLAP,ALL
!AOVLAP,ALL
NUMCMP,VOLU
/VIEW,1, ,-1                      !变换视角

                                  !设置材料特性
VSEL,S, , ,1
VATT,3                            !良导体介电常数
VSEL,S, , ,2
VATT,2                            !瓷介电常数
                                  !设置单元特性
VSEL,S, , ,4
TYPE,2                            ! 远场单元   
                                                               
ALLSEL,ALL                  
VSEL,S, , ,1
VSEL,A, , ,2
VSEL,A, , ,3
MSHAPE,0,3D
MSHKEY,2
VSWEEP,ALL
VSEL,S, , ,4
MSHAPE,0,3D
MSHKEY,2
VSWEEP,ALL
                  
ALLSEL,ALL                     !设置外边界
CSYS,1
NSEL,S,LOC,X,4*R1         
CSYS,0
NSEL,A,LOC,Z,4*H
NSEL,A,LOC,Z,-4*H
SF,ALL,INF
                                 !加载边界条件
CSYS,0                            !直角坐标
NSEL,S,LOC,Z,0
CSYS,1
NSEL,U,LOC,X,R3,4*R1
D,ALL,VOLT,V1
CSYS,0
NSEL,S,LOC,Z,H
CSYS,1
NSEL,U,LOC,X,R1,4*R1
D,ALL,VOLT,V0
ALLSEL,ALL
FINISH
--------------------------------------------------
上述语句可以生成模型及加载二维电压边界
请问 如何加载三维空气边界条件

nepdizhang 发表于 2011-7-8 21:26

求大神给解惑阿
页: [1]
查看完整版本: 绝缘子串ansys 三维电场分析 如何加载边界条件