> restart;

> currentdir("C:/papers/reviews");

> read "polyflake.mpl";

> bm := evalhf(polyflake(3));

bm := _rtable[48930876]

> bmp := PLOT3D(POINTS(bm)):

> bn := n-> plots[display](bmp,scaling=CONSTRAINED,colour=BLACK,orientation=[0,n]);

bn := proc (n) options operator, arrow; plots[displ...

> plots[display]([seq(bn(10*k),k=0..35)],insequence=true);

[Maple Plot]

> bc := n-> plots[display](bmp,scaling=CONSTRAINED,orientation=[n,60]);

bc := proc (n) options operator, arrow; plots[displ...

> plots[display]([seq(bc(10*k),k=0..35)],insequence=true);

[Maple Plot]

>