Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- // Gmsh project created on Mon Dec 11 18:31:08 2017
- SetFactory("OpenCASCADE");
- //+
- Point(1) = {5, 5, 0, 1.0};
- //+
- Point(2) = {0, 5, 0, 1.0};
- //+
- Point(3) = {0, 0, 0, 1.0};
- //+
- Point(4) = {5, 0, 0, 1.0};
- //+
- Line(1) = {3, 2};
- //+
- Line(2) = {2, 1};
- //+
- Line(3) = {1, 4};
- //+
- Line(4) = {4, 3};
- //+
- Line Loop(1) = {2, 3, 4, 1};
- //+
- Plane Surface(1) = {1};
- //+
- Extrude {0, 0, 5} {
- Line{1};
- }
- //+
- Extrude {0, 0, 5} {
- Line{2};
- }
- //+
- Extrude {0, 0, 5} {
- Line{4};
- }
- //+
- Circle(14) = {5, 2.5, 2.5, 0.5, 0, 2*Pi};
- //+
- Rotate {{1, 0, 0}, {5, 2.5, 2.5}, Pi/2} {
- Line{14};
- }
- //+
- Rotate {{0, 0, 1}, {5, 2.5, 2.5}, Pi/2} {
- Line{14};
- }
- //+
- Line(16) = {9, 8};
- //+
- Line Loop(6) = {11, 16, -9, 3};
- //+
- Line Loop(7) = {13, 7, 10, -16};
- //+
- Plane Surface(5) = {7};
- //+
- Line Loop(8) = {11, 16, -9, 3};
- //+
- Line Loop(9) = {14};
- //+
- Plane Surface(6) = {8, 9};
- //+
- Translate {20, 0, 0} {
- Duplicata { Surface{4}; Surface{3}; Surface{5}; Surface{2}; Surface{1}; Surface{6}; }
- }
- //+
- Rotate {{0, 0, 1}, {22.5, 2.5, 0}, Pi} {
- Surface{9}; Surface{10}; Surface{11}; Surface{7}; Surface{8}; Surface{12};
- }
- //+
- Extrude {15, 0, 0} {
- Line{14};
- }
- //+
- Surface Loop ( 1 ) = { 1, 2, 3, 5, 4, 6, 13, 12, 11, 7, 10, 8, 9 };
- //+
- Volume ( 1 ) = { 1 };
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement