/prep7

R,23,8*wickbreitek*wickhoehek,8*nwink,jochtiefe,1,filk  
R,24,8*wickbreitek*wickhoehek,8*nwink,jochtiefe,1,filk  
R,33,wickbreiteko*wickhoehe1,nwinko,jochtiefe,1,filko  
R,34,wickbreiteko*wickhoehe1,nwinko,jochtiefe,1,filko  
R,43,wickbreitewen*wickhoehewen,nwinwen,jochtiefe,1,filwen  
R,44,wickbreitewen*wickhoehewen,nwinwen,jochtiefe,1,filwen  

RErregung=2*p*1/leita*nwin1*jochtiefe*2*1/(wickbreite1*wickhoehe1/2*fila/nwin1)
RAnkerspule=1/leiti*nwin2*jochtiefe*2*1/(wickbreite2*wickhoehe2/2*fili/nwin2)
RKompenpol=1/leiti*8*nwink*jochtiefe*2*1/(8*wickbreitek*wickhoehek*filk/(8*nwink))
RKompoupol=1/leiti*nwinko*jochtiefe*2*1/(wickbreiteko*wickhoehe1*filko/nwinko)
RKompwepol=1/leiti*nwinwen*jochtiefe*2*1/(wickbreitewen*wickhoehewen*filwen/nwinwen)
