GrotzschGraph().mws

>    with(GraphTheory):with(SpecialGraphs):

>    G := GrotzschGraph();

G := `Graph 4: an undirected unweighted graph with 11 vertices and 20 edge(s)`

>    DrawGraph(G);

[Maple Plot]

>    DrawGraph(G,style=spring,dimension=3);

[Maple Plot]

>   

Al Erickson, Mohammad Ghebleh, Simon Lo, Michael Monagan, New Features of the GraphTheory Package

http://www.hamline.edu/~lcopes/SciMathMN/gallery.html