Geometry.OldNewReg=0;

lc=100;


Point (1)={0,0,0,1};
Point (2)={0,10,0,lc};
Point (3)={15,10,0,lc};
Point (4)={15,7,0,lc};

Point (5)={15,0,0,lc};
Point (6)={15.001,-7,0,1};
Point (7)={15.001,-10,0,1};

Point (9)={0,-10,0,lc};

Point (10)={20,0,0,lc};

Line (1)={1,2};
Line (2)={2,3};
Line (3)={3,4};
Line (4)={4,1};

Spline(5)={4,10,6};
Circle(6)={3,5,7};
Line (7)={6,7};


Line(10)={1,9};
Line(11)={9,7};
Line(13)={6,1};







Line Loop (8)={1,2,3,4};
Line Loop (9) ={3,5,7,-6};
Line Loop (14)={10,11,-7,13};


Plane Surface (1)={8};
Plane Surface (2)={9};
Plane Surface (3)={14};

Transfinite Line {1}=80 Using Progression 1.2;
Transfinite Line {2}=50;
Transfinite Line {-3}=80 Using Progression 1.2;
Transfinite Line {4}=50;

Transfinite Line {5}=50;
Transfinite Line {6}=50;
Transfinite Line {7}=80 Using Progression 1.2;

//Transfinite Line {10}=15;
//Transfinite Line {11}=20;
//Transfinite Line {13}=20;

Transfinite Surface {1}={1,2,3,4};
Transfinite Surface {2}={3,7,6,4};
Transfinite Surface {3}={1,9,7,6};

Recombine Surface {1};
Recombine Surface {2};
//Recombine Surface {3};
Mesh.Smoothing=100;


Extrude Surface {1, {0.0,0.0,1.0}}{Layers{1};Recombine;};

Extrude Surface {2, {0.0,0.0,1.0}}{Layers{1};Recombine;};

Extrude Surface {3, {0.0,0.0,1.0}}{Layers{1};Recombine;};