找回密码
 注册
Simdroid-非首页
查看: 75|回复: 0

[电磁场] ANSYS中AZ,VOLT自由度的SOLID117单元三相电流加载

[复制链接]
发表于 2009-11-24 18:11:30 | 显示全部楼层 |阅读模式 来自 武汉大学
有谁知道SOLID117单元AZ,VOLT自由度用F,N,AMPS,这个命令怎么加三相电流吗?跪求!
源程序如下:
FINISH
/CLEAR

/PREP7
RN0=0.53/2-0.016 !导体内半径
RW0=0.53/2  !导体外半径
RN1=0.98/2-0.016 !外壳内半径
RW1=0.98/2  !外壳外半径
HX=0.25
LEN=6
L1=1.47
L2=3.92   !空气层外半径
LX=0.24
I=14000   !电流幅值
!--------定义三相电流-----------
*SET,ACURR,I
*SET,ACURI,0
*SET,BCURR,-0.5*I
*SET,BCURI,-SQRT(3)*I/2
*SET,CCURR,-0.5*I
*SET,CCURI,SQRT(3)*I/2
!-------------------------------------
/PNUM,AREA,1
/PNUM,LINE,1
BLOCK,,L2,,L1,,LEN
WPOFFS,LX+RW1,L1/2
CYLIND,0,RN0,0,LEN,0,360
CYLIND,RN0,RW0,0,LEN,0,360
CYLIND,RW0,RN1,0,LEN,0,360
CYLIND,RN1,RW1,0,LEN,0,360
WPOFFS,-LX-RW1,-L1/2
WPOFFS,L2/2,L1/2
CYLIND,0,RN0,0,LEN,0,360
CYLIND,RN0,RW0,0,LEN,0,360
CYLIND,RW0,RN1,0,LEN,0,360
CYLIND,RN1,RW1,0,LEN,0,360
WPOFFS,-L2/2,-L1/2
WPOFFS,L2-LX-RW1,L1/2
CYLIND,0,RN0,0,LEN,0,360
CYLIND,RN0,RW0,0,LEN,0,360
CYLIND,RW0,RN1,0,LEN,0,360
CYLIND,RN1,RW1,0,LEN,0,360
WPOFFS,-(L2-LX-RW1),-L1/2
VOVLAP,ALL
VGLUE,ALL
NUMCMP,ALL
ET,1,SOLID117
KEYOPT,1,1,1
ET,2,SOLID117
MP,MURX,1,1  !铜的磁导率
MP,RSVX,1,3E-8  !铜的电阻率
MP,MURX,2,1  !空气磁导率
ALLSEL,ALL
VSEL,S,,,4,10,3
VSEL,A,,,6,12,3
VATT,1,,1
ALLSEL,ALL
VSEL,S,,,1,3
VSEL,A,,,13
VSEL,A,,,5,11,3
VATT,2,,2
VSEL,S,,,4,10,3
VSEL,A,,,6,12,3
MSHKEY,0
MSHAPE,1,3D
ESIZE,0.2
VMESH,ALL
VSEL,S,,,1,3
MSHKEY,0
MSHAPE,1,3D
ESIZE,0.1
VMESH,ALL
VSEL,S,,,5,11,3
MSHKEY,0
MSHAPE,1,3D
ESIZE,0.05
VMESH,ALL
VSEL,S,,,13
MSHKEY,0
MSHAPE,1,3D
ESIZE,0.3
VMESH,ALL
FINISH
/SOLU
ANTYPE,HARMIC
HARFRQ,50
ALLSEL,ALL
CSYS,1
NSEL,EXT
D,ALL,AZ,0
CSYS,0
ALLSEL,ALL
ASEL,S,,,47
ASEL,A,,,41
ASEL,A,,,35
NSLA,S,1
D,ALL,VOLT,0
ALLSEL,ALL
ASEL,S,,,36
NSLA,S,1
!------------加载三相电流---------------
CP,1,VOLT,ALL
*GET,N1,NODE,,NUM,MIN
F,N1,AMPS,BCURR,BCURI
ALLSEL,ALL
ASEL,S,,,42
NSLA,S,1
CP,2,VOLT,ALL
*GET,N2,NODE,,NUM,MIN
F,N2,AMPS,CCURR,CCURI
ALLSEL,ALL
ASEL,S,,,48
NSLA,S,1
CP,3,VOLT,ALL
*GET,N3,NODE,,NUM,MIN
F,N3,AMPS,ACURR,ACURI
!-----------------------------------------
ALLSEL,ALL
ASEL,S,,,51
NSLA,S,1
CP,4,VOLT,ALL
ALLSEL,ALL
ASEL,S,,,45
NSLA,S,1
CP,5,VOLT,ALL
ALLSEL,ALL
ASEL,S,,,39
NSLA,S,1
CP,6,VOLT,ALL
ALLSEL,ALL
ASEL,S,,,40
NSLA,S,1
CP,7,VOLT,ALL
ALLSEL,ALL
ASEL,S,,,46
NSLA,S,1
CP,8,VOLT,ALL
ALLSEL,ALL
ASEL,S,,,52
NSLA,S,1
CP,9,VOLT,ALL
NSEL,ALL
ALLSEL,ALL
SOLVE
FINISH
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Simapps系列直播

Archiver|小黑屋|联系我们|仿真互动网 ( 京ICP备15048925号-7 )

GMT+8, 2024-9-30 17:27 , Processed in 0.048789 second(s), 14 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表