rschenkel=rinnen+rotorstaerke-deltaer
jochdicke2=rotorstaerke

*GET,kmax,kp,0,num,max

local,11,1,rinnen+rotorstaerke-rschenkel

csys,11
k,kmax+1,rschenkel,0
k,kmax+2,rschenkel,360/(4*p)
csys,0
k,kmax+3,rinnen+rotorstaerke,0
k,kmax+4,rinnen+rotorstaerke,polschbreite/2,0
k,kmax+5,rinnen+rotorstaerke-polschhoehe,-1
k,kmax+6,rinnen+rotorstaerke-polschhoehe,polschbreite/2,0
k,kmax+7,rinnen+rotorstaerke-polschhoehe,polbreite/2,0
k,kmax+8,0,polbreite/2,0
k,kmax+9,rinnen+rotorstaerke-polschhoehe,polbreite/2+wickbreite2,0
k,kmax+10,rinnen+rotorstaerke-polschhoehe-wickhoehe2,polbreite/2+wickbreite2,0
k,kmax+11,rinnen+rotorstaerke-polschhoehe-wickhoehe2,polbreite/2,0
csys,1
k,kmax+12,rinnen+joch2,-10
k,kmax+13,rinnen+joch2,360/(3*p)


csys,11
l,kmax+1,kmax+2
csys,0
l,kmax+1,kmax+4
l,kmax+4,kmax+6
l,kmax+6,kmax+9
l,kmax+5,kmax+7
l,kmax+11,kmax+8
l,kmax+9,kmax+10
l,kmax+9,kmax+7
l,kmax+10,kmax+11
l,kmax+7,kmax+11
csys,1
l,kmax+12,kmax+13


lsel,s,,,29
lsel,a,,,31
lovlap,all
lsel,s,,,9,10
lsel,a,,,34,39,5
lovlap,all
lsel,s,,,21
lsel,a,,,42
lovlap,all

lstr,10,35

lsel,s,,,33,44,11
lovlap,all

lsel,s,,,8
lsel,a,,,30,34,4
lsel,a,,,41,46,5
lsel,a,,,48,49
lsel,a,,,52
ldel,all


allsel

rrotor=rinnen+rotorstaerke
mrotor=7900*3.141593*rrotor*rrotor*jochtiefe
jrotor=0.5*mrotor*rrotor*rrotor