
p1 = newp;
line = newl;
loop = newll;
surf = news;
lref = 1.0;

Point(p1+  1)={  0.8940,  0.4869,  1.4885, lref};
Point(p1+  2)={ -3.8047,  2.1963,  1.4885, lref};
Point(p1+  3)={  5.5927,  2.1963,  1.4885, lref};
Point(p1+  4)={  0.8940,  2.1963,  6.1872, lref};
Point(p1+  5)={  0.8940,  2.1963, -3.2102, lref};
Point(p1+  6)={  0.8940,  5.4869,  1.4885, lref};
Point(p1+  7)={  0.8940, -5.3631,  1.4885, lref};
Point(p1+  8)={ -5.6842, -2.9699,  1.4885, lref};
Point(p1+  9)={  7.4722, -2.9699,  1.4885, lref};
Point(p1+ 10)={  0.8940, -2.9699,  8.0667, lref};
Point(p1+ 11)={  0.8940, -2.9699, -5.0897, lref};
Point(p1+ 12)={  0.8940,-12.3631,  1.4885, lref};
Point(p1+ 13)={  0.8940,  2.1963,  1.4885, lref};
Point(p1+ 14)={  0.8940, -2.9699,  1.4885, lref};
 
p1 = p1-1;
 
Circle(line+1) = {p1+6, p1+2, p1+7};
Circle(line+2) = {p1+5, p1+2, p1+7};
Circle(line+3) = {p1+3, p1+2, p1+7};
Circle(line+4) = {p1+4, p1+2, p1+7};

Circle(line+5) = {p1+5, p1+14, p1+4};
Circle(line+6) = {p1+4, p1+14, p1+6};
Circle(line+7) = {p1+6, p1+14, p1+3};
Circle(line+8) = {p1+3, p1+14, p1+5};

Circle(line+9) = {p1+12, p1+8, p1+13};
Circle(line+10) = {p1+11, p1+8, p1+13};
Circle(line+11) = {p1+10, p1+8, p1+13};
Circle(line+12) = {p1+9, p1+8, p1+13};

Circle(line+13) = {p1+11, p1+15, p1+9};
Circle(line+14) = {p1+9, p1+15, p1+12};
Circle(line+15) = {p1+12, p1+15, p1+10};
Circle(line+16) = {p1+10, p1+15, p1+11};
Line(line+17) = {p1+5, p1+11};
Line(line+18) = {p1+4, p1+10};
Line(line+19) = {p1+3, p1+9};
Line(line+20) = {p1+6, p1+12};

Line Loop(loop+1) = {line+4, -line-2, line+5};
Surface(surf+1) = {loop+1};

Line Loop(loop+2) = {line+4, -line-1, -line-6};
Surface(surf+2) = {loop+2};

Line Loop(loop+3) = {line+1, -line-3, -line-7};
Surface(surf+3) = {loop+3};

Line Loop(loop+4) = {line+3, -line-2, -line-8};
Surface(surf+4) = {loop+4};

Line Loop(loop+5) = {line+8, line+17, line+13, -line-19};
Surface(surf+5) = {loop+5};

Line Loop(loop+6) = {line+5, line+18, line+16, -line-17};
Surface(surf+6) = {loop+6};

Line Loop(loop+7) = {line+6, line+20, line+15, -line-18};
Surface(surf+7) = {loop+7};

Line Loop(loop+8) = {line+19, line+14, -line-20, line+7};
Surface(surf+8) = {loop+8};

Line Loop(loop+9) = {line+12, -line-10, line+13};
Surface(surf+9) = {loop+9};

Line Loop(loop+10) = {line+9, -line-12, line+14};
Surface(surf+10) = {loop+10};

Line Loop(loop+11) = {line+10, -line-11, line+16};
Surface(surf+11) = {loop+11};

Line Loop(loop+12) = {line+11, -line-9, line+15};
Surface(surf+12) = {loop+12};
 
line = line-1;
 
Transfinite Line {line+9, line+6, line+7, line+8} = 9  Using Progression 1;
Transfinite Line {line+14, line+17, line+16, line+15} = 15  Using Progression 1;
Transfinite Line {line+18, line+19, line+21, line+20} = 21 Using Progression 1;

Transfinite Line {line+3, line+5, line+2, line+4} = 5 Using Progression 1.2;
Transfinite Line {line+11, line+13, line+10, line+12} = 15 Using Progression 1.1;
