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

pp

parent 3cfe8b5b
No related branches found
No related tags found
No related merge requests found
...@@ -18,7 +18,7 @@ If(sph) ...@@ -18,7 +18,7 @@ If(sph)
b() += 3; b() += 3;
EndIf EndIf
r() = BooleanFragments{ Volume{a(0)}; Delete; }{ Volume{b()}; Delete; }; r() = BooleanFragments{ Volume{a()}; Delete; }{ Volume{b()}; Delete; };
Recursive Color SteelBlue { Volume{r()}; } Recursive Color SteelBlue { Volume{r()}; }
......
...@@ -20,9 +20,8 @@ Macro dendrite ...@@ -20,9 +20,8 @@ Macro dendrite
Circle(numc+4) = {nump+5,nump+1,nump+2}; Circle(numc+4) = {nump+5,nump+1,nump+2};
Line Loop(numw+1) = {numc+1:numc+4}; Line Loop(numw+1) = {numc+1:numc+4};
Else // single periodic surface Else // single periodic surface
Disk(numw+1) = {x,y,z, r}; Circle(numw+1) = {x,y,z, r};
Line Loop(numw+1) = Boundary{ Surface{numw+1}; }; Line Loop(numw+1) = numw+1;
Delete { Surface{numw+1}; }
EndIf EndIf
nump += 5; nump += 5;
numc += 4; numc += 4;
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment