input mp-solid

figureespace(-10u,-10u,10u,10u);
Initialisation(500,30,60,60);
outcolor:=0.5[red,white];
incolor:=1.1*gris;
draw Sparam("(u,v,(u**2+v**2)**2)",-1.25,1.25,0.1,-1.25,1.25,0.1);
finespace;

figureespace(-10u,-10u,10u,10u);
Initialisation(500,70,-10,75);
arcenciel:=true;
incolor:=1.1*gris;
draw Sparam("(v,u,u*(u**2-3*(v**2)))",-1,1,0.05,-1,1,0.05);
finespace;

end