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

No commit message

No commit message
parent 1d3a6b59
No related branches found
No related tags found
No related merge requests found
......@@ -29,14 +29,15 @@ Plane Surface(2) = {2};
Disk(3) = {0.6, 0.6, 0, 0.5, 0.3};
DefineConstant[
after = {1, Choices{0,1}, Name "Parameters/Extrude after boolean"}
order = {1, Choices{0="Extrude before boolean",1="Boolean before extrude"},
Name "Parameters/Operation order"}
];
If(after)
BooleanFragments{ Surface{1}; Delete; }{ Surface{2:3}; Delete; }
Extrude{0,0,0.3}{ Surface{1:5}; }
Else
If(order == 0)
Extrude{0,0,0.3}{ Surface{1:3}; }
BooleanFragments{ Volume{1}; Delete; }{ Volume{2:3}; Delete; }
Delete{ Surface{1:3}; }
Else
BooleanFragments{ Surface{1}; Delete; }{ Surface{2:3}; Delete; }
Extrude{0,0,0.3}{ Surface{1:5}; }
EndIf
......@@ -29,10 +29,8 @@ Plane Surface(2) = {2};
Disk(3) = {0.6, 0.6, 0, 0.5, 0.3};
DefineConstant[
angle = {90, Min 0, Max 360, Step 1,
angle = {90, Min 1, Max 360, Step 1,
Name "Parameters/Angle"}
];
BooleanFragments{ Surface{1}; Delete; }{ Surface{2:3}; Delete; }
a() = Extrude{ {0,1,0}, {0,0,0}, angle*2*Pi/360 }{ Surface{1:5}; };
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment