 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;


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

l33 = newl;
//Line (l33+1) = {p22+1, p22+2} ;

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


Point (pcoil2+5) = {15, 17, -24.6+coilheight,lc} ;
Point (pcoil2+6) = {-15, 17, -24.6+coilheight,lc} ;
Point (pcoil2+7) = {-15, -17, -24.6+coilheight,lc} ;
Point (pcoil2+8) = {15, -17, -24.6+coilheight,lc} ;
r=5;
Point (pcoil2+9) = {15-r, 17-r, -24.6+coilheight,lc} ;
Point (pcoil2+10) = {-15+r, 17-r, -24.6+coilheight,lc} ;
Point (pcoil2+11) = {-15+r, -17+r, -24.6+coilheight,lc} ;
Point (pcoil2+12) = {15-r, -17+r, -24.6+coilheight,lc} ;

Point (pcoil2+13) = {15, 17-r, -24.6+coilheight,lc} ;
Point (pcoil2+14) = {-15, 17-r, -24.6+coilheight,lc} ;
Point (pcoil2+15) = {-15, -17+r, -24.6+coilheight,lc} ;
Point (pcoil2+16) = {15, -17+r, -24.6+coilheight,lc} ;

Point (pcoil2+17) = {15-r, 17, -24.6+coilheight,lc} ;
Point (pcoil2+18) = {-15+r, 17, -24.6+coilheight,lc} ;
Point (pcoil2+19) = {-15+r, -17, -24.6+coilheight,lc} ;
Point (pcoil2+20) = {15-r, -17, -24.6+coilheight,lc} ;

//+
c11 = newc;
