  
  [1X2 [33X[0;0YVisualising orbital graphs[133X[101X
  
  
  [1X2.1 [33X[0;0YVisualing an orbital graph via the DOT format[133X[101X
  
  [1X2.1-1 DotOrbitalGraph[101X
  
  [33X[1;0Y[29X[2XDotOrbitalGraph[102X( [3XD[103X ) [32X attribute[133X
  [6XReturns:[106X  [33X[0;10YA string[133X
  
  [33X[0;0Y[12XWarning:[112X  This  function  requires version 1.4.0 of the Digraphs package, or
  newer.[133X
  
  [33X[0;0YGiven  an  orbital  graph  [3XD[103X, this function returns a string that contains a
  description of [3XD[103X in DOT format.[133X
  
  [33X[0;0YThe  edge  of [3XD[103X corresponding to its [2XBasePair[102X ([14X1.3-1[114X) is coloured red, while
  the remaining edges are coloured black.[133X
  
  [33X[0;0YThe  DOT  string  for  [3XD[103X  can then be compiled and displayed with the [2XSplash[102X
  ([14XDigraphs: Splash[114X) function of the Digraphs package.[133X
  
  [33X[0;0YSee  [7Xhttps://en.wikipedia.org/wiki/DOT_(graph_description_language)[107X for more
  information about this format.[133X
  
  [4X[32X  Example  [32X[104X
    [4X[25Xgap>[125X [27XG := Group([(1,2,3)]);;[127X[104X
    [4X[25Xgap>[125X [27Xo := OrbitalGraphs(G);;[127X[104X
    [4X[25Xgap>[125X [27XPrint(DotOrbitalGraph(o[1]));[127X[104X
    [4X[28X//dot[128X[104X
    [4X[28Xdigraph hgn{[128X[104X
    [4X[28Xnode [shape=circle][128X[104X
    [4X[28X1 [label="1"][128X[104X
    [4X[28X2 [label="2"][128X[104X
    [4X[28X3 [label="3"][128X[104X
    [4X[28X1 -> 2 [color=red][128X[104X
    [4X[28X2 -> 3[128X[104X
    [4X[28X3 -> 1[128X[104X
    [4X[28X}[128X[104X
    [4X[25Xgap>[125X [27XSplash(DotOrbitalGraph(o[1])); # To visualise[127X[104X
  [4X[32X[104X
  
