Z=-0.3;

P=newp;
Point(P) = {0, 0, 0, 1.0};
P=newp;
Point(P) = {0, 1, 0, 1.0};
P=newp;
Point(P) = {1, 1, 0, 1.0};
P=newp;
Point(P) = {1, 0, 0, 1.0};
P=newp;
Point(P) = {2, 1, Z, 1.0};
P=newp;
Point(P) = {2, 0, Z, 1.0};
P=newp;
Point(P) = {3, 1, 3*Z, 1.0};
P=newp;
Point(P) = {3, 0, 3*Z, 1.0};

Translate {0, -1, Z} {
  Duplicata { Point{8, 6, 4, 1}; }
}


//*********************************************
//*****   Introduce a discontinuity      ******
Translate {0, 0, -Z} {
  Point{6};
}
//*********************************************


Line(1) = {2, 1};
Line(2) = {1, 4};
Line(3) = {4, 3};
Line(4) = {3, 2};
Line(5) = {3, 5};
Line(6) = {5, 6};
Line(7) = {6, 4};
Line(56) = {5, 7};
Line(57) = {7, 8};
Line(58) = {8, 6};
Line(127) = {1, 12};
Line(128) = {12, 11};
Line(129) = {11, 4};
Line(130) = {6, 10};
Line(131) = {10, 11};
Line(132) = {10, 9};
Line(133) = {8, 9};

Transfinite Line {6, 5, 4, 1, 2, 3, 7} = 10 Using Progression 1;
Transfinite Line {58, 57, 56} = 10 Using Progression 1;
Transfinite Line {133, 132, 130, 131, 129, 128, 127} = 10 Using Progression 1;

Line Loop(8) = {5, 6, 7, 3};
Plane Surface(9) = {8};
Line Loop(10) = {4, 1, 2, 3};
Plane Surface(11) = {10};
Line Loop(59) = {56, 57, 58, -6};
Plane Surface(60) = {59};
Line Loop(134) = {129, -2, 127, 128};
Plane Surface(135) = {134};
Line Loop(136) = {129, -7, 130, 131};
Plane Surface(137) = {136};
Line Loop(138) = {130, 132, -133, 58};
Plane Surface(139) = {138};

Extrude {
  Surface{11, -9, -60, 135, -137, 139};	
  Layers{10};
}

//*********************************************
//*******   This does not affect   ************
Extrude {
  Surface{-11, 9, 60, -135, 137, -139};	
  Layers{10};
}
//*********************************************
//*********************************************
