>	with(geom3d);

>	PentakisDodecahedron(xxx,point(o,0,0,0),1);

>	p1:=draw(xxx):

>

p1;

>

>