Liebe Freundinnen und Freunde von RegionUnion,
In[131]:= $Version
Out[131]= "14.2.1 for Microsoft Windows (64-bit) (March 17, 2025)"
(* die Optionen werden angenommen und anmutig ignoriert, dem
https://reference.wolfram.com/language/ref/RegionUnion.html zum Trotz *)
In[132]:= RegionUnion[Region[Cuboid[]], Region[Cuboid[{1, 1/2, 0}]],
Region[Cuboid[{2, 0, 0}]],
Axes -> True,
AxesLabel -> {x, y, z},
Boxed -> True,
BoxStyle -> Directive[Dashed, Orange]
]
(* ein Extra Region nimmt die Optionen wahr *)
In[135]:= Region[
RegionUnion[Region[Cuboid[]], Region[Cuboid[{1, 1/2, 0}]],
Region[Cuboid[{2, 0, 0}]]],
Axes -> True,
AxesLabel -> {x, y, z},
Boxed -> True,
BoxStyle -> Directive[Dashed, Orange]
]
Frohe Ostern.
Udo.
_______________________________________________
DMUG Deutschsprachiges Mathematica-Forum demug@XXXXXXX.ch
http://www.mathematica.ch/mailman/listinfo/demug
Archiv: http://www.mathematica.ch/archiv.html