*If,nichtlin,ne,1,then
MP,MURX,1,murxa
MP,MURX,11,murxi
*Else
eisen2.txt
eisen2i.txt
*EndIf
MP,MURX,2,1
MP,MURX,3,1
MP,RSVX,3,1/leita 
MP,MURX,4,1
MP,RSVX,4,1/leita 
MP,MURX,5,1
MP,MURX,12,1
MP,MURX,13,1
MP,RSVX,13,1/leiti 
MP,MURX,14,1
MP,RSVX,14,1/leiti 
MP,MURX,15,1


*if,nwin1,gt,1,then
*If,Zweischicht,eq,1,then
R,3,wickbreite1*wickhoehe1/2,nwin1,jochtiefe,1,fila ! reale Konstante Statorleiter 1 (Zweischicht) 
R,4,wickbreite1*wickhoehe1/2,nwin1,jochtiefe,1,fila ! reale Konstante Statorleiter 2    
*Else
R,3,wickbreite1*wickhoehe1,nwin1,jochtiefe,1,fila ! reale Konstante Statorleiter 1 (Einschicht)
R,4,wickbreite1*wickhoehe1,nwin1,jochtiefe,1,fila ! reale Konstante Statorleiter 2    
*EndIf
*else
*If,Zweischicht,eq,1,then
R,3,wickbreite1*wickhoehe1/2,,jochtiefe,1, ! Korrektur Leitertyp Stator, falls Staebe vorliegen  
R,4,wickbreite1*wickhoehe1/2,,jochtiefe,1, ! Korrektur Leitertyp Stator, falls Staebe vorliegen  
*Else
R,3,wickbreite1*wickhoehe1,,jochtiefe,1, ! Korrektur Leitertyp Stator, falls Staebe vorliegen  
R,4,wickbreite1*wickhoehe1,,jochtiefe,1, ! Korrektur Leitertyp Stator, falls Staebe vorliegen  
*EndIf
*endif

*if,nwin2,gt,1,then
*If,Zweischicht2,eq,1,then
R,13,wickbreite2*wickhoehe2/2,nwin2,jochtiefe,1,fili, ! reale Konstante Rotorleiter 1    
R,14,wickbreite2*wickhoehe2/2,nwin2,jochtiefe,1,fili, ! reale Konstante Rotorleiter 2    
*Else
R,13,wickbreite2*wickhoehe2,nwin2,jochtiefe,1,fili,, ! reale Konstante Rotorleiter 1    
R,14,wickbreite2*wickhoehe2,nwin2,jochtiefe,1,fili,, ! reale Konstante Rotorleiter 2    
*endif
*else
*If,Zweischicht2,eq,1,then
R,13,wickbreite2*wickhoehe2/2,,jochtiefe,, ! reale Konstante Rotorleiter 1    
R,14,wickbreite2*wickhoehe2/2,,jochtiefe,, ! reale Konstante Rotorleiter 2    
*Else
R,13,wickbreite2*wickhoehe2,,jochtiefe,, ! reale Konstante Rotorleiter 1    
R,14,wickbreite2*wickhoehe2,,jochtiefe,, ! reale Konstante Rotorleiter 2    
*endif
*endif








*If,nwin1,eq,1,then
keyopt,3,1,4
keyopt,4,1,4
*EndIf
*If,nwin2,eq,1,then
keyopt,13,1,4
keyopt,14,1,4
*EndIf