!   test_revolve_aset.mac
!
mod_assemb_prep
!
mat_select,'c410','al6061','sand'
create_mat_prop,'stator','ex',1e7
!
csys,0
!
k,,1,3,0
k,,4,3,0
k,,4,5,0
k,,1,5,0
!
create_area
!
k,,4,3,0
k,,5,3,0
k,,5,6,0
k,,4,6,0
!
create_area
!
k,,2,4,0
k,,6,4,0
k,,6,7,0
k,,2,7,0
!
create_area
!
aovlap,all
init_entity_num
adele,am-3,am,3,1
init_entity_num
!
k,,1,0,0
k,,0,0,0
!
init_entity_num
!
asel,s,area,,am-3
aatt,c410
!
asel,s,area,,am-1
aatt,al6061
!
asel,s,area,,am
aatt,stator
!
init_entity_num
!
create_cs,0,,0,0,0,0,0,0,-90
revolve_aset,csn+1,360,2
!revolve_aset,km-1,km,360,2
!
aplot