mirror of
https://github.com/NGSolve/netgen.git
synced 2024-11-14 18:08:33 +05:00
20 lines
380 B
GLSL
20 lines
380 B
GLSL
|
#
|
||
|
|
## Cube minus Cylinder
|
||
|
|
#
|
||
|
|
algebraic3d
|
||
|
|
|
||
|
|
solid cube = plane (0, 0, 0; 0, 0, -1)
|
||
|
|
and plane (0, 0, 0; 0, -1, 0)
|
||
|
|
and plane (0, 0, 0; -1, 0, 0)
|
||
|
|
and plane (1, 1, 1; 0, 0, 1)
|
||
|
|
and plane (1, 1, 1; 0, 1, 0)
|
||
|
|
and plane (1, 1, 1; 1, 0, 0);
|
||
|
|
solid sp = sphere (0.5, 0.5, 0; 0.001);
|
||
|
|
|
||
|
|
# cut off small sphere:
|
||
|
|
|
||
|
|
solid main = cube and not sp;
|
||
|
|
|
||
|
|
tlo main;
|
||
|
|
|