[Gmsh] RE Conformal surfaces

jean pierre aubry jeanpierre at lamachine.fr
Wed Oct 7 12:15:55 CEST 2015


hello

does this do the job?
i exaggerated the thickness of the cylinder so as to make it visible

----
cl= 0.02;

R = 0.11;

Point(1) = {-0.15, -0.15, -0.1, cl}; //Bottom face for parallelepiped
Point(2) = {0.15, -0.15, -0.1, cl};
Point(3) = {0.15, 0.15, -0.1, cl};
Point(4) = {-0.15, 0.15, -0.1, cl};
Line(1) = {3, 4};
Line(2) = {4, 1}; 
Line(3) = {1, 2};
Line(4) = {2, 3};
Line Loop(100) = {1, 2, 3, 4}; 

Point(5) = { 0, 0, -0.10, cl}; //Center for the base of the cilinder
Point(6) = { R, 0, -0.10, cl};
Point(7) = { 0, -R, -0.10, cl};
Point(8) = {-R, 0, -0.10, cl};
Point(9) = { 0, R, -0.10, cl};
//Arcs
Circle(5) = {6, 5, 7};
Circle(6) = {7, 5, 8};
Circle(7) = {8, 5, 9};
Circle(8) = {9, 5, 6};
Line Loop(101)= {5, 6, 7, 8}; 

Plane Surface(102) = {100, 101};
Plane Surface(103) = {101};

Extrude {0, 0, -0.3} {Surface{102};Layers{10};}

Extrude {0, 0, 0.03} {Surface{103};Layers{1};}
------

-- 
jean pierre aubry
jeanpierre[at]lamachine.fr
33 688 670 795