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

fixes

parent 7a1bcc72
No related branches found
No related tags found
No related merge requests found
......@@ -36,7 +36,7 @@ Line Loop(s2b)= {l0, l022b, -l1b, -l011b};
Ruled Surface(s2b)= {s2b};
//Plane Surface(s2b)= {s2b};
Periodic Line {l1b, l011b, l022b} = {l1, l011, l022};
//Periodic Line {l1b, l011b, l022b} = {l1, l011, l022};
// Periodic Surface seems to work properly only with Ruled Surfaces (meshing problem with Plane Surface)
Periodic Surface s2b {Boundary{Surface{s2b};}} = s2 {Boundary{Surface{s2};}};
......@@ -43,11 +43,6 @@ Volume (26) = {1000026};
Physical Volume(1)={26};
Physical Surface(10)={14:24:2};
/*
Periodic Line {1} = {5};
Periodic Line {3} = {7};
Periodic Line {9} = {10};
Periodic Line {12} = {11};
*/
Periodic Line {4} = {2} ;
Periodic Line {4} = {6} ;
Periodic Line {4} = {8} ;
......@@ -59,7 +54,7 @@ Periodic Line {1} = {3} ;
Periodic Line {9} = {10} ;
Periodic Line {9} = {11} ;
Periodic Line {9} = {12} ;
*/
Periodic Surface 24 {1,2,3,4} = 16 {5,6,7,8};
Periodic Surface 14 {10,5,9,1} = 22 {11,-7,12,-3};
Periodic Surface 18 {9,8,12,4} = 20 {10,-6,11,-2};
......
lc = 1.0;
R = 5;
R_rotation = 15;
......@@ -20,13 +19,11 @@ Extrude {0, 0, 1} {
Surface{6};
}
// C'est cette opŽration (d'extrusion autour d'un axe) qui fait planter periodic surface
// le bug Žtant dependant de l'angle d'extrusion specifie
Extrude {{0, 1, 0}, {-R_rotation, 0, 0}, Pi/3} {
Extrude {{0, 1, 0}, {-R_rotation, 0, 0}, Pi/4} {
Surface{6};
}
Periodic Surface 28 {8, 9, 10, 11} = 6 {1, 2, 3, 4} ;
Periodic Surface 50 {30, 31, 32, 33} = 6 {1, 2, 3, 4} ;
Periodic Surface 50 {30, 31, 32, 33} = 6 {1, 2, 3, 4} ;
// Periodic Surface {50} = {6} Rotate { {0, 1, 0}, {-R_rotation, 0, 0}, Pi/3} ;
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment