!!
!!Stator
!!

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

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

lsel,s,,,19,24,5
lsel,a,,,36,37
*get,laeng,line,19,leng
istue3=nint(laeng/mesheisen)
*if,istue3,lt,1,then
istue3=1
*endif
lesi,all,,,istue3

lsel,s,,,12,14,2
*get,laeng,line,14,leng
istue3=nint(laeng/mesheisen)
*if,istue3,lt,1,then
istue3=1
*endif
lesi,all,,,istue3,.1

lsel,s,,,9,10
lsel,a,,,11
lsel,a,,,42
*get,laeng,line,9,leng
istue4=nint(laeng/mesheisen)
*if,istue4,lt,1,then
istue4=1
*endif
lesi,all,,,istue4

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

lsel,s,,,38,39
lsel,a,,,21
*get,laeng,line,21,leng
istue2=nint(laeng/mesheisen)
*if,istue2,lt,1,then
istue2=1
*endif
lesi,all,,,istue2

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

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

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

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

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

lsel,s,,,5,7,2
*get,laeng,line,5,leng
istue1=nint(laeng/meshluft)
*if,istue1,lt,1,then
istue1=1
*endif
lesi,all,,,istue1

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

!!
!!Stator
!!
asel,s,,,1,3
aatt,1,1,1

asel,s,,,9,11
aatt,2,2,2

local,35,1
asel,s,,,8
aatt,3,3,3

asel,s,,,4,7
*If,wende,eq,1,then
asel,s,,,4,5
asel,a,,,7
aatt,1,1,1
asel,s,,,6
aatt,43,43,43
*Else
aatt,2,2,2
*EndIf

asel,s,,,1,7
asel,a,,,9,11
amesh,all

asel,s,,,8
esys,35
amesh,all

allsel
esys,0
ASEL,S,,,1,11 
cm,kstator,area
cm,_stator,area
