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

*** empty log message ***

parent 0a7d6f2e
Branches
Tags
No related merge requests found
Point(1) = {0,0,0,50}; Point(1) = {0,0,0,10};
Point(2) = {1473.175,0,0,50}; Point(2) = {1473.175,0,0,10};
Point(3) = {0,1473.75,0,50}; Point(3) = {0,1473.75,0,10};
Circle (1) = {2,1,3}; Circle (1) = {2,1,3};
Line (2) = {1,2}; Line (2) = {1,2};
...@@ -12,10 +12,10 @@ Line Loop(10) = {1,-3,2}; ...@@ -12,10 +12,10 @@ Line Loop(10) = {1,-3,2};
Function TubeHole Function TubeHole
p1 = newp; Point(p1) = {x,y,0,1}; p1 = newp; Point(p1) = {x,y,0,4};
p2 = newp; Point(p2) = {x+r,y,0,1}; p2 = newp; Point(p2) = {x+r,y,0,4};
p3 = newp; Point(p3) = {x,y+r,0,1}; p3 = newp; Point(p3) = {x,y+r,0,4};
p4 = newp; Point(p4) = {x-0.71*r,y-0.71*r,0,1}; p4 = newp; Point(p4) = {x-0.71*r,y-0.71*r,0,4};
c1 = newreg; Circle(c1) = {p2,p1,p3}; c1 = newreg; Circle(c1) = {p2,p1,p3};
c2 = newreg; Circle(c2) = {p3,p1,p4}; c2 = newreg; Circle(c2) = {p3,p1,p4};
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment