recursive delete

demos/boolean/extrude.geo

@@ -35,8 +35,8 @@ DefineConstant[
 
 If(order == 0)
   Extrude{0,0,0.3}{ Surface{1:3}; }
-  BooleanFragments{ Volume{1}; Delete; }{ Volume{2:3}; Delete; }
   Delete{ Surface{1:3}; }
+  BooleanFragments{ Volume{1}; Delete; }{ Volume{2:3}; Delete; }
 Else
   BooleanFragments{ Surface{1}; Delete; }{ Surface{2:3}; Delete; }
   Extrude{0,0,0.3}{ Surface{1:5}; }

demos/boolean/fillet.geo

@@ -12,4 +12,4 @@ Fillet{1}{e()}{0.2}
 tmp() = Fillet{1}{1,2,4}{0.05};
 Translate{2,0,0} { Volume{tmp(0)}; }
 
-Delete{ Volume{1}; Surface{f()}; Line{e()}; }
+Recursive Delete{ Volume{1}; }

demos/boolean/fillet2.geo

@@ -10,4 +10,4 @@ e() = Unique(Abs(Boundary{ Surface{f()}; }));
 
 Fillet{a()}{e()}{1}
 
-Delete{ Volume{a()}; Surface{f()}; Line{e()}; }
+Recursive Delete{ Volume{a()}; }