2 Graphics3D-Objekte zusammen mit verschiedenen Farben in einer Grafik darstellen

[Roland K <roland_k76@XXXXXXX.de>]

Hallo,
ich möchte zwei Graphics3D Objecte (Zylinder und
Kugel), die beide mit dem Befehl "InequalityPlot3D"
erstellt wurden zusammen in einer Grafik mit "Show"
darstellen. Das ist prinzipiell auch möglich,
allerdings soll der Zylinder rot und die Kugel blau
eingefärbt werden. Auch das ist für jede Darstellung
alleine möglich. Wenn man aber beide mit dem Befehl
"Show" kombiniert, erhalten beide Körper die
identische Einfärbung. Weiß jemand, wie man den roten
Zylinder und eine blaue Kugel zusammen in einer Grafik
darstellen kann? 

Vielen Dank

Roland Krivachy

P.S. Hier die Befehle in Mathematica4.2:

<< Graphics`InequalityGraphics`
<< Graphics`Graphics3D`
zylinder = InequalityPlot3D[((x - y)^2 + (y - z)^2 +
(z - x)^2 < 1 ), {x, -2, 
            2}, {y, -2, 2}, {z, -2, 2}, AmbientLight
-> RGBColor[1, 0, 0]];
kugel = InequalityPlot3D[ (x^2 + y^2 + z^2 < 1 ), {
      x, -2, 2}, {y, -2, 2}, {z, -2, 2}, AmbientLight
-> RGBColor[0, 0, 1]];
Show[zylinder, kugel];

__________________________________________________________________

Gesendet von Yahoo! Mail - http://mail.yahoo.de
Logos und Klingeltöne fürs Handy bei http://sms.yahoo.de