
!!
!!Rotor
!!
lsel,s,,,34,36,2
*get,laeng,line,36,leng
istue1=nint(laeng/meshluft)
*if,istue1,lt,1,then
istue1=1
*endif
lesi,all,,,istue1

lsel,s,,,35
lsel,a,,,27
*get,laeng,line,35,leng
istue1=nint(laeng/meshluft)
*if,istue1,lt,1,then
istue1=1
*endif
lesi,all,,,istue1

lsel,s,,,13,15,2
lsel,a,,,41
*get,laeng,line,13,leng
istue1=nint(laeng/meshluft)
*if,istue1,lt,1,then
istue1=1
*endif
lesi,all,,,istue1

lsel,s,,,11
*get,laeng,line,11,leng
istue1=nint(laeng/mesheisen)
*if,istue1,lt,1,then
istue1=1
*endif
lesi,all,,,istue1

lsel,s,,,19
*get,laeng,line,19,leng
istue1=nint(laeng/mesheisen)
*if,istue1,lt,1,then
istue1=1
*endif
lesi,all,,,istue1

lsel,s,,,8
*get,laeng,line,8,leng
istue1=nint(laeng/mesheisen)
*if,istue1,lt,1,then
istue1=1
*endif
lesi,all,,,istue1

lsel,s,,,33,39,6
*get,laeng,line,33,leng
istue1=nint(laeng/mesheisen)
*if,istue1,lt,1,then
istue1=1
*endif
lesi,all,,,istue1

lsel,s,,,40
*get,laeng,line,40,leng
istue1=nint(laeng/mesheisen)
*if,istue1,lt,1,then
istue1=1
*endif
lesi,all,,,istue1

!!
!!Rotor
!!
asel,s,,,10,11
aatt,12,12,12

asel,s,,,8
aatt,11,11,11

asel,s,,,9
aatt,13,13,13

asel,s,mat,,11,18
amesh,all

asel,s,mat,,11,15
cm,krotor,area
