Skip to content
Snippets Groups Projects
Commit bfdcc994 authored by Christophe Geuzaine's avatar Christophe Geuzaine
Browse files

*** empty log message ***

parent 049f2b91
No related branches found
No related tags found
No related merge requests found
// an example of a purely hexahedral mesh
lc = 0.3;
Point(1) = {0,0,0,lc};
Point(2) = {1,0,0,lc};
Point(3) = {1,1,0,lc};
Point(4) = {0,1,0,lc};
// example of a purely hexahedral mesh using only transfinite
// mesh constraints
Point(1) = {-2,0,0,lc};
Point(2) = {-1,0,0,lc};
Point(3) = {-1,1,0,lc};
Point(4) = {-2,1,0,lc};
Point(5) = {-2,0,1,lc};
Point(6) = {-1,0,1,lc};
Point(7) = {-1,1,1,lc};
Point(8) = {-2,1,1,lc};
Line(1) = {4,3};
Line(2) = {3,2};
Line(3) = {2,1};
Line(4) = {1,4};
Line Loop(5) = {2,3,4,1};
Plane Surface(6) = {5};
Line(6) = {5,6};
Line(7) = {6,7};
Line(8) = {7,8};
Line(9) = {8,5};
Line(10) = {1,5};
Line(11) = {4,8};
Line(12) = {2,6};
Line(13) = {3,7};
Line Loop(14) = {3,4,1,2};
Plane Surface(15) = {14};
Line Loop(16) = {6,7,8,9};
Plane Surface(17) = {16};
Line Loop(18) = {10,-9,-11,-4};
Plane Surface(19) = {18};
Line Loop(20) = {8,-11,1,13};
Plane Surface(21) = {20};
Line Loop(22) = {12,7,-13,2};
Plane Surface(23) = {22};
Line Loop(24) = {6,-12,3,10};
Plane Surface(25) = {24};
Surface Loop(1) = {17,-25,-23,-21,19,15};
Volume(1) = {1};
Transfinite Line{1:4,6:13} = 5;
Transfinite Surface {15} = {1,2,3,4};
Transfinite Surface {17} = {5,6,7,8};
Transfinite Surface {19} = {1,5,8,4};
Transfinite Surface {21} = {8,7,3,4};
Transfinite Surface {23} = {6,7,3,2};
Transfinite Surface {25} = {5,6,2,1};
Transfinite Volume{1} = {1,2,3,4,5,6,7,8};
Recombine Surface{15:25:2};
// the same by extruding a transfinite surface mesh
Transfinite Line{1:4} = 5;
Transfinite Surface{6} = {1,2,3,4};
Recombine Surface{6};
Point(51) = {0,0,0,lc};
Point(52) = {1,0,0,lc};
Point(53) = {1,1,0,lc};
Point(54) = {0,1,0,lc};
Line(51) = {54,53};
Line(52) = {53,52};
Line(53) = {52,51};
Line(54) = {51,54};
Line Loop(55) = {52,53,54,51};
Plane Surface(56) = {55};
Transfinite Line{51:54} = 5;
Transfinite Surface{56} = {51,52,53,54};
Recombine Surface{56};
Extrude {0,0,1} {
Surface{6}; Layers{5,1}; Recombine;
Surface{56}; Layers{5,1}; Recombine;
}
// we could do the same using only extrusions:
// and the same by using only extrusions
Point(100) = {2,0,0,lc};
l[] = Extrude {1,0,0}{
......@@ -31,4 +77,12 @@ s[] = Extrude {0,1,0}{
};
Extrude {0,0,1}{
Surface{s[1]}; Layers{4,1}; Recombine;
}
// add some labels
View "Mesh Info" {
T3(-1.5,1.5,0.5,66574){ "Pure Transfinite" };
T3(0.5,1.5,0.5,66574){ "Extruded Transfinite" };
T3(2.5,1.5,0.5,66574){ "Pure Extruded" };
};
......@@ -25,7 +25,7 @@ generator with built-in pre- and post-processing facilities</h1>
<p>
<h3 align="center">Christophe Geuzaine and Jean-Franois Remacle</h3>
<p>
<h3 align=center>Version 1.62, xx 2006</h3>
<h3 align=center>Version 1.62, January 15 2006</h3>
<p>
<center>
<a href="#Description">Description</a> |
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment