 Line (lcoil+4) = {pcoil+4, pcoil+1} ;
 
 
-Point (pcoil+5) = {15, 17, -24.6} ;
-Point (pcoil+6) = {-15, 17, -24.6} ;
-Point (pcoil+7) = {-15, -17, -24.6} ;
-Point (pcoil+8) = {15, -17, -24.6} ;
+Point (pcoil+5) = {15, 17, -24.6,lc} ;
+Point (pcoil+6) = {-15, 17, -24.6,lc} ;
+Point (pcoil+7) = {-15, -17, -24.6,lc} ;
+Point (pcoil+8) = {15, -17, -24.6,lc} ;
 r=5;
-Point (pcoil+9) = {15-r, 17-r, -24.6} ;
-Point (pcoil+10) = {-15+r, 17-r, -24.6} ;
-Point (pcoil+11) = {-15+r, -17+r, -24.6} ;
-Point (pcoil+12) = {15-r, -17+r, -24.6} ;
-
-Point (pcoil+13) = {15, 17-r, -24.6} ;
-Point (pcoil+14) = {-15, 17-r, -24.6} ;
-Point (pcoil+15) = {-15, -17+r, -24.6} ;
-Point (pcoil+16) = {15, -17+r, -24.6} ;
-
-Point (pcoil+17) = {15-r, 17, -24.6} ;
-Point (pcoil+18) = {-15+r, 17, -24.6} ;
-Point (pcoil+19) = {-15+r, -17, -24.6} ;
-Point (pcoil+20) = {15-r, -17, -24.6} ;
+Point (pcoil+9) = {15-r, 17-r, -24.6,lc} ;
+Point (pcoil+10) = {-15+r, 17-r, -24.6,lc} ;
+Point (pcoil+11) = {-15+r, -17+r, -24.6,lc} ;
+Point (pcoil+12) = {15-r, -17+r, -24.6,lc} ;
+
+Point (pcoil+13) = {15, 17-r, -24.6,lc} ;
+Point (pcoil+14) = {-15, 17-r, -24.6,lc} ;
+Point (pcoil+15) = {-15, -17+r, -24.6,lc} ;
+Point (pcoil+16) = {15, -17+r, -24.6,lc} ;
+
+Point (pcoil+17) = {15-r, 17, -24.6,lc} ;
+Point (pcoil+18) = {-15+r, 17, -24.6,lc} ;
+Point (pcoil+19) = {-15+r, -17, -24.6,lc} ;
+Point (pcoil+20) = {15-r, -17, -24.6,lc} ;
 
 //+
 c1 = newc;

//coil line 2
coilheight = 49.2;
pcoil2 = newp;
Point (pcoil2+1) = {9, 11, -24.6+coilheight} ;
Point (pcoil2+2) = {-9, 11, -24.6+coilheight} ;
Point (pcoil2+3) = {-9, -11, -24.6+coilheight} ;
Point (pcoil2+4) = {9, -11, -24.6+coilheight} ;

lcoil2 = newl;
Line (lcoil2+1) = {pcoil2+1, pcoil2+2} ;

Line (l33+15) = {p22+12, p2+13} ;

p2r = newp;
Point(p2r+1) = {0, -halfWidth, -11.15,lc};
Point(p2r+2) = {0.595, -halfWidth, -11.15,lc};
Point(p2r+3) = {4.44, -halfWidth, 3.2,lc};
Point(p2r+4) = {5.5, -halfWidth, 3.2,lc};
Point(p2r+5) = {5.5, -halfWidth, 30,lc};
Point(p2r+6) = {18, -halfWidth, 30,lc};
Point(p2r+7) = {18, -halfWidth, 23.625,lc};
Point(p2r+8) = {23.45, -halfWidth, 8.65,lc};
Point(p2r+9) = {25.35, -halfWidth, 8.65,lc};
Point(p2r+10) = {25.35, -halfWidth, 25,lc};
Point(p2r+11) = {23.2, -halfWidth, 25,lc};
Point(p2r+12) = {23.2, -halfWidth, 35,lc};
Point(p2r+13) = {0, -halfWidth, 35,lc};

l3r = newl;
Line (l3r+1) = {p2r+1, p2r+2} ;
