input mp-solid

outcolor:=0.5[rouge,blanc];
incolor:=0.5[jaune,blanc];

figureespace(-10u,-10u,10u,10u);
Initialisation(500,10,20,50);
subh:=9;
ObjetPrisme1("axe=(0,0.5,1)","h=3")((1,0,0),(2,3,0),(-1,4,0));%ok
AffichageObjet1;
TraceAxes;
finespace;

figureespace(-10u,-10u,10u,10u);
Initialisation(500,10,20,50);
subh:=9;
creux:=true;
ObjetPrisme1("axe=(0,0.5,1)","h=3")((1,0,0),(2,3,0),(-1,4,0));%ok
AffichageObjet1;
TraceAxes;
finespace;

end