bild1=ParametricPlot3D[{mu,0,0},{mu,-2,0},AxesLabel->{"mu","x","y"},
DisplayFunction->Identity];
bild2=ParametricPlot3D[{mu,Sqrt[mu],0},{mu,0,2},
DisplayFunction->Identity];
bild3=ParametricPlot3D[{mu,-Sqrt[mu],0},{mu,0,2},
DisplayFunction->Identity];
bild4=ParametricPlot3D[{mu,0,Sqrt[mu]},{mu,0,2},
DisplayFunction->Identity];
bild5=ParametricPlot3D[{mu,0,-Sqrt[mu]},{mu,0,2},
DisplayFunction->Identity];
bild6=ParametricPlot3D[{0.5,Sqrt[0.5] Cos[t],Sqrt[0.5] Sin[t]},
{t,0,2 Pi},DisplayFunction->Identity];
bild7=ParametricPlot3D[{1,Sqrt[1] Cos[t],Sqrt[1] Sin[t]},
{t,0,2 Pi},DisplayFunction->Identity];
bild8=ParametricPlot3D[{1.5,Sqrt[1.5] Cos[t],Sqrt[1.5] Sin[t]},
{t,0,2 Pi},DisplayFunction->Identity];
bild9=ParametricPlot3D[{2,Sqrt[2] Cos[t],Sqrt[2] Sin[t]},
{t,0,2 Pi},DisplayFunction->Identity];
abb=Show[bild1,bild2,bild3,bild4,bild5,bild6,bild7,bild8,bild9,
DisplayFunction->$DisplayFunction,ImageSize->{400,300}];