(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 11.1' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 422812, 11226] NotebookOptionsPosition[ 391524, 10711] NotebookOutlinePosition[ 391944, 10728] CellTagsIndexPosition[ 391901, 10725] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Tree", "Title",ExpressionUUID->"e1a96d90-ee3a-429a-b8f0-e3c0d4a9c0e4"], Cell[CellGroupData[{ Cell["Author", "Subsection",ExpressionUUID->"68779bad-1ca1-4538-96b6-b843dd7b3f79"], Cell["\<\ Eric W. Weisstein January 18, 2024\ \>", "Text",ExpressionUUID->"8e99c188-e41c-47c2-8f71-f7a2253f452c"], Cell[TextData[{ "This notebook downloaded from ", ButtonBox["http://mathworld.wolfram.com/notebooks/GraphTheory/Tree.nb", BaseStyle->"Hyperlink", ButtonData:>{ URL["http://mathworld.wolfram.com/notebooks/GraphTheory/Tree.nb"], None}], "." }], "Text",ExpressionUUID->"9c2f90d4-add9-4dd5-ba4e-e30ea83dd77d"], Cell[TextData[{ "For more information, see Eric's ", StyleBox["MathWorld", FontSlant->"Italic"], " entry ", ButtonBox["http://mathworld.wolfram.com/Tree.html", BaseStyle->"Hyperlink", ButtonData:>{ URL["http://mathworld.wolfram.com/Tree.html"], None}], "." }], "Text",ExpressionUUID->"d61563ff-8b9d-4263-99e2-36fdf4451fc8"], Cell["\<\ \[Copyright]2024 Wolfram Research, Inc. except for portions noted otherwise\ \>", "Text",ExpressionUUID->"95f57cd5-8a6d-4334-b171-43ab87ed0b51"] }, Open ]], Cell[CellGroupData[{ Cell["Counts", "Section",ExpressionUUID->"1a2d7070-4c96-489b-abe4-70ebc55bd44f"], Cell[TextData[ButtonBox["A000055", BaseStyle->"Hyperlink", ButtonData:>{ URL["http://www.research.att.com/projects/OEIS?Anum=A000055"], None}]], "Text",ExpressionUUID->"ce32ca8d-bcc2-4f96-afdd-4bbd07e53f29"], Cell["1, 1, 1, 2, 3, 6, 11, 23, 47, 106, 235, 551, 1301, 3159, \[Ellipsis]", \ "Text",ExpressionUUID->"2cd1c172-6ddf-48e5-977b-05b30f8f2b02"], Cell[BoxData[ RowBox[{"<<", "MathWorld`Graphs`"}]], "Input", CellLabel->"In[3]:=",ExpressionUUID->"17a9e874-4e64-47b8-bb6f-7507dc170873"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Length", "/@", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"KTrees", "[", "1", "]"}], "[", "n", "]"}], ",", RowBox[{"{", RowBox[{"n", ",", "15"}], "}"}]}], "]"}]}], "//", "Timing"}]], "Input", CellLabel->"In[4]:=",ExpressionUUID->"795fd292-732f-4c2c-87e1-3d178b8ec8bb"], Cell[BoxData[ RowBox[{"{", RowBox[{"35.457351`", ",", RowBox[{"{", RowBox[{ "0", ",", "1", ",", "1", ",", "2", ",", "3", ",", "6", ",", "11", ",", "23", ",", "47", ",", "106", ",", "235", ",", "551", ",", "1301", ",", "3159", ",", "7741"}], "}"}]}], "}"}]], "Output", CellLabel->"Out[4]=",ExpressionUUID->"51b823b3-de3e-447d-98f4-196edc0deca4"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"Total", "[", RowBox[{"Boole", "[", RowBox[{"TreeGraphQ", "/@", RowBox[{"ConnectedGraphs", "[", "n", "]"}]}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"n", ",", "10"}], "}"}]}], "]"}], "//", "Timing"}]], "Input", CellChangeTimes->{{3.703620561441259*^9, 3.7036205994432044`*^9}, { 3.7036206373045177`*^9, 3.703620653930369*^9}, {3.703620823299224*^9, 3.7036208237240453`*^9}, {3.703653764735097*^9, 3.703653769853458*^9}, { 3.7036606486912146`*^9, 3.703660664020125*^9}, {3.7036611111934075`*^9, 3.7036611184524755`*^9}, {3.703682006721347*^9, 3.7036820073776307`*^9}, { 3.7036960937895517`*^9, 3.703696095461234*^9}, {3.703696252169487*^9, 3.7036962538257265`*^9}, {3.7036975047407007`*^9, 3.703697547742902*^9}, 3.703697795786851*^9, {3.7036978711500845`*^9, 3.703697871368846*^9}, { 3.703698265403718*^9, 3.7036982692007875`*^9}, {3.7037156993620224`*^9, 3.703715706567377*^9}, {3.703715744862793*^9, 3.7037157451821413`*^9}, { 3.703840666752147*^9, 3.7038406673146763`*^9}, {3.703863777666741*^9, 3.7038637805262623`*^9}, 3.70386858670994*^9, {3.7038712878403835`*^9, 3.703871288092346*^9}}, CellLabel->"",ExpressionUUID->"73b3dccc-0b23-4b15-922f-5dab58842607"], Cell[BoxData[ RowBox[{"{", RowBox[{"12.876042`", ",", RowBox[{"{", RowBox[{ "1", ",", "1", ",", "1", ",", "2", ",", "3", ",", "6", ",", "11", ",", "23", ",", "47", ",", "106"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.7038685882998447`*^9, 3.70388743427483*^9},ExpressionUUID->"8581491b-0cc8-42d9-88d2-5feb13b57275"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"Total", "[", RowBox[{"Boole", "[", RowBox[{"TreeGraphQ", "/@", RowBox[{"Graphs", "[", "n", "]"}]}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"n", ",", "10"}], "}"}]}], "]"}], "//", "Timing"}]], "Input", CellChangeTimes->{ 3.703868594122334*^9, {3.703871290557285*^9, 3.7038712909235096`*^9}},ExpressionUUID->"98174bb3-7098-4c24-85ae-\ 691511b218bf"], Cell[BoxData[ RowBox[{"{", RowBox[{"12.95803`", ",", RowBox[{"{", RowBox[{ "1", ",", "1", ",", "1", ",", "2", ",", "3", ",", "6", ",", "11", ",", "23", ",", "47", ",", "106"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.7038685951887813`*^9, 3.7038874474005013`*^9},ExpressionUUID->"5deb8dd1-e288-4659-8af4-\ d7122a1eb70f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"Total", "[", RowBox[{"Boole", "[", RowBox[{"TreeGraphQ", "/@", RowBox[{"Trees", "[", "n", "]"}]}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"n", ",", "15"}], "}"}]}], "]"}], "//", "Timing"}]], "Input", CellChangeTimes->{{3.7038686039518127`*^9, 3.703868606517341*^9}},ExpressionUUID->"44e53424-86ed-4de4-8920-\ 61e400f078e9"], Cell[BoxData[ RowBox[{"{", RowBox[{"0.042994`", ",", RowBox[{"{", RowBox[{ "1", ",", "1", ",", "1", ",", "2", ",", "3", ",", "6", ",", "11", ",", "23", ",", "47", ",", "106", ",", "235", ",", "551", ",", "1301", ",", "3159", ",", "7741"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{ 3.7038686068904023`*^9},ExpressionUUID->"445ec921-eada-47f3-b380-\ 8b84de4105da"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Table", "[", RowBox[{ RowBox[{"Length", "@", RowBox[{"GraphData", "[", RowBox[{"\"\\"", ",", "n"}], "]"}]}], ",", RowBox[{"{", RowBox[{"n", ",", "12"}], "}"}]}], "]"}]], "Input", CellLabel->"In[8]:=",ExpressionUUID->"a2a1a7fa-838a-44a6-9723-c0979e54d939"], Cell[BoxData[ RowBox[{"{", RowBox[{ "1", ",", "1", ",", "1", ",", "2", ",", "3", ",", "6", ",", "11", ",", "23", ",", "47", ",", "106", ",", "235", ",", "551"}], "}"}]], "Output", CellLabel->"Out[8]=",ExpressionUUID->"526beefb-9e09-46a0-abba-272f35aa4867"] }, Open ]], Cell[CellGroupData[{ Cell["Trees = Acyclic Connected Graphs", "Subsection",ExpressionUUID->"edc1c3d9-eb4c-411f-afad-3a93bc0d8900"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Function", "[", RowBox[{"f", ",", RowBox[{"Count", "[", RowBox[{"f", ",", RowBox[{"_", "?", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"ConnectedQ", "[", "#", "]"}], "&&", RowBox[{"AcyclicQ", "[", "#", "]"}]}], "&"}], ")"}]}]}], "]"}]}], "]"}], "/@", RowBox[{"Graphs", "/@", RowBox[{"Range", "[", "9", "]"}]}]}], "//", "Timing"}]], "Input",Expressio\ nUUID->"178867e0-2dc1-4ac3-85d5-f16b7dd09dbe"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"795.804688`", " ", "Second"}], ",", RowBox[{"{", RowBox[{ "1", ",", "1", ",", "1", ",", "2", ",", "3", ",", "6", ",", "11", ",", "23", ",", "47"}], "}"}]}], "}"}]], "Output",ExpressionUUID->"a343030b-\ 4243-4ad2-b9dd-63d381ed6b81"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Trees = connected graphs on ", Cell[BoxData[ FormBox["n", TraditionalForm]],ExpressionUUID-> "458c0d21-771b-4ce9-a681-6ebeadd4365d"], " nodes with ", Cell[BoxData[ FormBox[ RowBox[{"n", "-", "1"}], TraditionalForm]],ExpressionUUID-> "2d76a99b-028a-41a7-85be-418a2954dcca"], " edges" }], "Subsection",ExpressionUUID->"d952abee-fae4-4009-91b3-b8a137d9cc4d"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"Count", "[", RowBox[{ RowBox[{"Graphs", "[", "n", "]"}], ",", RowBox[{"_", "?", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{ RowBox[{"M", "[", "#", "]"}], "\[Equal]", RowBox[{"n", "-", "1"}]}], "&&", RowBox[{"ConnectedQ", "[", "#", "]"}]}], "&"}], ")"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"n", ",", "9"}], "}"}]}], "]"}], "//", "Timing"}]], "Input",Expre\ ssionUUID->"08b302e7-c7ca-42a9-876a-a935fe1f6a61"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"110.888672`", " ", "Second"}], ",", RowBox[{"{", RowBox[{ "1", ",", "1", ",", "1", ",", "2", ",", "3", ",", "6", ",", "11", ",", "23", ",", "47"}], "}"}]}], "}"}]], "Output",ExpressionUUID->"11c6c379-\ f3ab-4660-846d-48ac26872d11"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Graphics", "Section",ExpressionUUID->"fb78f0d7-831d-4187-af26-b6221ae0cda1"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"GraphicsGrid", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"Trees", "[", "n", "]"}], "/.", RowBox[{"g_System`Graph", ":>", RowBox[{"SetProperty", "[", RowBox[{"g", ",", RowBox[{"{", RowBox[{ RowBox[{"VertexSize", "\[Rule]", RowBox[{"If", "[", RowBox[{ RowBox[{"n", "\[Equal]", "1"}], ",", ".02", ",", RowBox[{"{", RowBox[{"\"\\"", ",", ".1"}], "}"}]}], "]"}]}], ",", RowBox[{"System`VertexStyle", "\[Rule]", "Red"}], ",", RowBox[{"System`EdgeStyle", "\[Rule]", "Black"}]}], "}"}]}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"n", ",", "6"}], "}"}]}], "]"}], ",", RowBox[{"Dividers", "\[Rule]", "All"}]}], "]"}]], "Input",ExpressionUUID->\ "95a6a572-2492-441e-97ab-a786b87f7f80"], Cell[BoxData[ GraphicsBox[{{}, {{InsetBox[ FormBox[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1}, {}, {EdgeStyle -> { GrayLevel[0]}, VertexSize -> {0.02}, VertexStyle -> { RGBColor[1, 0, 0]}, VertexCoordinates -> {{0, 0}}}]]}, TagBox[GraphicsGroupBox[GraphicsComplexBox[{{0., 0.}}, {{}, {RGBColor[1, 0, 0], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.01]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None, PlotRangePadding->0.1], TraditionalForm], {195.42857142857142, -195.42857142857142}, { Center, Center}, {359.99999999999994, 359.99999999999994}], TagBox[ InsetBox["", {586.2857142857142, -195.42857142857142}, { Center, Center}, {359.99999999999994, 359.99999999999994}], "InsetString"], TagBox[ InsetBox["", {977.1428571428571, -195.42857142857142}, { Center, Center}, {360., 359.99999999999994}], "InsetString"], TagBox[InsetBox["", {1368., -195.42857142857142}, {Center, Center}, {360.0000000000002, 359.99999999999994}], "InsetString"], TagBox[ InsetBox["", {1758.8571428571427, -195.42857142857142}, { Center, Center}, {360.0000000000002, 359.99999999999994}], "InsetString"], TagBox[ InsetBox["", {2149.7142857142853, -195.42857142857142}, { Center, Center}, {359.9999999999998, 359.99999999999994}], "InsetString"]}, {InsetBox[ FormBox[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2}, {Null, SparseArray[ Automatic, {2, 2}, 0, {1, {{0, 1, 2}, {{2}, {1}}}, Pattern}]}, { EdgeStyle -> { GrayLevel[0]}, VertexSize -> {{"Scaled", 0.1}}, VertexStyle -> { RGBColor[1, 0, 0]}}]]}, TagBox[GraphicsGroupBox[GraphicsComplexBox[{{1., 0.}, {-1., 0.}}, { {GrayLevel[0], Opacity[0.7], {Arrowheads[0.], ArrowBox[{1, 2}, 0.1]}}, {RGBColor[1, 0, 0], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.1], DiskBox[2, 0.1]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None], TraditionalForm], {195.42857142857142, -586.2857142857142}, { Center, Center}, {359.99999999999994, 359.99999999999994}], TagBox[ InsetBox["", {586.2857142857142, -586.2857142857142}, { Center, Center}, {359.99999999999994, 359.99999999999994}], "InsetString"], TagBox[ InsetBox["", {977.1428571428571, -586.2857142857142}, { Center, Center}, {360., 359.99999999999994}], "InsetString"], TagBox[InsetBox["", {1368., -586.2857142857142}, {Center, Center}, {360.0000000000002, 359.99999999999994}], "InsetString"], TagBox[ InsetBox["", {1758.8571428571427, -586.2857142857142}, { Center, Center}, {360.0000000000002, 359.99999999999994}], "InsetString"], TagBox[ InsetBox["", {2149.7142857142853, -586.2857142857142}, { Center, Center}, {359.9999999999998, 359.99999999999994}], "InsetString"]}, {InsetBox[ FormBox[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3}, {Null, SparseArray[ Automatic, {3, 3}, 0, { 1, {{0, 1, 2, 4}, {{3}, {3}, {1}, {2}}}, Pattern}]}, {EdgeStyle -> { GrayLevel[0]}, VertexSize -> {{"Scaled", 0.1}}, VertexStyle -> { RGBColor[1, 0, 0]}}]]}, TagBox[GraphicsGroupBox[ GraphicsComplexBox[{{0., 3.6739403974420594`*^-16}, {2., 0.}, {1., 2.4492935982947064`*^-16}}, { {GrayLevel[0], Opacity[0.7], {Arrowheads[0.], ArrowBox[{1, 3}, 0.1]}, {Arrowheads[0.], ArrowBox[{2, 3}, 0.1]}}, {RGBColor[1, 0, 0], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.1], DiskBox[2, 0.1], DiskBox[3, 0.1]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None], TraditionalForm], {195.42857142857142, -977.1428571428571}, { Center, Center}, {359.99999999999994, 360.}], TagBox[ InsetBox["", {586.2857142857142, -977.1428571428571}, { Center, Center}, {359.99999999999994, 360.}], "InsetString"], TagBox[ InsetBox["", {977.1428571428571, -977.1428571428571}, { Center, Center}, {360., 360.}], "InsetString"], TagBox[InsetBox["", {1368., -977.1428571428571}, {Center, Center}, {360.0000000000002, 360.}], "InsetString"], TagBox[ InsetBox["", {1758.8571428571427, -977.1428571428571}, { Center, Center}, {360.0000000000002, 360.}], "InsetString"], TagBox[ InsetBox["", {2149.7142857142853, -977.1428571428571}, { Center, Center}, {359.9999999999998, 360.}], "InsetString"]}, {InsetBox[ FormBox[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4}, {Null, SparseArray[ Automatic, {4, 4}, 0, { 1, {{0, 1, 2, 3, 6}, {{4}, {4}, {4}, {1}, {2}, {3}}}, Pattern}]}, {EdgeStyle -> { GrayLevel[0]}, VertexSize -> {{"Scaled", 0.1}}, VertexStyle -> { RGBColor[1, 0, 0]}}]]}, TagBox[GraphicsGroupBox[ GraphicsComplexBox[{{0., 0.}, {0.7745966692414834, 0.}, { 1.5491933384829668`, 0.}, {0.7745966692414834, 0.7745966692414834}}, { {GrayLevel[0], Opacity[0.7], {Arrowheads[0.], ArrowBox[{1, 4}, 0.08660254037844388]}, {Arrowheads[0.], ArrowBox[{2, 4}, 0.08660254037844388]}, {Arrowheads[0.], ArrowBox[{3, 4}, 0.08660254037844388]}}, {RGBColor[1, 0, 0], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.08660254037844388], DiskBox[2, 0.08660254037844388], DiskBox[3, 0.08660254037844388], DiskBox[4, 0.08660254037844388]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None], TraditionalForm], {195.42857142857142, -1368.}, { Center, Center}, {359.99999999999994, 360.0000000000002}], InsetBox[ FormBox[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4}, {Null, SparseArray[ Automatic, {4, 4}, 0, { 1, {{0, 2, 3, 4, 6}, {{3}, {4}, {4}, {1}, {1}, {2}}}, Pattern}]}, {EdgeStyle -> { GrayLevel[0]}, VertexSize -> {{"Scaled", 0.1}}, VertexStyle -> { RGBColor[1, 0, 0]}}]]}, TagBox[GraphicsGroupBox[ GraphicsComplexBox[{{1., 3.6739403974420594`*^-16}, {3., 0.}, {0., 4.898587196589413*^-16}, {2., 2.4492935982947064`*^-16}}, { {GrayLevel[0], Opacity[0.7], {Arrowheads[0.], ArrowBox[{1, 3}, 0.15000000000000002`]}, {Arrowheads[0.], ArrowBox[{1, 4}, 0.15000000000000002`]}, {Arrowheads[0.], ArrowBox[{2, 4}, 0.15000000000000002`]}}, {RGBColor[1, 0, 0], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.15000000000000002], DiskBox[2, 0.15000000000000002], DiskBox[3, 0.15000000000000002], DiskBox[4, 0.15000000000000002]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None], TraditionalForm], {586.2857142857142, -1368.}, { Center, Center}, {359.99999999999994, 360.0000000000002}], TagBox[InsetBox["", {977.1428571428571, -1368.}, {Center, Center}, {360., 360.0000000000002}], "InsetString"], TagBox[InsetBox["", {1368., -1368.}, {Center, Center}, {360.0000000000002, 360.0000000000002}], "InsetString"], TagBox[InsetBox["", {1758.8571428571427, -1368.}, {Center, Center}, {360.0000000000002, 360.0000000000002}], "InsetString"], TagBox[InsetBox["", {2149.7142857142853, -1368.}, {Center, Center}, {359.9999999999998, 360.0000000000002}], "InsetString"]}, {InsetBox[ FormBox[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4, 5}, {Null, SparseArray[ Automatic, {5, 5}, 0, { 1, {{0, 1, 2, 3, 4, 8}, {{5}, {5}, {5}, {5}, {1}, {2}, {3}, { 4}}}, Pattern}]}, {EdgeStyle -> { GrayLevel[0]}, VertexSize -> {{"Scaled", 0.1}}, VertexStyle -> { RGBColor[1, 0, 0]}}]]}, TagBox[GraphicsGroupBox[ GraphicsComplexBox[{{0., 0.}, {0.6666666666666666, 0.}, { 1.3333333333333333`, 0.}, {2., 0.}, {1., 0.6666666666666666}}, { {GrayLevel[0], Opacity[0.7], {Arrowheads[0.], ArrowBox[{1, 5}, 0.10540925533894599`]}, {Arrowheads[0.], ArrowBox[{2, 5}, 0.10540925533894599`]}, {Arrowheads[0.], ArrowBox[{3, 5}, 0.10540925533894599`]}, {Arrowheads[0.], ArrowBox[{4, 5}, 0.10540925533894599`]}}, {RGBColor[1, 0, 0], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.10540925533894599], DiskBox[2, 0.10540925533894599], DiskBox[3, 0.10540925533894599], DiskBox[4, 0.10540925533894599], DiskBox[5, 0.10540925533894599]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None], TraditionalForm], {195.42857142857142, -1758.8571428571427}, { Center, Center}, {359.99999999999994, 360.0000000000002}], InsetBox[ FormBox[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4, 5}, {Null, SparseArray[ Automatic, {5, 5}, 0, { 1, {{0, 2, 3, 4, 5, 8}, {{4}, {5}, {5}, {5}, {1}, {1}, {2}, { 3}}}, Pattern}]}, {EdgeStyle -> { GrayLevel[0]}, VertexSize -> {{"Scaled", 0.1}}, VertexStyle -> { RGBColor[1, 0, 0]}}]]}, TagBox[GraphicsGroupBox[ GraphicsComplexBox[{{0., 0.8164965809277261}, {0.8164965809277261, 0.8164965809277261}, {1.6329931618554523`, 0.8164965809277261}, {0., 0.}, {0.8164965809277261, 1.6329931618554523`}}, { {GrayLevel[0], Opacity[0.7], {Arrowheads[0.], ArrowBox[{1, 4}, 0.11547005383792518`]}, {Arrowheads[0.], ArrowBox[{1, 5}, 0.11547005383792518`]}, {Arrowheads[0.], ArrowBox[{2, 5}, 0.11547005383792518`]}, {Arrowheads[0.], ArrowBox[{3, 5}, 0.11547005383792518`]}}, {RGBColor[1, 0, 0], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.11547005383792518], DiskBox[2, 0.11547005383792518], DiskBox[3, 0.11547005383792518], DiskBox[4, 0.11547005383792518], DiskBox[5, 0.11547005383792518]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None], TraditionalForm], {586.2857142857142, -1758.8571428571427}, { Center, Center}, {359.99999999999994, 360.0000000000002}], InsetBox[ FormBox[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4, 5}, {Null, SparseArray[ Automatic, {5, 5}, 0, { 1, {{0, 2, 4, 5, 6, 8}, {{3}, {5}, {4}, {5}, {1}, {2}, {1}, { 2}}}, Pattern}]}, {EdgeStyle -> { GrayLevel[0]}, VertexSize -> {{"Scaled", 0.1}}, VertexStyle -> { RGBColor[1, 0, 0]}}]]}, TagBox[GraphicsGroupBox[ GraphicsComplexBox[{{1., 6.123233995736766*^-16}, {3., 2.4492935982947064`*^-16}, {0., 7.347880794884119*^-16}, {4., 0.}, {2., 4.898587196589413*^-16}}, { {GrayLevel[0], Opacity[0.7], {Arrowheads[0.], ArrowBox[{1, 3}, 0.2]}, {Arrowheads[0.], ArrowBox[{1, 5}, 0.2]}, {Arrowheads[0.], ArrowBox[{2, 4}, 0.2]}, {Arrowheads[0.], ArrowBox[{2, 5}, 0.2]}}, {RGBColor[1, 0, 0], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.2], DiskBox[2, 0.2], DiskBox[3, 0.2], DiskBox[4, 0.2], DiskBox[5, 0.2]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None], TraditionalForm], {977.1428571428571, -1758.8571428571427}, { Center, Center}, {360., 360.0000000000002}], TagBox[InsetBox["", {1368., -1758.8571428571427}, {Center, Center}, {360.0000000000002, 360.0000000000002}], "InsetString"], TagBox[ InsetBox["", {1758.8571428571427, -1758.8571428571427}, { Center, Center}, {360.0000000000002, 360.0000000000002}], "InsetString"], TagBox[ InsetBox["", {2149.7142857142853, -1758.8571428571427}, { Center, Center}, {359.9999999999998, 360.0000000000002}], "InsetString"]}, {InsetBox[ FormBox[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4, 5, 6}, {Null, SparseArray[ Automatic, {6, 6}, 0, { 1, {{0, 1, 2, 3, 4, 5, 10}, {{6}, {6}, {6}, {6}, {6}, {1}, { 2}, {3}, {4}, {5}}}, Pattern}]}, {EdgeStyle -> { GrayLevel[0]}, VertexSize -> {{"Scaled", 0.1}}, VertexStyle -> { RGBColor[1, 0, 0]}}]]}, TagBox[GraphicsGroupBox[ GraphicsComplexBox[{{0., 0.}, {0.5773502691896258, 0.}, { 1.1547005383792517`, 0.}, {1.7320508075688774`, 0.}, { 2.3094010767585034`, 0.}, {1.1547005383792517`, 0.5773502691896258}}, { {GrayLevel[0], Opacity[0.7], {Arrowheads[0.], ArrowBox[{1, 6}, 0.11902380714238087`]}, {Arrowheads[0.], ArrowBox[{2, 6}, 0.11902380714238087`]}, {Arrowheads[0.], ArrowBox[{3, 6}, 0.11902380714238087`]}, {Arrowheads[0.], ArrowBox[{4, 6}, 0.11902380714238087`]}, {Arrowheads[0.], ArrowBox[{5, 6}, 0.11902380714238087`]}}, {RGBColor[1, 0, 0], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.11902380714238087], DiskBox[2, 0.11902380714238087], DiskBox[3, 0.11902380714238087], DiskBox[4, 0.11902380714238087], DiskBox[5, 0.11902380714238087], DiskBox[6, 0.11902380714238087]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None], TraditionalForm], {195.42857142857142, -2149.7142857142853}, { Center, Center}, {359.99999999999994, 359.9999999999998}], InsetBox[ FormBox[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4, 5, 6}, {Null, SparseArray[ Automatic, {6, 6}, 0, { 1, {{0, 2, 3, 4, 5, 6, 10}, {{5}, {6}, {6}, {6}, {6}, {1}, { 1}, {2}, {3}, {4}}}, Pattern}]}, {EdgeStyle -> { GrayLevel[0]}, VertexSize -> {{"Scaled", 0.1}}, VertexStyle -> { RGBColor[1, 0, 0]}}]]}, TagBox[GraphicsGroupBox[ GraphicsComplexBox[{{0., 0.7071067811865475}, {0.7071067811865475, 0.7071067811865475}, {1.414213562373095, 0.7071067811865475}, { 2.1213203435596424`, 0.7071067811865475}, {0., 0.}, { 1.0606601717798212`, 1.414213562373095}}, { {GrayLevel[0], Opacity[0.7], {Arrowheads[0.], ArrowBox[{1, 5}, 0.12747548783981963`]}, {Arrowheads[0.], ArrowBox[{1, 6}, 0.12747548783981963`]}, {Arrowheads[0.], ArrowBox[{2, 6}, 0.12747548783981963`]}, {Arrowheads[0.], ArrowBox[{3, 6}, 0.12747548783981963`]}, {Arrowheads[0.], ArrowBox[{4, 6}, 0.12747548783981963`]}}, {RGBColor[1, 0, 0], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.12747548783981963], DiskBox[2, 0.12747548783981963], DiskBox[3, 0.12747548783981963], DiskBox[4, 0.12747548783981963], DiskBox[5, 0.12747548783981963], DiskBox[6, 0.12747548783981963]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None], TraditionalForm], {586.2857142857142, -2149.7142857142853}, { Center, Center}, {359.99999999999994, 359.9999999999998}], InsetBox[ FormBox[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4, 5, 6}, {Null, SparseArray[ Automatic, {6, 6}, 0, { 1, {{0, 2, 3, 4, 5, 7, 10}, {{5}, {6}, {5}, {6}, {6}, {1}, { 2}, {1}, {3}, {4}}}, Pattern}]}, {EdgeStyle -> { GrayLevel[0]}, VertexSize -> {{"Scaled", 0.1}}, VertexStyle -> { RGBColor[1, 0, 0]}}]]}, TagBox[GraphicsGroupBox[ GraphicsComplexBox[{{0.6515583641446041, 1.7374889710522776`}, { 0., 0.}, {0.8687444855261388, 0.}, {1.7374889710522776`, 0.}, { 0., 0.8687444855261388}, {1.3031167282892082`, 0.8687444855261388}}, { {GrayLevel[0], Opacity[0.7], {Arrowheads[0.], ArrowBox[{1, 5}, 0.12285902336679025`]}, {Arrowheads[0.], ArrowBox[{1, 6}, 0.12285902336679025`]}, {Arrowheads[0.], ArrowBox[{2, 5}, 0.12285902336679025`]}, {Arrowheads[0.], ArrowBox[{3, 6}, 0.12285902336679025`]}, {Arrowheads[0.], ArrowBox[{4, 6}, 0.12285902336679025`]}}, {RGBColor[1, 0, 0], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.12285902336679025], DiskBox[2, 0.12285902336679025], DiskBox[3, 0.12285902336679025], DiskBox[4, 0.12285902336679025], DiskBox[5, 0.12285902336679025], DiskBox[6, 0.12285902336679025]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None], TraditionalForm], {977.1428571428571, -2149.7142857142853}, { Center, Center}, {360., 359.9999999999998}], InsetBox[ FormBox[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4, 5, 6}, {Null, SparseArray[ Automatic, {6, 6}, 0, { 1, {{0, 1, 2, 3, 4, 7, 10}, {{5}, {5}, {6}, {6}, {1}, {2}, { 6}, {3}, {4}, {5}}}, Pattern}]}, {EdgeStyle -> { GrayLevel[0]}, VertexSize -> {{"Scaled", 0.1}}, VertexStyle -> { RGBColor[1, 0, 0]}}]]}, TagBox[GraphicsGroupBox[ GraphicsComplexBox[{{0., 0.8164965809277261}, {0.8164965809277261, 0.8164965809277261}, {1.2247448713915892`, 0.}, { 2.041241452319315, 0.}, {0.8164965809277261, 1.6329931618554523`}, {1.6329931618554523`, 0.8164965809277261}}, { {GrayLevel[0], Opacity[0.7], {Arrowheads[0.], ArrowBox[{1, 5}, 0.13070322617798436`]}, {Arrowheads[0.], ArrowBox[{2, 5}, 0.13070322617798436`]}, {Arrowheads[0.], ArrowBox[{3, 6}, 0.13070322617798436`]}, {Arrowheads[0.], ArrowBox[{4, 6}, 0.13070322617798436`]}, {Arrowheads[0.], ArrowBox[{5, 6}, 0.13070322617798436`]}}, {RGBColor[1, 0, 0], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.13070322617798436], DiskBox[2, 0.13070322617798436], DiskBox[3, 0.13070322617798436], DiskBox[4, 0.13070322617798436], DiskBox[5, 0.13070322617798436], DiskBox[6, 0.13070322617798436]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None], TraditionalForm], {1368., -2149.7142857142853}, { Center, Center}, {360.0000000000002, 359.9999999999998}], InsetBox[ FormBox[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4, 5, 6}, {Null, SparseArray[ Automatic, {6, 6}, 0, { 1, {{0, 2, 4, 5, 6, 7, 10}, {{4}, {6}, {5}, {6}, {6}, {1}, { 2}, {1}, {2}, {3}}}, Pattern}]}, {EdgeStyle -> { GrayLevel[0]}, VertexSize -> {{"Scaled", 0.1}}, VertexStyle -> { RGBColor[1, 0, 0]}}]]}, TagBox[GraphicsGroupBox[ GraphicsComplexBox[{{0., 0.8451542547285166}, {0.8451542547285166, 0.8451542547285166}, {1.6903085094570331`, 0.8451542547285166}, {0., 0.}, {0.8451542547285166, 0.}, { 0.8451542547285166, 1.6903085094570331`}}, { {GrayLevel[0], Opacity[0.7], {Arrowheads[0.], ArrowBox[{1, 4}, 0.11952286093343936`]}, {Arrowheads[0.], ArrowBox[{1, 6}, 0.11952286093343936`]}, {Arrowheads[0.], ArrowBox[{2, 5}, 0.11952286093343936`]}, {Arrowheads[0.], ArrowBox[{2, 6}, 0.11952286093343936`]}, {Arrowheads[0.], ArrowBox[{3, 6}, 0.11952286093343936`]}}, {RGBColor[1, 0, 0], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.11952286093343936], DiskBox[2, 0.11952286093343936], DiskBox[3, 0.11952286093343936], DiskBox[4, 0.11952286093343936], DiskBox[5, 0.11952286093343936], DiskBox[6, 0.11952286093343936]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None], TraditionalForm], {1758.8571428571427, -2149.7142857142853}, { Center, Center}, {360.0000000000002, 359.9999999999998}], InsetBox[ FormBox[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4, 5, 6}, {Null, SparseArray[ Automatic, {6, 6}, 0, { 1, {{0, 2, 4, 5, 6, 8, 10}, {{4}, {6}, {5}, {6}, {5}, {1}, { 2}, {3}, {1}, {2}}}, Pattern}]}, {EdgeStyle -> { GrayLevel[0]}, VertexSize -> {{"Scaled", 0.1}}, VertexStyle -> { RGBColor[1, 0, 0]}}]]}, TagBox[GraphicsGroupBox[ GraphicsComplexBox[{{4., 2.449293598294706*^-16}, {2., 7.347880794884119*^-16}, {0., 9.797174393178826*^-16}, {5., 0.}, {1., 8.572527594031472*^-16}, {3., 4.898587196589412*^-16}}, { {GrayLevel[0], Opacity[0.7], {Arrowheads[0.], ArrowBox[{1, 4}, 0.25]}, {Arrowheads[0.], ArrowBox[{1, 6}, 0.25]}, {Arrowheads[0.], ArrowBox[{2, 5}, 0.25]}, {Arrowheads[0.], ArrowBox[{2, 6}, 0.25]}, {Arrowheads[0.], ArrowBox[{3, 5}, 0.25]}}, {RGBColor[1, 0, 0], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.25], DiskBox[2, 0.25], DiskBox[3, 0.25], DiskBox[4, 0.25], DiskBox[5, 0.25], DiskBox[6, 0.25]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None], TraditionalForm], {2149.7142857142853, -2149.7142857142853}, { Center, Center}, {359.9999999999998, 359.9999999999998}]}}, StyleBox[{{}, {LineBox[{{0, 0}, {0, -390.85714285714283`}}], LineBox[{{0, -390.85714285714283`}, {0, -781.7142857142857}}], LineBox[{{0, -781.7142857142857}, {0, -1172.5714285714284`}}], LineBox[{{0, -1172.5714285714284`}, {0, -1563.4285714285713`}}], LineBox[{{0, -1563.4285714285713`}, {0, -1954.2857142857142`}}], LineBox[{{0, -1954.2857142857142`}, {0, -2345.142857142857}}], LineBox[{{390.85714285714283`, 0}, { 390.85714285714283`, -390.85714285714283`}}], LineBox[{{390.85714285714283`, -390.85714285714283`}, { 390.85714285714283`, -781.7142857142857}}], LineBox[{{390.85714285714283`, -781.7142857142857}, { 390.85714285714283`, -1172.5714285714284`}}], LineBox[{{390.85714285714283`, -1172.5714285714284`}, { 390.85714285714283`, -1563.4285714285713`}}], LineBox[{{390.85714285714283`, -1563.4285714285713`}, { 390.85714285714283`, -1954.2857142857142`}}], LineBox[{{390.85714285714283`, -1954.2857142857142`}, { 390.85714285714283`, -2345.142857142857}}], LineBox[{{781.7142857142857, 0}, { 781.7142857142857, -390.85714285714283`}}], LineBox[{{781.7142857142857, -390.85714285714283`}, { 781.7142857142857, -781.7142857142857}}], LineBox[{{781.7142857142857, -781.7142857142857}, { 781.7142857142857, -1172.5714285714284`}}], LineBox[{{781.7142857142857, -1172.5714285714284`}, { 781.7142857142857, -1563.4285714285713`}}], LineBox[{{781.7142857142857, -1563.4285714285713`}, { 781.7142857142857, -1954.2857142857142`}}], LineBox[{{781.7142857142857, -1954.2857142857142`}, { 781.7142857142857, -2345.142857142857}}], LineBox[{{1172.5714285714284`, 0}, { 1172.5714285714284`, -390.85714285714283`}}], LineBox[{{1172.5714285714284`, -390.85714285714283`}, { 1172.5714285714284`, -781.7142857142857}}], LineBox[{{1172.5714285714284`, -781.7142857142857}, { 1172.5714285714284`, -1172.5714285714284`}}], LineBox[{{1172.5714285714284`, -1172.5714285714284`}, { 1172.5714285714284`, -1563.4285714285713`}}], LineBox[{{1172.5714285714284`, -1563.4285714285713`}, { 1172.5714285714284`, -1954.2857142857142`}}], LineBox[{{1172.5714285714284`, -1954.2857142857142`}, { 1172.5714285714284`, -2345.142857142857}}], LineBox[{{1563.4285714285713`, 0}, { 1563.4285714285713`, -390.85714285714283`}}], LineBox[{{1563.4285714285713`, -390.85714285714283`}, { 1563.4285714285713`, -781.7142857142857}}], LineBox[{{1563.4285714285713`, -781.7142857142857}, { 1563.4285714285713`, -1172.5714285714284`}}], LineBox[{{1563.4285714285713`, -1172.5714285714284`}, { 1563.4285714285713`, -1563.4285714285713`}}], LineBox[{{1563.4285714285713`, -1563.4285714285713`}, { 1563.4285714285713`, -1954.2857142857142`}}], LineBox[{{1563.4285714285713`, -1954.2857142857142`}, { 1563.4285714285713`, -2345.142857142857}}], LineBox[{{1954.2857142857142`, 0}, { 1954.2857142857142`, -390.85714285714283`}}], LineBox[{{1954.2857142857142`, -390.85714285714283`}, { 1954.2857142857142`, -781.7142857142857}}], LineBox[{{1954.2857142857142`, -781.7142857142857}, { 1954.2857142857142`, -1172.5714285714284`}}], LineBox[{{1954.2857142857142`, -1172.5714285714284`}, { 1954.2857142857142`, -1563.4285714285713`}}], LineBox[{{1954.2857142857142`, -1563.4285714285713`}, { 1954.2857142857142`, -1954.2857142857142`}}], LineBox[{{1954.2857142857142`, -1954.2857142857142`}, { 1954.2857142857142`, -2345.142857142857}}], LineBox[{{2345.142857142857, 0}, { 2345.142857142857, -390.85714285714283`}}], LineBox[{{2345.142857142857, -390.85714285714283`}, { 2345.142857142857, -781.7142857142857}}], LineBox[{{2345.142857142857, -781.7142857142857}, { 2345.142857142857, -1172.5714285714284`}}], LineBox[{{2345.142857142857, -1172.5714285714284`}, { 2345.142857142857, -1563.4285714285713`}}], LineBox[{{2345.142857142857, -1563.4285714285713`}, { 2345.142857142857, -1954.2857142857142`}}], LineBox[{{2345.142857142857, -1954.2857142857142`}, { 2345.142857142857, -2345.142857142857}}], LineBox[{{0, 0}, {390.85714285714283`, 0}}], LineBox[{{390.85714285714283`, 0}, {781.7142857142857, 0}}], LineBox[{{781.7142857142857, 0}, {1172.5714285714284`, 0}}], LineBox[{{1172.5714285714284`, 0}, {1563.4285714285713`, 0}}], LineBox[{{1563.4285714285713`, 0}, {1954.2857142857142`, 0}}], LineBox[{{1954.2857142857142`, 0}, {2345.142857142857, 0}}], LineBox[{{0, -390.85714285714283`}, { 390.85714285714283`, -390.85714285714283`}}], LineBox[{{390.85714285714283`, -390.85714285714283`}, { 781.7142857142857, -390.85714285714283`}}], LineBox[{{781.7142857142857, -390.85714285714283`}, { 1172.5714285714284`, -390.85714285714283`}}], LineBox[{{1172.5714285714284`, -390.85714285714283`}, { 1563.4285714285713`, -390.85714285714283`}}], LineBox[{{1563.4285714285713`, -390.85714285714283`}, { 1954.2857142857142`, -390.85714285714283`}}], LineBox[{{1954.2857142857142`, -390.85714285714283`}, { 2345.142857142857, -390.85714285714283`}}], LineBox[{{0, -781.7142857142857}, { 390.85714285714283`, -781.7142857142857}}], LineBox[{{390.85714285714283`, -781.7142857142857}, { 781.7142857142857, -781.7142857142857}}], LineBox[{{781.7142857142857, -781.7142857142857}, { 1172.5714285714284`, -781.7142857142857}}], LineBox[{{1172.5714285714284`, -781.7142857142857}, { 1563.4285714285713`, -781.7142857142857}}], LineBox[{{1563.4285714285713`, -781.7142857142857}, { 1954.2857142857142`, -781.7142857142857}}], LineBox[{{1954.2857142857142`, -781.7142857142857}, { 2345.142857142857, -781.7142857142857}}], LineBox[{{0, -1172.5714285714284`}, { 390.85714285714283`, -1172.5714285714284`}}], LineBox[{{390.85714285714283`, -1172.5714285714284`}, { 781.7142857142857, -1172.5714285714284`}}], LineBox[{{781.7142857142857, -1172.5714285714284`}, { 1172.5714285714284`, -1172.5714285714284`}}], LineBox[{{1172.5714285714284`, -1172.5714285714284`}, { 1563.4285714285713`, -1172.5714285714284`}}], LineBox[{{1563.4285714285713`, -1172.5714285714284`}, { 1954.2857142857142`, -1172.5714285714284`}}], LineBox[{{1954.2857142857142`, -1172.5714285714284`}, { 2345.142857142857, -1172.5714285714284`}}], LineBox[{{0, -1563.4285714285713`}, { 390.85714285714283`, -1563.4285714285713`}}], LineBox[{{390.85714285714283`, -1563.4285714285713`}, { 781.7142857142857, -1563.4285714285713`}}], LineBox[{{781.7142857142857, -1563.4285714285713`}, { 1172.5714285714284`, -1563.4285714285713`}}], LineBox[{{1172.5714285714284`, -1563.4285714285713`}, { 1563.4285714285713`, -1563.4285714285713`}}], LineBox[{{1563.4285714285713`, -1563.4285714285713`}, { 1954.2857142857142`, -1563.4285714285713`}}], LineBox[{{1954.2857142857142`, -1563.4285714285713`}, { 2345.142857142857, -1563.4285714285713`}}], LineBox[{{0, -1954.2857142857142`}, { 390.85714285714283`, -1954.2857142857142`}}], LineBox[{{390.85714285714283`, -1954.2857142857142`}, { 781.7142857142857, -1954.2857142857142`}}], LineBox[{{781.7142857142857, -1954.2857142857142`}, { 1172.5714285714284`, -1954.2857142857142`}}], LineBox[{{1172.5714285714284`, -1954.2857142857142`}, { 1563.4285714285713`, -1954.2857142857142`}}], LineBox[{{1563.4285714285713`, -1954.2857142857142`}, { 1954.2857142857142`, -1954.2857142857142`}}], LineBox[{{1954.2857142857142`, -1954.2857142857142`}, { 2345.142857142857, -1954.2857142857142`}}], LineBox[{{0, -2345.142857142857}, { 390.85714285714283`, -2345.142857142857}}], LineBox[{{390.85714285714283`, -2345.142857142857}, { 781.7142857142857, -2345.142857142857}}], LineBox[{{781.7142857142857, -2345.142857142857}, { 1172.5714285714284`, -2345.142857142857}}], LineBox[{{1172.5714285714284`, -2345.142857142857}, { 1563.4285714285713`, -2345.142857142857}}], LineBox[{{1563.4285714285713`, -2345.142857142857}, { 1954.2857142857142`, -2345.142857142857}}], LineBox[{{1954.2857142857142`, -2345.142857142857}, { 2345.142857142857, -2345.142857142857}}]}}, Antialiasing->False]}, ContentSelectable->True, PlotRangePadding->{6, 5}]], "Output",ExpressionUUID->"fa0afe84-436d-44d3-\ 8943-bf3ad01eb0cb"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["GraphData", "Section",ExpressionUUID->"84da4061-511a-4602-987a-929ceaf4598b"], Cell[CellGroupData[{ Cell["GraphData", "Subsection",ExpressionUUID->"0f1ebe28-d637-48a0-b929-48180a2e2670"], Cell["Not sure where the GraphData ordering comes from", "Text",ExpressionUUID->"e5038ec4-43a8-4d2e-bd7f-b371f69e16e1"] }, Open ]], Cell[CellGroupData[{ Cell["McKay treeX.all (sorted by diameter)", "Subsection",ExpressionUUID->"4751708f-f5f1-4bbf-9eae-617d14412ce7"], Cell["https://users.cecs.anu.edu.au/~bdm/data/trees.html", "Text",ExpressionUUID->"2c9f3a3d-7488-45f1-85cf-2a3f594b039c"], Cell["\<\ The file treeN.D.txt contains all the trees of order N and diameter D. The \ file treeN.all.tar.gz is a gzipped tar file containing all the files for that \ order. There is one tree per line. The trees are given as an obvious list of edges, \ with vertices numbered from 0.\ \>", "Text",ExpressionUUID->"64129d70-9237-44d2-850c-cb10f7d495e9"], Cell[BoxData[ RowBox[{"Clear", "[", "ReadMcKayTrees", "]"}]], "Input", CellLabel-> "In[201]:=",ExpressionUUID->"cc47ccb2-6bf2-4860-8078-456dd6b6d4f4"], Cell[BoxData[ RowBox[{ RowBox[{"ReadMcKayTrees", "[", "file_String", "]"}], ":=", RowBox[{"Map", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Graph", "[", RowBox[{"UndirectedEdge", "@@@", RowBox[{"Partition", "[", RowBox[{ RowBox[{"StringSplit", "[", "#", "]"}], ",", "2"}], "]"}]}], "]"}], "&"}], ",", "\[IndentingNewLine]", RowBox[{"Import", "[", RowBox[{"file", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", "1", "}"}]}], "]"}]}]], "Input", CellLabel-> "In[202]:=",ExpressionUUID->"d0b1f785-094c-480a-9e9b-e05cb0f25ae0"], Cell[BoxData[ RowBox[{ RowBox[{"ReadMcKayTrees", "[", "n_Integer", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"files", "=", RowBox[{"SortBy", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"FileNames", "[", RowBox[{"All", ",", RowBox[{"\"\\"", "<>", RowBox[{"ToString", "[", "n", "]"}], "<>", "\"\<.all\>\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"FromDigits", "[", RowBox[{ RowBox[{"StringSplit", "[", RowBox[{ RowBox[{"FileBaseName", "[", "#", "]"}], ",", "\"\<.\>\""}], "]"}], "[", RowBox[{"[", RowBox[{"-", "1"}], "]"}], "]"}], "]"}], "&"}]}], "]"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{"Flatten", "[", RowBox[{"ReadMcKayTrees", "/@", "files"}], "]"}]}], "\[IndentingNewLine]", "]"}]}]], "Input", CellLabel-> "In[225]:=",ExpressionUUID->"64e7b2f1-6d9f-47e7-9107-59203864ba41"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"StringSplit", "[", RowBox[{ RowBox[{ "FileBaseName", "[", "\"\\"", "]"}], ",", "\"\<.\>\""}], "]"}], "[", RowBox[{"[", RowBox[{"-", "1"}], "]"}], "]"}]], "Input", CellLabel-> "In[211]:=",ExpressionUUID->"3f2e6082-5071-42e1-a8b3-0f921b172e18"], Cell[BoxData["\<\"2\"\>"], "Output", CellLabel-> "Out[211]=",ExpressionUUID->"99c8fad3-2065-499e-b566-ec715be315f6"] }, Open ]], Cell[CellGroupData[{ Cell["5", "Subsubsection",ExpressionUUID->"e69f18ed-b035-4bd6-a499-c920e35e82ef"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"TextGrid", "[", RowBox[{ RowBox[{"Sort", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FirstCase", "[", RowBox[{ RowBox[{"GraphData", "[", RowBox[{"#", ",", "\"\\""}], "]"}], ",", RowBox[{"{", RowBox[{"\"\\"", ",", "_"}], "}"}]}], "]"}], ",", "#"}], "}"}], "&"}], "/@", RowBox[{"GraphData", "[", RowBox[{"\"\\"", ",", "5"}], "]"}]}], "]"}], ",", RowBox[{"Dividers", "\[Rule]", "All"}]}], "]"}]], "Input", CellLabel-> "In[195]:=",ExpressionUUID->"9c39ae16-8000-4a40-8ba1-40dcef2be3bf"], Cell[BoxData[ TagBox[GridBox[{ { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"5", ",", "1"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "5"}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"5", ",", "2"}], "}"}]}], "}"}], Cell[ "ForkGraph",ExpressionUUID->"7f227a2d-ae16-425b-9b78-fffb74a10bec"]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"5", ",", "3"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "5"}], "}"}]} }, AutoDelete->False, GridBoxDividers->{"Columns" -> {{True}}, "Rows" -> {{True}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "TextGrid"]], "Output", CellLabel-> "Out[195]=",ExpressionUUID->"73b968af-2c73-41da-9b05-509e2ffcc6d1"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ReadMcKayTrees", "[", "\"\\"", "]"}]], "Input", CellLabel-> "In[176]:=",ExpressionUUID->"1114f1d9-2154-47ce-887f-fc6c8faac900"], Cell[BoxData[ RowBox[{"{", RowBox[{ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{"0", "4", "5", "1", "2", "3"}, { Null, {{1, 2}, {1, 3}, {4, 3}, {5, 3}, {6, 3}}}]]}, TagBox[ GraphicsGroupBox[ GraphicsComplexBox[{{0.4082482904638631, 1.6329931618554523`}, {0., 0.8164965809277261}, {0.8164965809277261, 0.8164965809277261}, {0., 0.}, {0.8164965809277261, 0.}, {1.6329931618554523`, 0.}}, { {Hue[0.6, 0.7, 0.7], Opacity[0.7], CapForm["Round"], Arrowheads[0.], ArrowBox[{{1, 2}, {1, 3}, {3, 4}, {3, 5}, {3, 6}}, 0.019562323618881772`]}, {Hue[0.6, 0.5, 1.], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.019562323618881772], DiskBox[2, 0.019562323618881772], DiskBox[3, 0.019562323618881772], DiskBox[4, 0.019562323618881772], DiskBox[5, 0.019562323618881772], DiskBox[6, 0.019562323618881772]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->"NetworkGraphics", FormatType->TraditionalForm, FrameTicks->None], ",", GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{"0", "4", "1", "2", "5", "3"}, { Null, {{1, 2}, {3, 2}, {4, 5}, {6, 5}, {2, 5}}}]]}, TagBox[ GraphicsGroupBox[ GraphicsComplexBox[{{0., 0.8164965809277261}, {0.8164965809277261, 1.6329931618554523`}, {0.8164965809277261, 0.8164965809277261}, { 1.2247448713915892`, 0.}, {1.6329931618554523`, 0.8164965809277261}, {2.041241452319315, 0.}}, { {Hue[0.6, 0.7, 0.7], Opacity[0.7], CapForm["Round"], Arrowheads[0.], ArrowBox[{{1, 2}, {2, 3}, {2, 5}, {4, 5}, {5, 6}}, 0.022945218072026957`]}, {Hue[0.6, 0.5, 1.], EdgeForm[{GrayLevel[0], Opacity[0.7]}], DiskBox[1, 0.022945218072026957], DiskBox[2, 0.022945218072026957], DiskBox[3, 0.022945218072026957], DiskBox[4, 0.022945218072026957], DiskBox[5, 0.022945218072026957], DiskBox[6, 0.022945218072026957]}}]], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False]], DefaultBaseStyle->"NetworkGraphics", FormatType->TraditionalForm, FrameTicks->None]}], "}"}]], "Output", CellLabel-> "Out[176]=",ExpressionUUID->"385c3368-63e4-4435-a3dc-57794897759d"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"TextGrid", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FileBaseName", "@", "#"}], ",", RowBox[{"r", "=", RowBox[{"RecognizeGraph", "/@", RowBox[{"ReadMcKayTrees", "[", "#", "]"}]}]}]}], "}"}], "&"}], "/@", RowBox[{"FileNames", "[", RowBox[{ "All", ",", \ "\"\\""}], "]"}]}], ",", RowBox[{"Dividers", "\[Rule]", "All"}]}], "]"}]], "Input", CellLabel-> "In[179]:=",ExpressionUUID->"9642b6a3-445c-471e-b54d-07535e89fb75"], Cell[BoxData[ TagBox[GridBox[{ {Cell["tree5.2",ExpressionUUID->"e6e1b6b9-cc05-460a-9380-57bdf76803a5"], RowBox[{"{", RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "5"}], "}"}], "}"}]}, {Cell["tree5.3",ExpressionUUID->"b9046333-c7e6-45a3-b02d-4dc452749fb7"], RowBox[{"{", "\<\"ForkGraph\"\>", "}"}]}, {Cell["tree5.4",ExpressionUUID->"af99cca0-82f2-41b9-b962-8da8b99d0e31"], RowBox[{"{", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "5"}], "}"}], "}"}]} }, AutoDelete->False, GridBoxDividers->{"Columns" -> {{True}}, "Rows" -> {{True}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "TextGrid"]], "Output", CellLabel-> "Out[179]=",ExpressionUUID->"3da98cb5-1738-45c3-b804-ee6b0e874f23"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["6", "Subsubsection",ExpressionUUID->"6e82eda8-ce54-4467-b5d1-94ab1faef00d"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"TextGrid", "[", RowBox[{ RowBox[{"Sort", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FirstCase", "[", RowBox[{ RowBox[{"GraphData", "[", RowBox[{"#", ",", "\"\\""}], "]"}], ",", RowBox[{"{", RowBox[{"\"\\"", ",", "_"}], "}"}]}], "]"}], ",", "#"}], "}"}], "&"}], "/@", RowBox[{"GraphData", "[", RowBox[{"\"\\"", ",", "6"}], "]"}]}], "]"}], ",", RowBox[{"Dividers", "\[Rule]", "All"}]}], "]"}]], "Input", CellLabel-> "In[194]:=",ExpressionUUID->"d099ffa9-d0a1-4ae0-85d3-b41f0a7956ef"], Cell[BoxData[ TagBox[GridBox[{ { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "1"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "6"}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "2"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "2"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "3"}], "}"}]}], "}"}], Cell[ "EGraph",ExpressionUUID->"1e57ef11-a620-4a36-81e0-0915056c09fb"]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "4"}], "}"}]}], "}"}], Cell[ "CrossGraph",ExpressionUUID->"4c65452e-622b-4439-8934-f0453cc992d4"]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "5"}], "}"}]}], "}"}], Cell[ "HGraph",ExpressionUUID->"920731a3-fa57-4ce5-a70d-95c049667baf"]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "6"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "6"}], "}"}]} }, AutoDelete->False, GridBoxDividers->{"Columns" -> {{True}}, "Rows" -> {{True}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "TextGrid"]], "Output", CellLabel-> "Out[194]=",ExpressionUUID->"d10a3798-c23f-4e1f-95c3-9a94404b8172"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"TextGrid", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FileBaseName", "@", "#"}], ",", RowBox[{"r", "=", RowBox[{"RecognizeGraph", "/@", RowBox[{"ReadMcKayTrees", "[", "#", "]"}]}]}]}], "}"}], "&"}], "/@", RowBox[{"FileNames", "[", RowBox[{ "All", ",", \ "\"\\""}], "]"}]}], ",", RowBox[{"Dividers", "\[Rule]", "All"}]}], "]"}]], "Input", CellLabel-> "In[181]:=",ExpressionUUID->"1307b1c4-d1fc-4431-ae1c-bb18fbfbd4ae"], Cell[BoxData[ TagBox[GridBox[{ {Cell["tree6.2",ExpressionUUID->"d81f5eb8-e271-443c-9d88-37349a5e32ca"], RowBox[{"{", RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "6"}], "}"}], "}"}]}, {Cell["tree6.3",ExpressionUUID->"f295d895-2e6b-4f4a-8ed3-cde1cc6289aa"], RowBox[{"{", RowBox[{"\<\"CrossGraph\"\>", ",", "\<\"HGraph\"\>"}], "}"}]}, {Cell["tree6.4",ExpressionUUID->"d81fd53f-e55f-41ed-bc40-5aff330d102c"], RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "2"}], "}"}]}], "}"}], ",", "\<\"EGraph\"\>"}], "}"}]}, {Cell["tree6.5",ExpressionUUID->"87fdb41b-13db-49b9-91e5-afbd696914c3"], RowBox[{"{", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "6"}], "}"}], "}"}]} }, AutoDelete->False, GridBoxDividers->{"Columns" -> {{True}}, "Rows" -> {{True}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "TextGrid"]], "Output", CellLabel-> "Out[181]=",ExpressionUUID->"13017ad6-d3e0-4eac-8340-7342d7fc6bc2"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["7", "Subsubsection",ExpressionUUID->"767e6b51-ea90-4a4d-bd15-fe8d949117d6"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"TextGrid", "[", RowBox[{ RowBox[{"Sort", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FirstCase", "[", RowBox[{ RowBox[{"GraphData", "[", RowBox[{"#", ",", "\"\\""}], "]"}], ",", RowBox[{"{", RowBox[{"\"\\"", ",", "_"}], "}"}]}], "]"}], ",", "#"}], "}"}], "&"}], "/@", RowBox[{"GraphData", "[", RowBox[{"\"\\"", ",", "7"}], "]"}]}], "]"}], ",", RowBox[{"Dividers", "\[Rule]", "All"}]}], "]"}]], "Input", CellLabel-> "In[196]:=",ExpressionUUID->"7e32617c-205c-4965-aa02-d25c721cb1fe"], Cell[BoxData[ TagBox[GridBox[{ { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "1"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "1"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "2"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "7"}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "3"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "3"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "4"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "4"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "5"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "5"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "6"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "6"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "7"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "7"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "8"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Spoke\"\>", ",", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "9"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "9"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "10"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"CompleteTree\"\>", ",", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "11"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "7"}], "}"}]} }, AutoDelete->False, GridBoxDividers->{"Columns" -> {{True}}, "Rows" -> {{True}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "TextGrid"]], "Output", CellLabel-> "Out[196]=",ExpressionUUID->"c75b45ce-b873-46cc-8f6b-94b3ef571163"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"TextGrid", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FileBaseName", "@", "#"}], ",", RowBox[{"r", "=", RowBox[{"RecognizeGraph", "/@", RowBox[{"ReadMcKayTrees", "[", "#", "]"}]}]}]}], "}"}], "&"}], "/@", RowBox[{"FileNames", "[", RowBox[{ "All", ",", \ "\"\\""}], "]"}]}], ",", RowBox[{"Dividers", "\[Rule]", "All"}]}], "]"}]], "Input", CellLabel-> "In[197]:=",ExpressionUUID->"57d266a8-78f7-470c-8fa0-e9fcefda2814"], Cell[BoxData[ TagBox[GridBox[{ {Cell["tree7.2",ExpressionUUID->"883e7df6-56b2-4a47-9fb7-84c0deedddf6"], RowBox[{"{", RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "7"}], "}"}], "}"}]}, {Cell["tree7.3",ExpressionUUID->"f762edad-4f29-4681-85ec-d2dd32a0975f"], RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "1"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "4"}], "}"}]}], "}"}]}], "}"}]}, {Cell["tree7.4",ExpressionUUID->"f4fd245d-0a35-41de-9132-f45dc80137fe"], RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "5"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"CompleteTree\"\>", ",", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "6"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "3"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Spoke\"\>", ",", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}]}], "}"}]}], "}"}]}, {Cell["tree7.5",ExpressionUUID->"135ee3c0-6604-46d5-bef6-4247360d2bf1"], RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "9"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "7"}], "}"}]}], "}"}]}], "}"}]}, {Cell["tree7.6",ExpressionUUID->"7fa73398-dadf-4f6b-a3c4-0a88211b6e7d"], RowBox[{"{", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "7"}], "}"}], "}"}]} }, AutoDelete->False, GridBoxDividers->{"Columns" -> {{True}}, "Rows" -> {{True}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "TextGrid"]], "Output", CellLabel-> "Out[197]=",ExpressionUUID->"bea9c194-ba0a-4cbb-8dbd-759d715c35d0"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["McKay Trees/", "Subsection",ExpressionUUID->"4d0416ec-ae8a-480f-b2a5-55d2551d9f62"], Cell["\<\ Not sure what teh relationship between these and McKay's list by diameter is. \ But this directory contains Graph[{{...}, ...] objects with lists of edges \ in some order. And is what is used by GraphData.\ \>", "Text",ExpressionUUID->"b3941857-02f2-40cf-aded-3c2310273277"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"SetDirectory", "[", "\"\\"", "]"}]], "Input", CellLabel-> "In[186]:=",ExpressionUUID->"05673abd-651f-44fa-bc6d-f725222dfb93"], Cell[BoxData["\<\"/Users/eww/Documents/Mathematica/Paclets/GraphData/\ Collections/McKay/Trees\"\>"], "Output", CellLabel-> "Out[186]=",ExpressionUUID->"4b4df3c8-9360-4da7-82d9-5185597a67d2"] }, Open ]], Cell[CellGroupData[{ Cell["5", "Subsubsection",ExpressionUUID->"4dbcf645-5e55-410b-aa39-f17d5aa709c7"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"TextGrid", "[", RowBox[{ RowBox[{"Sort", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FirstCase", "[", RowBox[{ RowBox[{"GraphData", "[", RowBox[{"#", ",", "\"\\""}], "]"}], ",", RowBox[{"{", RowBox[{"\"\\"", ",", "_"}], "}"}]}], "]"}], ",", "#"}], "}"}], "&"}], "/@", RowBox[{"GraphData", "[", RowBox[{"\"\\"", ",", "5"}], "]"}]}], "]"}], ",", RowBox[{"Dividers", "\[Rule]", "All"}]}], "]"}]], "Input", CellLabel-> "In[189]:=",ExpressionUUID->"9bdb5ccb-f52e-4aa4-a21d-b6b913516838"], Cell[BoxData[ TagBox[GridBox[{ { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"5", ",", "1"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "5"}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"5", ",", "2"}], "}"}]}], "}"}], Cell[ "ForkGraph",ExpressionUUID->"1c49b464-0499-4166-a0b0-60539c6d7823"]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"5", ",", "3"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "5"}], "}"}]} }, AutoDelete->False, GridBoxDividers->{"Columns" -> {{True}}, "Rows" -> {{True}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "TextGrid"]], "Output", CellLabel-> "Out[189]=",ExpressionUUID->"534a7d59-d487-46f1-b737-998e01b33962"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RecognizeGraph", "/@", RowBox[{"Get", "[", "\"\\"", "]"}]}]], "Input", CellLabel-> "In[188]:=",ExpressionUUID->"0f31244d-3fef-4268-a80d-cbfec5a5278e"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "5"}], "}"}], ",", "\<\"ForkGraph\"\>", ",", RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "5"}], "}"}]}], "}"}]], "Output", CellLabel-> "Out[188]=",ExpressionUUID->"ad004e79-d318-4a1f-a1bb-de30a82a9e14"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["6", "Subsubsection",ExpressionUUID->"c45f3fe6-69f2-4df8-997c-a919d95570f7"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"TextGrid", "[", RowBox[{ RowBox[{"Sort", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FirstCase", "[", RowBox[{ RowBox[{"GraphData", "[", RowBox[{"#", ",", "\"\\""}], "]"}], ",", RowBox[{"{", RowBox[{"\"\\"", ",", "_"}], "}"}]}], "]"}], ",", "#"}], "}"}], "&"}], "/@", RowBox[{"GraphData", "[", RowBox[{"\"\\"", ",", "6"}], "]"}]}], "]"}], ",", RowBox[{"Dividers", "\[Rule]", "All"}]}], "]"}]], "Input", CellLabel-> "In[191]:=",ExpressionUUID->"864ad4d9-9f9c-4297-a4c8-7dc286a969f1"], Cell[BoxData[ TagBox[GridBox[{ { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "1"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "6"}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "2"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "2"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "3"}], "}"}]}], "}"}], Cell[ "EGraph",ExpressionUUID->"1c2fd911-1f7e-48c9-97d8-8702eccae95e"]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "4"}], "}"}]}], "}"}], Cell[ "CrossGraph",ExpressionUUID->"a11fac1c-2f41-4e3c-babb-f226b0192192"]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "5"}], "}"}]}], "}"}], Cell[ "HGraph",ExpressionUUID->"cb6b3045-e942-4cec-a8cf-37aa992d38b5"]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "6"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "6"}], "}"}]} }, AutoDelete->False, GridBoxDividers->{"Columns" -> {{True}}, "Rows" -> {{True}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "TextGrid"]], "Output", CellLabel-> "Out[191]=",ExpressionUUID->"ebbb698d-555b-49f0-8800-1608d6c1376a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RecognizeGraph", "/@", RowBox[{"Get", "[", "\"\\"", "]"}]}]], "Input", CellLabel-> "In[190]:=",ExpressionUUID->"e1902a8a-73b0-498e-8a87-018f97466f53"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "6"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "2"}], "}"}]}], "}"}], ",", "\<\"EGraph\"\>", ",", "\<\"CrossGraph\"\>", ",", "\<\"HGraph\"\>", ",", RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "6"}], "}"}]}], "}"}]], "Output", CellLabel-> "Out[190]=",ExpressionUUID->"05a6de03-5d36-415c-8a91-931a88c8738f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RecognizeGraph", "/@", RowBox[{"ReadMcKayTrees", "[", "6", "]"}]}]], "Input", CellLabel-> "In[232]:=",ExpressionUUID->"a6d921c9-115c-475d-b5d6-1d015b06dd97"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "6"}], "}"}], ",", "\<\"CrossGraph\"\>", ",", "\<\"HGraph\"\>", ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "2"}], "}"}]}], "}"}], ",", "\<\"EGraph\"\>", ",", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "6"}], "}"}]}], "}"}]], "Output", CellLabel-> "Out[232]=",ExpressionUUID->"b15ecd43-1f86-445f-ba28-50d1f5862fe9"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"RecognizeGraph", "[", RowBox[{"Graph", "[", "#", "]"}], "]"}], "&"}], "/@", RowBox[{"Sort", "[", RowBox[{"EdgeList", "/@", RowBox[{"ReadMcKayTrees", "[", "6", "]"}]}], "]"}]}]], "Input", CellLabel-> "In[231]:=",ExpressionUUID->"5fdbfa0b-ef51-4ad8-836b-16fe7ca0fb9e"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "6"}], "}"}], ",", "\<\"EGraph\"\>", ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "2"}], "}"}]}], "}"}], ",", "\<\"CrossGraph\"\>", ",", "\<\"HGraph\"\>", ",", RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "6"}], "}"}]}], "}"}]], "Output", CellLabel-> "Out[231]=",ExpressionUUID->"aaa698b4-5a56-4338-b29f-1d391f86f9d7"] }, Open ]], Cell["cat tree6*txt > tree_cat.txt", "Text",ExpressionUUID->"16564f86-dca8-42d4-a6dc-b20b81ad38ec"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RecognizeGraph", "/@", RowBox[{ "ReadMcKayTrees", "[", "\"\\"", "]"}]}]], "Input",ExpressionUUID->\ "d82dc806-ebe6-48bf-8909-222fcfb30b74"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "6"}], "}"}], ",", "\<\"CrossGraph\"\>", ",", "\<\"HGraph\"\>", ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "2"}], "}"}]}], "}"}], ",", "\<\"EGraph\"\>", ",", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "6"}], "}"}]}], "}"}]], "Output", CellLabel-> "Out[234]=",ExpressionUUID->"81e51410-0b38-40a6-b6b5-759db19fe5f5"] }, Open ]], Cell["sort tree_cat.txt > tree_sort.txt", "Text",ExpressionUUID->"03f56e29-993d-4090-b155-dbbe71213bb3"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RecognizeGraph", "/@", RowBox[{ "ReadMcKayTrees", "[", "\"\\"", "]"}]}]], "Input", CellLabel-> "In[235]:=",ExpressionUUID->"cb851667-0fe4-47c3-8718-36a09ef9dbd4"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "6"}], "}"}], ",", "\<\"EGraph\"\>", ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"6", ",", "2"}], "}"}]}], "}"}], ",", "\<\"CrossGraph\"\>", ",", "\<\"HGraph\"\>", ",", RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "6"}], "}"}]}], "}"}]], "Output", CellLabel-> "Out[235]=",ExpressionUUID->"a84d698f-3805-47e1-8717-30386bee8e66"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["7", "Subsubsection",ExpressionUUID->"00d7151b-8318-4803-846d-9639c16bfebf"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"TextGrid", "[", RowBox[{ RowBox[{"Sort", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FirstCase", "[", RowBox[{ RowBox[{"GraphData", "[", RowBox[{"#", ",", "\"\\""}], "]"}], ",", RowBox[{"{", RowBox[{"\"\\"", ",", "_"}], "}"}]}], "]"}], ",", "#"}], "}"}], "&"}], "/@", RowBox[{"GraphData", "[", RowBox[{"\"\\"", ",", "7"}], "]"}]}], "]"}], ",", RowBox[{"Dividers", "\[Rule]", "All"}]}], "]"}]], "Input", CellLabel-> "In[192]:=",ExpressionUUID->"e89d24c8-40d9-4ce6-a594-4c53a02e6128"], Cell[BoxData[ TagBox[GridBox[{ { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "1"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "1"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "2"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "7"}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "3"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "3"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "4"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "4"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "5"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "5"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "6"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "6"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "7"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "7"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "8"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Spoke\"\>", ",", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "9"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "9"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "10"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"CompleteTree\"\>", ",", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "11"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "7"}], "}"}]} }, AutoDelete->False, GridBoxDividers->{"Columns" -> {{True}}, "Rows" -> {{True}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "TextGrid"]], "Output", CellLabel-> "Out[192]=",ExpressionUUID->"04e4499c-d63d-4802-a3a5-8d128ca264b6"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RecognizeGraph", "/@", RowBox[{"Get", "[", "\"\\"", "]"}]}]], "Input", CellLabel-> "In[193]:=",ExpressionUUID->"d29dbaea-b107-4562-8bcd-b96d6745ae15"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "1"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "3"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "4"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "5"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "6"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "7"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Spoke\"\>", ",", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"7", ",", "9"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"CompleteTree\"\>", ",", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "7"}], "}"}]}], "}"}]], "Output", CellLabel-> "Out[193]=",ExpressionUUID->"85bb87dd-49ec-4569-add5-3deb342fc92b"] }, Open ]], Cell[BoxData[ RowBox[{"RecognizeGraph", "/@", RowBox[{"ReadMcKayTrees", "[", "6", "]"}]}]], "Input",ExpressionUUID->\ "1dcd7d42-12a3-49ca-951a-cfa4b10a4a3f"] }, Open ]], Cell[CellGroupData[{ Cell["8", "Subsubsection",ExpressionUUID->"87932227-fcd1-478b-ae76-9c8d9397c25e"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"TextGrid", "[", RowBox[{ RowBox[{"Sort", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FirstCase", "[", RowBox[{ RowBox[{"GraphData", "[", RowBox[{"#", ",", "\"\\""}], "]"}], ",", RowBox[{"{", RowBox[{"\"\\"", ",", "_"}], "}"}]}], "]"}], ",", "#"}], "}"}], "&"}], "/@", RowBox[{"GraphData", "[", RowBox[{"\"\\"", ",", "8"}], "]"}]}], "]"}], ",", RowBox[{"Dividers", "\[Rule]", "All"}]}], "]"}]], "Input", CellLabel-> "In[199]:=",ExpressionUUID->"ee3ea325-3d70-4ea9-946f-6f61742c4b30"], Cell[BoxData[ TagBox[GridBox[{ { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "1"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "8"}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "2"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "2"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "3"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "3"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "4"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "4"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "5"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "5"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "6"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "6"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "7"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "7"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "8"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "8"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "9"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "9"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "10"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "10"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "11"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Centipede\"\>", ",", "4"}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "12"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "12"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "13"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "13"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "14"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "14"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "15"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "15"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "16"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "16"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "17"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "17"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "18"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Firecracker\"\>", ",", RowBox[{"{", RowBox[{"2", ",", "4"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "19"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "19"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "20"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "20"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "21"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "21"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "22"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Alkane\"\>", ",", "2"}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "23"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "8"}], "}"}]} }, AutoDelete->False, GridBoxDividers->{"Columns" -> {{True}}, "Rows" -> {{True}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "TextGrid"]], "Output", CellLabel-> "Out[199]=",ExpressionUUID->"150e01f1-b0be-452f-811a-944f82e8773e"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RecognizeGraph", "/@", RowBox[{"Get", "[", "\"\\"", "]"}]}]], "Input", CellLabel-> "In[200]:=",ExpressionUUID->"9b7d47a8-0504-4d21-b8ec-84bfcbb36ad3"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "8"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "2"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "3"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "4"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "5"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "6"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "7"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "8"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "9"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "10"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Centipede\"\>", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "12"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "13"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "14"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "15"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "16"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "17"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Firecracker\"\>", ",", RowBox[{"{", RowBox[{"2", ",", "4"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "19"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "20"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "21"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Alkane\"\>", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "8"}], "}"}]}], "}"}]], "Output", CellLabel-> "Out[200]=",ExpressionUUID->"ca05c370-bcab-4049-9a8e-a457720d6ee8"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Royle", "Subsection",ExpressionUUID->"2e521e35-4fa7-4d95-a4d9-7046f1e24ef5"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"SetDirectory", "[", "\"\\"", "]"}]], "Input", CellLabel-> "In[182]:=",ExpressionUUID->"2f12b329-d358-43af-b6cc-40a43b09a7e5"], Cell[BoxData["\<\"/Users/eww/Documents/Mathematica/Paclets/GraphData/\ Collections/Royle/Trees\"\>"], "Output", CellLabel-> "Out[182]=",ExpressionUUID->"b9b924d3-5087-4b2c-9074-89781329d056"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"TextGrid", "[", RowBox[{ RowBox[{"Sort", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FirstCase", "[", RowBox[{ RowBox[{"GraphData", "[", RowBox[{"#", ",", "\"\\""}], "]"}], ",", RowBox[{"{", RowBox[{"\"\\"", ",", "_"}], "}"}]}], "]"}], ",", "#"}], "}"}], "&"}], "/@", RowBox[{"GraphData", "[", RowBox[{"\"\\"", ",", "10"}], "]"}]}], "]"}], ",", RowBox[{"Dividers", "\[Rule]", "All"}]}], "]"}]], "Input", CellLabel-> "In[198]:=",ExpressionUUID->"7a182edf-d269-40a5-8de6-ede8e86ff684"], Cell[BoxData[ TagBox[GridBox[{ { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "1"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "10"}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "2"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "2"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "3"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "3"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "4"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "4"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "5"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "5"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "6"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "6"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "7"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "7"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "8"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "8"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "9"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "9"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "10"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "10"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "11"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "11"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "12"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "12"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "13"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "13"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "14"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "14"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "15"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "15"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "16"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "16"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "17"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "17"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "18"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "18"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "19"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "19"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "20"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "20"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "21"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "21"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "22"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "22"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "23"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "23"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "24"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "24"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "25"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "25"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "26"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "26"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "27"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "27"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "28"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "28"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "29"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "29"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "30"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "30"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "31"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "31"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "32"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "32"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "33"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "33"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "34"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "34"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "35"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Spoke\"\>", ",", RowBox[{"{", RowBox[{"3", ",", "3"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "36"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "36"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "37"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "37"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "38"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "38"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "39"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "39"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "40"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "40"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "41"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "41"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "42"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "42"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "43"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "43"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "44"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "44"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "45"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "45"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "46"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "46"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "47"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "47"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "48"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "48"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "49"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "49"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "50"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "50"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "51"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "51"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "52"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "52"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "53"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "53"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "54"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Centipede\"\>", ",", "5"}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "55"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "55"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "56"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "56"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "57"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "57"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "58"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "58"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "59"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "59"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "60"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "60"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "61"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "61"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "62"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "62"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "63"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "63"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "64"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "64"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "65"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "65"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "66"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "66"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "67"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "67"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "68"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "68"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "69"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "69"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "70"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "70"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "71"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "71"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "72"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "72"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "73"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "73"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "74"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "74"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "75"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "75"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "76"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "76"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "77"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "77"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "78"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "78"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "79"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "79"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "80"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "80"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "81"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "81"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "82"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "82"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "83"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "83"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "84"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "84"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "85"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "85"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "86"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "86"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "87"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "87"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "88"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "88"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "89"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "89"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "90"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "90"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "91"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "91"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "92"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "92"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "93"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "93"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "94"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "94"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "95"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "95"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "96"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "96"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "97"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "97"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "98"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"CayleyTree\"\>", ",", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "99"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "99"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "100"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "100"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "101"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Firecracker\"\>", ",", RowBox[{"{", RowBox[{"2", ",", "5"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "102"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "102"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "103"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "103"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "104"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "104"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "105"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "105"}], "}"}]}], "}"}]}, { RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"10", ",", "106"}], "}"}]}], "}"}], RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "10"}], "}"}]} }, AutoDelete->False, GridBoxDividers->{"Columns" -> {{True}}, "Rows" -> {{True}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "TextGrid"]], "Output", CellLabel-> "Out[198]=",ExpressionUUID->"44b65dec-0b32-4a5c-ac8f-1937c705048a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RecognizeGraph", "/@", RowBox[{"Take", "[", RowBox[{ RowBox[{"Import", "[", "\"\\"", "]"}], ",", "10"}], "]"}]}]], "Input", CellLabel-> "In[183]:=",ExpressionUUID->"2ffed44c-aecc-44ed-a7fd-71776376ed42"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "11"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"11", ",", "195"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"11", ",", "104"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"11", ",", "225"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"11", ",", "212"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"11", ",", "232"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"11", ",", "229"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"11", ",", "234"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"11", ",", "233"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"11", ",", "194"}], "}"}]}], "}"}]}], "}"}]], "Output", CellLabel-> "Out[183]=",ExpressionUUID->"0d6ad9b2-b536-4702-a0ef-0a21eb497ebb"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RecognizeGraph", "/@", RowBox[{"Take", "[", RowBox[{ RowBox[{"Import", "[", "\"\\"", "]"}], ",", "10"}], "]"}]}]], "Input", CellLabel-> "In[184]:=",ExpressionUUID->"583fe0f5-86b9-4064-98c5-3295074e0f81"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "12"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"12", ",", "1"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"12", ",", "179"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"12", ",", "40"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"12", ",", "100"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"12", ",", "11"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"12", ",", "22"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"12", ",", "5"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"12", ",", "8"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Tree\"\>", ",", RowBox[{"{", RowBox[{"12", ",", "4"}], "}"}]}], "}"}]}], "}"}]], "Output", CellLabel-> "Out[184]=",ExpressionUUID->"3bdcba1e-b224-4bde-bd47-47b592f15d25"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RecognizeGraph", "/@", RowBox[{"Take", "[", RowBox[{ RowBox[{"Import", "[", "\"\\"", "]"}], ",", "10"}], "]"}]}]], "Input", CellLabel-> "In[185]:=",ExpressionUUID->"d8b615c8-a239-4973-9ebc-96ae7c6eed39"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "13"}], "}"}], ",", RowBox[{"{", "}"}], ",", RowBox[{"{", "}"}], ",", RowBox[{"{", "}"}], ",", RowBox[{"{", "}"}], ",", RowBox[{"{", "}"}], ",", RowBox[{"{", "}"}], ",", RowBox[{"{", "}"}], ",", RowBox[{"{", "}"}], ",", RowBox[{"{", "}"}]}], "}"}]], "Output", CellLabel-> "Out[185]=",ExpressionUUID->"b4a9f015-220e-45f6-ac36-d2c3eb42f578"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Recurrence", "Section",ExpressionUUID->"dae1fc54-01e7-4442-b0c4-c97f9d6b8102"], Cell[CellGroupData[{ Cell["Unlabeled Rooted Trees", "Subsection",ExpressionUUID->"d4320690-772c-459c-bd94-6db86ab5446c"], Cell[TextData[ButtonBox["A000081", BaseStyle->"Hyperlink", ButtonData->{ URL["https://oeis.org/A000081"], None}, ButtonNote->"https://oeis.org/A000081"]], "Text",ExpressionUUID->"55818e0a-\ 35a4-468c-b69c-c9931754c2af"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"T", "[", "0", "]"}], "=", "0"}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"T", "[", "1", "]"}], "=", "1"}], ";"}], "\n", RowBox[{ RowBox[{"T", "[", "n_Integer", "]"}], ":=", RowBox[{ RowBox[{"T", "[", "n", "]"}], "=", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"T", "[", RowBox[{"n", "-", "j"}], "]"}], RowBox[{"Total", "[", RowBox[{ RowBox[{ RowBox[{"#", " ", RowBox[{"T", "[", "#", "]"}]}], "&"}], "/@", RowBox[{"Divisors", "[", "j", "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"j", ",", RowBox[{"n", "-", "1"}]}], "}"}]}], "]"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}]}], "Input", CellLabel->"In[29]:=",ExpressionUUID->"8d737263-2ced-4cca-8cec-4c8c98431e4c"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"T", "/@", RowBox[{"Range", "[", "20", "]"}]}]], "Input", CellLabel->"In[32]:=",ExpressionUUID->"403d25c7-f4ad-45d2-a909-094502887506"], Cell[BoxData[ RowBox[{"{", RowBox[{ "1", ",", "1", ",", "2", ",", "4", ",", "9", ",", "20", ",", "48", ",", "115", ",", "286", ",", "719", ",", "1842", ",", "4766", ",", "12486", ",", "32973", ",", "87811", ",", "235381", ",", "634847", ",", "1721159", ",", "4688676", ",", "12826228"}], "}"}]], "Output", CellLabel->"Out[32]=",ExpressionUUID->"5f16ce4e-a3df-4ca0-a87d-a0fa5eca7a31"] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"Polynomial", "[", RowBox[{"l_List", ",", " ", "x_"}], "]"}], " ", ":=", " ", RowBox[{"Fold", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"x", " ", "#1"}], "+", "#2"}], " ", "&"}], ",", "0", ",", "l"}], "]"}], " "}]], "Input", CellLabel->"In[35]:=",ExpressionUUID->"e57b7199-ede7-4682-a2e2-730fee8aa175"], Cell[BoxData[ RowBox[{ RowBox[{"T", "[", RowBox[{"x_", ",", "n_"}], "]"}], ":=", RowBox[{"x", " ", RowBox[{"Polynomial", "[", RowBox[{ RowBox[{"T", "/@", RowBox[{"Range", "[", RowBox[{"n", ",", "1", ",", RowBox[{"-", "1"}]}], "]"}]}], ",", "x"}], "]"}]}]}]], "Input",Express\ ionUUID->"83d6ddf8-c6c9-451a-b32a-2c7274e38967"] }, Open ]], Cell[CellGroupData[{ Cell["Unlabeled Unrooted Trees", "Subsection",ExpressionUUID->"444d3539-8049-4bb6-be6b-5859bad6d076"], Cell[TextData[ButtonBox["A000055", BaseStyle->"Hyperlink", ButtonData->{ URL["https://oeis.org/A000055"], None}, ButtonNote->"https://oeis.org/A000055"]], "Text",ExpressionUUID->"d09c929b-\ 5a7d-47ae-98b9-068bcc60c2c0"], Cell[BoxData[ RowBox[{ RowBox[{"t", "[", RowBox[{"x_", ",", "n_"}], "]"}], ":=", RowBox[{"Normal", "[", RowBox[{"Series", "[", RowBox[{ RowBox[{ RowBox[{"T", "[", RowBox[{"x", ",", "n"}], "]"}], "-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"T", "[", RowBox[{"x", ",", "n"}], "]"}], "^", "2"}], "-", RowBox[{"T", "[", RowBox[{ RowBox[{"x", "^", "2"}], ",", "n"}], "]"}]}], ")"}], "/", "2"}]}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "n"}], "}"}]}], "]"}], "]"}]}]], "Input", CellLabel->"In[38]:=",ExpressionUUID->"055b4eb6-d7fd-46c1-89aa-253a768a6d3b"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"t", "[", RowBox[{"x", ",", "20"}], "]"}]], "Input", CellLabel->"In[39]:=",ExpressionUUID->"b5597005-3e73-4e3d-8363-bf1756815d23"], Cell[BoxData[ RowBox[{"x", "+", SuperscriptBox["x", "2"], "+", SuperscriptBox["x", "3"], "+", RowBox[{"2", " ", SuperscriptBox["x", "4"]}], "+", RowBox[{"3", " ", SuperscriptBox["x", "5"]}], "+", RowBox[{"6", " ", SuperscriptBox["x", "6"]}], "+", RowBox[{"11", " ", SuperscriptBox["x", "7"]}], "+", RowBox[{"23", " ", SuperscriptBox["x", "8"]}], "+", RowBox[{"47", " ", SuperscriptBox["x", "9"]}], "+", RowBox[{"106", " ", SuperscriptBox["x", "10"]}], "+", RowBox[{"235", " ", SuperscriptBox["x", "11"]}], "+", RowBox[{"551", " ", SuperscriptBox["x", "12"]}], "+", RowBox[{"1301", " ", SuperscriptBox["x", "13"]}], "+", RowBox[{"3159", " ", SuperscriptBox["x", "14"]}], "+", RowBox[{"7741", " ", SuperscriptBox["x", "15"]}], "+", RowBox[{"19320", " ", SuperscriptBox["x", "16"]}], "+", RowBox[{"48629", " ", SuperscriptBox["x", "17"]}], "+", RowBox[{"123867", " ", SuperscriptBox["x", "18"]}], "+", RowBox[{"317955", " ", SuperscriptBox["x", "19"]}], "+", RowBox[{"823065", " ", SuperscriptBox["x", "20"]}]}]], "Output", CellLabel->"Out[39]=",ExpressionUUID->"d4aa1be7-73e1-4231-9945-83b61f7eac4c"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"CoefficientList", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"x", ",", "20"}], "]"}], ",", "x"}], "]"}]], "Input", CellLabel->"In[42]:=",ExpressionUUID->"e84fe0e0-474e-4d43-ad1d-9d767c2af6f2"], Cell[BoxData[ RowBox[{"{", RowBox[{ "0", ",", "1", ",", "1", ",", "1", ",", "2", ",", "3", ",", "6", ",", "11", ",", "23", ",", "47", ",", "106", ",", "235", ",", "551", ",", "1301", ",", "3159", ",", "7741", ",", "19320", ",", "48629", ",", "123867", ",", "317955", ",", "823065"}], "}"}]], "Output", CellLabel->"Out[42]=",ExpressionUUID->"21c3bab7-7eb2-4898-be04-11bcd28618ae"] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"NumberOfTrees", "[", "n_Integer", "]"}], ":=", RowBox[{"Coefficient", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"x", ",", "n"}], "]"}], ",", RowBox[{"x", "^", "n"}]}], "]"}]}]], "Input", CellLabel->"In[43]:=",ExpressionUUID->"02379ca5-b009-4412-8b59-5fb87b5c3e1d"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Table", "[", RowBox[{ RowBox[{"NumberOfTrees", "[", "n", "]"}], ",", RowBox[{"{", RowBox[{"n", ",", "12"}], "}"}]}], "]"}]], "Input", CellLabel->"In[45]:=",ExpressionUUID->"5f2908df-a5d4-4008-b41b-6bf92e5a9bcf"], Cell[BoxData[ RowBox[{"{", RowBox[{ "1", ",", "1", ",", "1", ",", "2", ",", "3", ",", "6", ",", "11", ",", "23", ",", "47", ",", "106", ",", "235", ",", "551"}], "}"}]], "Output", CellLabel->"Out[45]=",ExpressionUUID->"f9119fef-18ec-4040-815b-df28ae2381eb"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Constants", "Section",ExpressionUUID->"56d5c3d4-5161-4467-b0d9-e0cc56bd6774"], Cell[CellGroupData[{ Cell["\[Alpha]", "Subsection",ExpressionUUID->"2862e070-9225-4eb1-b2b7-226107ee6e55"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{"$RecursionLimit", "=", "1000"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"x", "/.", RowBox[{"FindRoot", "[", RowBox[{ RowBox[{ RowBox[{"T", "[", RowBox[{ RowBox[{"1", "/", "x"}], ",", "300"}], "]"}], "\[Equal]", "1"}], ",", RowBox[{"{", RowBox[{"x", ",", "2.9", ",", "3"}], "}"}], ",", RowBox[{"WorkingPrecision", "\[Rule]", "20"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}], "//", "Timing"}]], "Input",ExpressionUUID->\ "3af395db-b4bc-4c22-b9e5-c23505ce9e03"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"0.6799999999999997`", " ", "Second"}], ",", "2.9470403194409613711220968006819326566`20."}], "}"}]], "Output",Expressio\ nUUID->"bcf313e8-7022-442c-ad7b-da77db7f20b8"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{"$RecursionLimit", "=", "2000"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"n", "=", "500"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"N", "[", RowBox[{ RowBox[{ RowBox[{"T", "[", "n", "]"}], "/", RowBox[{"T", "[", RowBox[{"n", "-", "1"}], "]"}]}], ",", "20"}], "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}], "//", "Timing"}]], "Input",ExpressionUUID->"a1080ed5-c58c-44d3-8eac-270a47d3fed5"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"4.959999999999999`", " ", "Second"}], ",", "2.94690121516267172296831589498215941994`20.000000000000007"}], "}"}]], "Output",ExpressionUUID->"16815d71-1ed5-4629-959b-a25e232ddcd5"] }, Open ]], Cell["Actual value is 2.95576528565199497\[Ellipsis]", "Text",ExpressionUUID->"686e3782-1801-4edc-9074-3849914aefd2"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"N", "[", RowBox[{ RowBox[{ RowBox[{"t", "[", "500", "]"}], "/", RowBox[{"t", "[", "499", "]"}]}], ",", "20"}], "]"}]], "Input",ExpressionU\ UID->"0bf02975-fd7e-4dd3-9fad-f68deba53856"], Cell[BoxData["2.94099773090651248780976711052125787726`20."], "Output",ExpressionUUID->"9fecf28e-09ad-4155-afad-6787e33f1b5e"] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{ "\[Alpha]", "=", "2.955765285651994974714817524123194588375492304663596595350472478905964733\ 13957495108666828367658135"}], ";"}]], "Input",ExpressionUUID->"bea94f1f-d959-\ 465b-a997-cd55b073c38b"] }, Open ]], Cell[CellGroupData[{ Cell["\[Beta]", "Subsection",ExpressionUUID->"893bb4a7-7501-4d91-a3e2-b500fa35c8bb"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"n", "=", "600"}], "}"}], ",", RowBox[{"N", "[", RowBox[{ RowBox[{ RowBox[{"t", "[", "n", "]"}], RowBox[{ RowBox[{"n", "^", RowBox[{"(", RowBox[{"5", "/", "2"}], ")"}]}], "/", RowBox[{"\[Alpha]", "^", "n"}]}]}], ",", "20"}], "]"}]}], "]"}]], "Input",ExpressionUUID->"944192c6-51a7-41d8-8228-41c82e256a75"], Cell[BoxData["0.53576526006049129355262754856984324927`20."], "Output",ExpressionUUID->"cbfe5655-f103-46ca-a215-30951afaaff5"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "+", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"x", " ", RowBox[{"D", "[", RowBox[{ RowBox[{"T", "[", "x", "]"}], ",", "x"}], "]"}]}], "/.", RowBox[{"x", "\[Rule]", RowBox[{"1", "/", RowBox[{"\[Alpha]", "^", "k"}]}]}]}], ",", RowBox[{"{", RowBox[{"k", ",", "2", ",", "300"}], "}"}]}], "]"}]}], ")"}], "^", RowBox[{"(", RowBox[{"3", "/", "2"}], ")"}]}], "/", RowBox[{"Sqrt", "[", RowBox[{"2", "\[Pi]"}], "]"}]}]], "Input",ExpressionUUID->"8a7ffed6-5640-\ 4e87-b8e5-7f6cf5caec46"], Cell[BoxData["0.\ 534949606142306813198429646703846264006233957812684253541472704099912655243907\ 3771626338088457300795419514796249592`98.26279398226069"], "Output",Expression\ UUID->"eb533117-b09a-44da-aad7-644892e4dcf7"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "+", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"x", " ", RowBox[{"D", "[", RowBox[{ RowBox[{"T", "[", RowBox[{"x", ",", "50"}], "]"}], ",", "x"}], "]"}]}], "/.", RowBox[{"x", "\[Rule]", RowBox[{"1", "/", RowBox[{"\[Alpha]", "^", "k"}]}]}]}], ",", RowBox[{"{", RowBox[{"k", ",", "2", ",", "100"}], "}"}]}], "]"}]}], ")"}], "^", RowBox[{"(", RowBox[{"3", "/", "2"}], ")"}]}], "/", RowBox[{"Sqrt", "[", RowBox[{"2", "\[Pi]"}], "]"}]}]], "Input",ExpressionUUID->"c42a0436-96a7-\ 4968-b7d7-5d59be668367"], Cell[BoxData["0.\ 534949606142307014550379650369662415717774480533193348410666956054519858558360\ 4021891303608667702145107110272493825`98.26279398226069"], "Output",Expression\ UUID->"2db50690-3b18-41ae-9387-0333dbd98e91"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "+", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"x", " ", RowBox[{"D", "[", RowBox[{ RowBox[{"T", "[", RowBox[{"x", ",", "60"}], "]"}], ",", "x"}], "]"}]}], "/.", RowBox[{"x", "\[Rule]", RowBox[{"1", "/", RowBox[{"\[Alpha]", "^", "k"}]}]}]}], ",", RowBox[{"{", RowBox[{"k", ",", "2", ",", "150"}], "}"}]}], "]"}]}], ")"}], "^", RowBox[{"(", RowBox[{"3", "/", "2"}], ")"}]}], "/", RowBox[{"Sqrt", "[", RowBox[{"2", "\[Pi]"}], "]"}]}]], "Input",ExpressionUUID->"8f2b1c88-04d7-\ 4663-976e-070889dd5c43"], Cell[BoxData["0.\ 534949606142307014550379711050977815774748264563860703234981661830781238994352\ 7860765563555864408634051031591168457`98.26279398226069"], "Output",Expression\ UUID->"c219c716-cca9-4ca3-91e9-15b1084ed2a7"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Random tree", "Section",ExpressionUUID->"282487d3-17cd-4590-b036-87ca93b92474"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ShowGraph", "[", RowBox[{ RowBox[{"RootedEmbedding", "[", RowBox[{ RowBox[{"RandomTree", "[", "10", "]"}], ",", "1"}], "]"}], ",", RowBox[{"VertexStyle", "\[Rule]", RowBox[{"Disk", "[", ".03", "]"}]}]}], "]"}]], "Input",ExpressionUUID->\ "da648127-86e8-4538-bfc3-b83e4e35d9c1"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: 1 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.357143 1.33333 0.0238095 1.33333 [ [ 0 0 0 0 ] [ 1 1 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .59524 .97619 m .59524 .78571 L s .21429 .59524 m .21429 .40476 L s .21429 .59524 m .59524 .78571 L s .97619 .40476 m .97619 .59524 L s .02381 .21429 m .21429 .40476 L s .21429 .40476 m .40476 .21429 L s .30952 .02381 m .40476 .21429 L s .59524 .78571 m .97619 .59524 L s .40476 .21429 m .5 .02381 L s 1 0 0 r .03 w .59524 .97619 Mdot .21429 .59524 Mdot .97619 .40476 Mdot .02381 .21429 Mdot .21429 .40476 Mdot .30952 .02381 Mdot .59524 .78571 Mdot .40476 .21429 Mdot .97619 .59524 Mdot .5 .02381 Mdot 0 0 m 1 0 L 1 1 L 0 1 L closepath clip newpath % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{185, 185}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ eJztWftP01AYLZRFUVFR8Q2bj2mMIYYYJT6nojw0xBhjjBHUOqdbZAHGUFFR 8YVT/yH+utl+Z373dh4JuePHNml7cs5Z7+19fl83HlSLhXJQLeWDzEglmCmW 8nOZ4elKSPltnuetRGfGi3A9hI3LSj08QiF2G4xufoQyiiYgnY1uqQj1KXrY irRKWefk5kcVrTcOL024xpPOE6mXcBNO9gtEOkC4SSf7RSLtI9wjJ/slIu0h 3GMn+2Ui9RDuiZM9R6SdhAuc7FeI1E24p072q0TaRrg87NeI1EW4Z072ISJt JlzByX6dSJ2Ee+5kv0GkDYR74WQfJlKKcEUn+wiRfMKVnOyjjeItCXp4TK3Z IgX42u2CypDao1tKR7OgqVYkU1bTG+Xk2gHOnI16sP5jC9U07BuJxNbkGdjZ 2GPbzyzsm4g0SLgK7GzenCHcHOxbiHSacFXY2ZwfINw87FuJdIpwr2Bn61U/ 4V7Dvp1IJwn3Bna2eJ4g3ALsO4h0nHBvYWcLf5Zw72DfRaQjhHsPO9u0DhFu EfbdREoT7gPsbMNl4clH2PcSicUbn2BnwQLjlmDfTyRWwc+ws4JZa32B/SCR WNd9hZ21AhtH32DvIxIb1N9hTxOJzbBl2DNEYtP9B+xsfLC1pwb7YSKxhfAn 7Gywsp3pF+xHicS2mt+wZxvPa1qfZR+R15NFvcMyy7K/rMhvRTqmJdSay2Ir QO2/75bYE3tiT+yJff3sqyzOrW4ENGTw7U3I860fmppICtIe6UuK2ptr16/S oiJs34iJhVhQhEAA0bUQ84oQUiBOF2JWEYITRPxClBUhzEHuIERJEQImZCFC FBQh9EI+I0SgCEEcMiMhJhUhKkOaJcQDRQipkKsJcU9RGtKQEncUIZhBti3E uCJEIkhmhRhThDDCIszvMeq8W0qYCiEpsEowb4j0wruthGkyJCpWlU0fIOXx 7ioxEEd2G5hRgjTMux+vl3m03ahZRUgN8Z3StJypq91LvYqQruIrm+lb8/J2 t/coykHKK9Edb017HHUpwtcefBARojPePfbAREj5d/bhDK+i4euF9zK6pbSb 10LI1wGZmjdBIO+Pz/6xREqkRGqS/pk66zH94v8IeW1/AK/0lWI=\ \>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 184.}, {184., 0.}} -> \ {0., 0., 0., 0.}},ExpressionUUID->"ea599d54-4f62-48c1-8195-dd76b40e4343"], Cell[BoxData[ TagBox[ RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], False, Editable->False]], "Output",ExpressionUUID->"c894f9de-213c-4452-a190-\ 51bae1109e1b"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Graphics", "Section",ExpressionUUID->"100dd69a-1682-4562-9be8-70e4f7dc1a67"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ShowGraphArray", "[", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Partition", "[", RowBox[{"#", ",", "11", ",", "11", ",", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], ",", RowBox[{"{", "}"}]}], "]"}], "&"}], ",", RowBox[{"Trees", "/@", RowBox[{"Range", "[", "7", "]"}]}], ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", "1"}], "]"}], "]"}]], "Input",Exp\ ressionUUID->"8930cb4f-255f-4323-82c9-ea555900bf08"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .63333 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.0865801 0.0150794 0.0865801 [ [ 0 0 0 0 ] [ 1 .63333 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 m 1 0 L 1 .63333 L 0 .63333 L closepath clip newpath % Start of sub-graphic p 0.0238095 0.0150794 0.103175 0.0944444 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.952381 -0.132756 0.952381 [ [ -0.05119 -0.06346 0 0 ] [ 1.05119 .5483 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .62987 .4733 m .28355 .24242 L s .62987 .4733 m .97619 .24242 L s .28355 .24242 m .02381 .01154 L s .28355 .24242 m .19697 .01154 L s .28355 .24242 m .37013 .01154 L s .28355 .24242 m .54329 .01154 L s 1 0 0 r .15 w .62987 .4733 Mdot .28355 .24242 Mdot .02381 .01154 Mdot .19697 .01154 Mdot .37013 .01154 Mdot .54329 .01154 Mdot .97619 .24242 Mdot 0 0 m 1 0 L 1 .48485 L 0 .48485 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.111111 0.0150794 0.190476 0.0944444 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.952381 -0.0694444 0.952381 [ [ -0.05119 -0.06508 0 0 ] [ 1.05119 .48175 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 .40675 m .5 .20833 L s .5 .20833 m .02381 .00992 L s .5 .20833 m .2619 .00992 L s .5 .20833 m .5 .00992 L s .5 .20833 m .7381 .00992 L s .5 .20833 m .97619 .00992 L s 1 0 0 r .15 w .5 .40675 Mdot .5 .20833 Mdot .02381 .00992 Mdot .2619 .00992 Mdot .5 .00992 Mdot .7381 .00992 Mdot .97619 .00992 Mdot 0 0 m 1 0 L 1 .41667 L 0 .41667 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.198413 0.0150794 0.277778 0.0944444 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.0627706 1.03896 0.017316 1.03896 [ [ -0.05119 -0.05768 0 0 ] [ 1.05119 .78496 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .62987 .70996 m .28355 .47908 L s .62987 .70996 m .97619 .47908 L s .28355 .47908 m .11039 .2482 L s .28355 .47908 m .45671 .2482 L s .11039 .2482 m .02381 .01732 L s .11039 .2482 m .19697 .01732 L s 1 0 0 r .15 w .62987 .70996 Mdot .28355 .47908 Mdot .11039 .2482 Mdot .02381 .01732 Mdot .19697 .01732 Mdot .45671 .2482 Mdot .97619 .47908 Mdot 0 0 m 1 0 L 1 .72727 L 0 .72727 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.285714 0.0150794 0.365079 0.0944444 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.0820106 1.0582 0.015873 1.0582 [ [ -0.05119 -0.05913 0 0 ] [ 1.05119 .72579 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .55291 .65079 m .55291 .43915 L s .55291 .43915 m .12963 .22751 L s .55291 .43915 m .55291 .22751 L s .55291 .43915 m .97619 .22751 L s .12963 .22751 m .02381 .01587 L s .12963 .22751 m .23545 .01587 L s 1 0 0 r .15 w .55291 .65079 Mdot .55291 .43915 Mdot .12963 .22751 Mdot .02381 .01587 Mdot .23545 .01587 Mdot .55291 .22751 Mdot .97619 .22751 Mdot 0 0 m 1 0 L 1 .66667 L 0 .66667 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.373016 0.0150794 0.452381 0.0944444 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.0952381 1.07143 0.0178571 1.07143 [ [ -0.05119 -0.05714 0 0 ] [ 1.05119 .80714 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .61905 .73214 m .2619 .49405 L s .61905 .73214 m .97619 .49405 L s .2619 .49405 m .2619 .25595 L s .2619 .25595 m .02381 .01786 L s .2619 .25595 m .2619 .01786 L s .2619 .25595 m .5 .01786 L s 1 0 0 r .15 w .61905 .73214 Mdot .2619 .49405 Mdot .2619 .25595 Mdot .02381 .01786 Mdot .2619 .01786 Mdot .5 .01786 Mdot .97619 .49405 Mdot 0 0 m 1 0 L 1 .75 L 0 .75 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.460317 0.0150794 0.539683 0.0944444 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.452381 1.42857 0.0238095 1.42857 [ [ -0.05119 -0.05119 0 0 ] [ 1.05119 1.05119 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 .97619 m .5 .7381 L s .5 .7381 m .5 .5 L s .5 .5 m .02381 .2619 L s .5 .5 m .5 .2619 L s .5 .5 m .97619 .2619 L s .02381 .2619 m .02381 .02381 L s 1 0 0 r .15 w .5 .97619 Mdot .5 .7381 Mdot .5 .5 Mdot .02381 .2619 Mdot .5 .2619 Mdot .97619 .2619 Mdot .02381 .02381 Mdot 0 0 m 1 0 L 1 1 L 0 1 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.547619 0.0150794 0.626984 0.0944444 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.420635 1.39683 0.0253968 1.39683 [ [ -0.05119 -0.0496 0 0 ] [ 1.05119 1.11627 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .59524 1.04127 m .21429 .7873 L s .59524 1.04127 m .97619 .7873 L s .21429 .7873 m .21429 .53333 L s .21429 .53333 m .02381 .27937 L s .21429 .53333 m .40476 .27937 L s .02381 .27937 m .02381 .0254 L s 1 0 0 r .15 w .59524 1.04127 Mdot .21429 .7873 Mdot .21429 .53333 Mdot .02381 .27937 Mdot .02381 .0254 Mdot .40476 .27937 Mdot .97619 .7873 Mdot 0 0 m 1 0 L 1 1.06667 L 0 1.06667 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.634921 0.0150794 0.714286 0.0944444 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.769841 1.74603 0.031746 1.74603 [ [ -0.05119 -0.04325 0 0 ] [ 1.05119 1.37659 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 1.30159 m .5 .98413 L s .5 .98413 m .5 .66667 L s .5 .66667 m .02381 .34921 L s .5 .66667 m .97619 .34921 L s .02381 .34921 m .02381 .03175 L s .97619 .34921 m .97619 .03175 L s 1 0 0 r .15 w .5 1.30159 Mdot .5 .98413 Mdot .5 .66667 Mdot .02381 .34921 Mdot .02381 .03175 Mdot .97619 .34921 Mdot .97619 .03175 Mdot 0 0 m 1 0 L 1 1.33333 L 0 1.33333 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.722222 0.0150794 0.801587 0.0944444 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.420635 1.39683 0.0253968 1.39683 [ [ -0.05119 -0.0496 0 0 ] [ 1.05119 1.11627 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .59524 1.04127 m .21429 .7873 L s .59524 1.04127 m .97619 .7873 L s .21429 .7873 m .21429 .53333 L s .21429 .53333 m .21429 .27937 L s .21429 .27937 m .02381 .0254 L s .21429 .27937 m .40476 .0254 L s 1 0 0 r .15 w .59524 1.04127 Mdot .21429 .7873 Mdot .21429 .53333 Mdot .21429 .27937 Mdot .02381 .0254 Mdot .40476 .0254 Mdot .97619 .7873 Mdot 0 0 m 1 0 L 1 1.06667 L 0 1.06667 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.809524 0.0150794 0.888889 0.0944444 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.420635 1.39683 0.0253968 1.39683 [ [ -0.05119 -0.0496 0 0 ] [ 1.05119 1.11627 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .59524 1.04127 m .59524 .7873 L s .59524 .7873 m .21429 .53333 L s .59524 .7873 m .97619 .53333 L s .21429 .53333 m .21429 .27937 L s .21429 .27937 m .02381 .0254 L s .21429 .27937 m .40476 .0254 L s 1 0 0 r .15 w .59524 1.04127 Mdot .59524 .7873 Mdot .21429 .53333 Mdot .21429 .27937 Mdot .02381 .0254 Mdot .40476 .0254 Mdot .97619 .53333 Mdot 0 0 m 1 0 L 1 1.06667 L 0 1.06667 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.896825 0.0150794 0.97619 0.0944444 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -1.0873 2.06349 0.0396825 2.06349 [ [ -0.05119 -0.03532 0 0 ] [ 1.05119 1.70198 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 1.62698 m .02381 1.30952 L s .5 1.62698 m .97619 1.30952 L s .02381 1.30952 m .02381 .99206 L s .02381 .99206 m .02381 .6746 L s .02381 .6746 m .02381 .35714 L s .02381 .35714 m .02381 .03968 L s 1 0 0 r .15 w .5 1.62698 Mdot .02381 1.30952 Mdot .02381 .99206 Mdot .02381 .6746 Mdot .02381 .35714 Mdot .02381 .03968 Mdot .97619 1.30952 Mdot 0 0 m 1 0 L 1 1.66667 L 0 1.66667 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.0238095 0.102381 0.103175 0.181746 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.47619 0.0119048 0.47619 [ [ 0 -0.0631 0 0 ] [ 1 .5631 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 .4881 m .5 .39286 L s .5 .39286 m .5 .29762 L s .5 .29762 m .5 .20238 L s .5 .20238 m .5 .10714 L s .5 .10714 m .5 .0119 L s 1 0 0 r .15 w .5 .4881 Mdot .5 .39286 Mdot .5 .29762 Mdot .5 .20238 Mdot .5 .10714 Mdot .5 .0119 Mdot 0 0 m 1 0 L 1 .5 L 0 .5 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.111111 0.102381 0.190476 0.181746 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.769841 1.74603 0.031746 1.74603 [ [ -0.05119 -0.04325 0 0 ] [ 1.05119 1.37659 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 1.30159 m .5 .98413 L s .5 .98413 m .5 .66667 L s .5 .66667 m .5 .34921 L s .5 .34921 m .02381 .03175 L s .5 .34921 m .97619 .03175 L s 1 0 0 r .15 w .5 1.30159 Mdot .5 .98413 Mdot .5 .66667 Mdot .5 .34921 Mdot .02381 .03175 Mdot .97619 .03175 Mdot 0 0 m 1 0 L 1 1.33333 L 0 1.33333 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.198413 0.102381 0.277778 0.181746 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.769841 1.74603 0.031746 1.74603 [ [ -0.05119 -0.04325 0 0 ] [ 1.05119 1.37659 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 1.30159 m .5 .98413 L s .5 .98413 m .5 .66667 L s .5 .66667 m .02381 .34921 L s .5 .66667 m .97619 .34921 L s .02381 .34921 m .02381 .03175 L s 1 0 0 r .15 w .5 1.30159 Mdot .5 .98413 Mdot .5 .66667 Mdot .02381 .34921 Mdot .02381 .03175 Mdot .97619 .34921 Mdot 0 0 m 1 0 L 1 1.33333 L 0 1.33333 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.285714 0.102381 0.365079 0.181746 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.214286 1.19048 0.0178571 1.19048 [ [ -0.05119 -0.05714 0 0 ] [ 1.05119 .80714 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 .73214 m .5 .49405 L s .5 .49405 m .5 .25595 L s .5 .25595 m .02381 .01786 L s .5 .25595 m .5 .01786 L s .5 .25595 m .97619 .01786 L s 1 0 0 r .15 w .5 .73214 Mdot .5 .49405 Mdot .5 .25595 Mdot .02381 .01786 Mdot .5 .01786 Mdot .97619 .01786 Mdot 0 0 m 1 0 L 1 .75 L 0 .75 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.373016 0.102381 0.452381 0.181746 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.166667 1.14286 0.0190476 1.14286 [ [ -0.05119 -0.05595 0 0 ] [ 1.05119 .85595 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .59524 .78095 m .59524 .52698 L s .59524 .52698 m .21429 .27302 L s .59524 .52698 m .97619 .27302 L s .21429 .27302 m .02381 .01905 L s .21429 .27302 m .40476 .01905 L s 1 0 0 r .15 w .59524 .78095 Mdot .59524 .52698 Mdot .21429 .27302 Mdot .02381 .01905 Mdot .40476 .01905 Mdot .97619 .27302 Mdot 0 0 m 1 0 L 1 .8 L 0 .8 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.460317 0.102381 0.539683 0.181746 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.952381 -0.042328 0.952381 [ [ -0.05119 -0.06442 0 0 ] [ 1.05119 .50886 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 .43386 m .5 .22222 L s .5 .22222 m .02381 .01058 L s .5 .22222 m .34127 .01058 L s .5 .22222 m .65873 .01058 L s .5 .22222 m .97619 .01058 L s 1 0 0 r .15 w .5 .43386 Mdot .5 .22222 Mdot .02381 .01058 Mdot .34127 .01058 Mdot .65873 .01058 Mdot .97619 .01058 Mdot 0 0 m 1 0 L 1 .44444 L 0 .44444 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.0238095 0.189683 0.103175 0.269048 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.47619 0.0119048 0.47619 [ [ 0 -0.0631 0 0 ] [ 1 .5631 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 .4881 m .5 .36905 L s .5 .36905 m .5 .25 L s .5 .25 m .5 .13095 L s .5 .13095 m .5 .0119 L s 1 0 0 r .15 w .5 .4881 Mdot .5 .36905 Mdot .5 .25 Mdot .5 .13095 Mdot .5 .0119 Mdot 0 0 m 1 0 L 1 .5 L 0 .5 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.111111 0.189683 0.190476 0.269048 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.452381 1.42857 0.0238095 1.42857 [ [ -0.05119 -0.05119 0 0 ] [ 1.05119 1.05119 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 .97619 m .5 .65873 L s .5 .65873 m .5 .34127 L s .5 .34127 m .02381 .02381 L s .5 .34127 m .97619 .02381 L s 1 0 0 r .15 w .5 .97619 Mdot .5 .65873 Mdot .5 .34127 Mdot .02381 .02381 Mdot .97619 .02381 Mdot 0 0 m 1 0 L 1 1 L 0 1 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.198413 0.189683 0.277778 0.269048 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.952381 0.0119048 0.952381 [ [ -0.05119 -0.0631 0 0 ] [ 1.05119 .5631 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 .4881 m .5 .25 L s .5 .25 m .02381 .0119 L s .5 .25 m .5 .0119 L s .5 .25 m .97619 .0119 L s 1 0 0 r .15 w .5 .4881 Mdot .5 .25 Mdot .02381 .0119 Mdot .5 .0119 Mdot .97619 .0119 Mdot 0 0 m 1 0 L 1 .5 L 0 .5 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.0238095 0.276984 0.103175 0.356349 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.47619 0.0119048 0.47619 [ [ 0 -0.0631 0 0 ] [ 1 .5631 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 .4881 m .5 .32937 L s .5 .32937 m .5 .17063 L s .5 .17063 m .5 .0119 L s 1 0 0 r .15 w .5 .4881 Mdot .5 .32937 Mdot .5 .17063 Mdot .5 .0119 Mdot 0 0 m 1 0 L 1 .5 L 0 .5 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.111111 0.276984 0.190476 0.356349 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.452381 1.42857 0.0238095 1.42857 [ [ -0.05119 -0.05119 0 0 ] [ 1.05119 1.05119 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 .97619 m .5 .5 L s .5 .5 m .02381 .02381 L s .5 .5 m .97619 .02381 L s 1 0 0 r .15 w .5 .97619 Mdot .5 .5 Mdot .02381 .02381 Mdot .97619 .02381 Mdot 0 0 m 1 0 L 1 1 L 0 1 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.0238095 0.364286 0.103175 0.443651 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.47619 0.0119048 0.47619 [ [ 0 -0.0631 0 0 ] [ 1 .5631 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 .4881 m .5 .25 L s .5 .25 m .5 .0119 L s 1 0 0 r .15 w .5 .4881 Mdot .5 .25 Mdot .5 .0119 Mdot 0 0 m 1 0 L 1 .5 L 0 .5 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.0238095 0.451587 0.103175 0.530952 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.47619 0.0119048 0.47619 [ [ 0 -0.0631 0 0 ] [ 1 .5631 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 0 r .005 w [ ] 0 setdash .5 .4881 m .5 .0119 L s 1 0 0 r .15 w .5 .4881 Mdot .5 .0119 Mdot 0 0 m 1 0 L 1 .5 L 0 .5 L closepath clip newpath MathSubEnd P % End of sub-graphic % Start of sub-graphic p 0.0238095 0.538889 0.103175 0.618254 MathSubStart %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.5 0.47619 0.5 0.47619 [ [ 0 0 0 0 ] [ 1 1 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 1 0 0 r .15 w .5 .5 Mdot 0 0 m 1 0 L 1 1 L 0 1 L closepath clip newpath MathSubEnd P % End of sub-graphic % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{449.125, 284.312}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ eJztWttuFEcQHXbXN7CxsfH9sus1toGEl0QiCCUPIRJIiQiKoiAlbw6KBA9c wiUXBfiPPCc/Ej4gl6dIUQT5k42ne/acnprT4/HuWiYBJMY1VdXVVdVV1d01 e3Xn4c2vbu88vHVjp3Xl/s69m7duPGhdvnt/F1U/kiRHftn9v9JKUriTJN2H +/csfWQvg4J/TB/19HXLY39L/9SAcNA2mGYBHQWV0BKgMUBrdoJf0z+NFDoF aEtMMAbqKKAFQCOAVg96AmdBUu9gHXbfNuPOOiPYZwVuFCMMYaTUn824Nl+A qQHoMqBhAc1FheVx2xVtOiZwQwK3UpGvxNjP0z9ufWqA1mDYEKBVUBsCUkb0 44BxgasLnIopxdfanwNobB3Qyn/aAc30GWa3CvI1YfYqqB7ZlerfGCTd+fz/ gWfEhHsOhbiuNkl7L1po97iwuy5w75UIbYU+CbWsgdAWNtQq4uYg5TigCUAs a9wwlmEly/JUTMl2jLBufeXKkEmNLAq661zLU2cgm8VxSOAIje61eBUcVhYA KhnmoO84INo6BIj72RJcY0RNgzAJ5g1Ap8Tkm736dhoQy05d4AiNmulTf3iV GjlfJd0VL6CVt+cDzZMsChuIR1MHGAFlHs1m68+jzGzvgpDHpHnNWuu1nclb RtcrN+cCK7RWed2WvhTnS99QiANt2SqdhGeXMeBYcFgWosegFoZNAmLCbuYh 7eMp67gOV7CIXhBW+GDoegwGmxIcJjM5vU60mR4x2rK8LMdYeGxk3ByPMa9D fbu4XtcudSpGlQVr7zPfSYFTGVDY5U4YJlUJsZPRq6U1tGFpDCVz0l8ExLsB ywRr7iakDAujGgJn7fJvESeFWbMLzffqTFeRds0TiQoXccIswE0qRDb/JFuq qAMdCwljoZSw6NCp29BEObAGqoot5cotgVMx3bN7Z+g67gQokHVD6HQj8aQf Vi35WX/MycNUUVaAs3mqWrn5zBfBYnTVDIZz6kUIZ63lWW9CTJNV3aip0yDk VhOBkWT7bIXMakNNtbgNUNXh/Gxscsbxm1h1M5adAm7yJwGpa1DmFG7WClI3 Y7WQaq+LntOjZeQs5l0SFi/3b6KhT0qHCwfoen4GxkRje7HUSibWOVi5Ahyj 2yS0r96FY1elyOcCHNfLk4UmL7LGPxQ1J6jMFSOKCboq5j0ncMsCd1rgxmHR FJyYlcQlkI4CUmLZk+DlYBYQY5Fhoe7lSnJVwxhK1JQn+MycaJvKsSu/Hr5h b0C/EUEtmLgKdlVcmRtNQCY3fEoXcmMe/CtqZPpnClPXMGKAjlB8TMZ4nydr OjbCNEthNpk2xFhGkQqaNVBVEeB1g75iIi+IESrhF7XaanhoKBunvKfyAKri weB4O6MPGOgq5NnrWRbUhTy0l+pNOEC15Lj/NwVVXWeY38xlGmGYp0ptijLT xHkMOwHIH9uDZt2HUCnaSQ33r0gusyHKKFPb6ASkmLbOHDQ0AnifKtYBRupC 3NQ7YFK2NVCusil3OdaF4k3ooo4mqkS0BI5B3BRU+kB5zWQfDbwNO1qANgGp MFQGjkA11T3nXV9lrjKGu/UxQHNW4XU4fqtUYZ7D1Z1YKazKKPNVzaHKj9rl MiMYVh8BUpOq1mJXDbUOrJEqH5Xi6qgQv4smL6BurqZleahMYHroZemEXTTe 7PwlK3me/mGaMVDr0MFcA9hyXxmYCFp9GhCZiOMxvW1FOJufVYfPQwDr9zgg x/ll75yyB1QoEVrKRawRe56qiXQFzjgGyFF8Wy55V4xRHTslmzuQ+p7D5jib ZW6cb6f7D1GmlaV6N02MVh81GnvMwi9IKlNVjpXrsK9PA9G2tRkRLohLuSEo bBJSHYK5DFV76moDUK5wz3Gr1wZcyi278Hku0feLYVAnBXVQOkwLOerIw91E jVDFW/3iYlRAf3iFGX2nhMLV8p9txPK+52zmQrNLpe/BUZUt12EB/W79rBqd y5iSpWcRULWuYlQ/duqMaupjfK2yzmqDVWWOtqnc5UVM1YwaFGYy1oP0zQVI I5woHzTllvCqyMxuwktsTLKrwAO7iuhG9jTL4pj+rKKQOiRHf6tjlFTdB0dg ZEWblirG/qqisKqrG1gEtgCZWqxp5sqTKZyEq/231YG1ikVAtWd5AFONw9xl F/GfZCcrXWrK51MHUX474DX1Ra8GbUCY2gpKJlCrFsXx7mHWtAnqP71OwNPo NoRVCP/n/c9XfpnqeQJ6jEdu3uB69pPC0WPrmOqFnaBqKKk+c/NgxPI4VXBH P2I72Yh8rqrR5eumfj4ayv6gokQV2p3M0t7kMGQ7GbQfOSoye5HzsbTmUuah cOUc/fpg6A7ex8XybWjJtpuj3/H0t+ADlklHv23papsosHM6tXVmPeLi9hZq dAFM6oLknl97zouCzv3cvT/0nMwDfmZQDfBwDLNR9YyOxkY/sqObgpMNNP7I UF1tHfcVK5H7t+pw8fck6hrreC5br/hOjm488axU9Uqq52DeGYX5C6qq10rt ljY0W8GY8quhe78al6MWvvx6596vWYk89HHpyu9Y7v0T68Lyw1z0sOrAT61S qqa1Q2GFhaouh7XavX/W+5gKOxhD4nqVeRROa8llUz/h0WMYPEpfbdlGfkyJ PdSITft+PVzBWwWNylfFPR97TrWbDpJ+Ka/fU499P2/pkzKsluDgQ9lnNZ3y jTNyvzMR2+l54UDV3HPPu37MO4Kufrbknvf8mAuCPhMbk23gDCP1UUx1gt3z vh/NwFWjVdvPPR/Y0epjjroYu2fhcFC14eOej6zdTcGpmqbu+Y0d3RKcasdz z2+t5mp0tDH6nR2tutyq7eOe39vR7Ww2c+BI33PpXeH44J4/eHa1lKzI7v2J Fbwh6armOvpTS4/uJ4/3y1m9qlbnPAg9D8KiV2WfOAiYXnbYnz2Wq+SwP+0f q+WqHAtH9Uv/f1nzclnr4EOO1kHBr1acvOr013nyssKvV+Yw4OTIv7rwRHQ= \ \>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 448.125}, {283.312, \ 0.}} -> {0., 0., 0., 0.}, {{11., 46.5}, {276.562, 241.062}} -> {0., 0., 0., \ 0.}, {{50.0625, 85.5625}, {276.562, 241.062}} -> {-1., 0., 0., 0.}, {{89.125, \ 124.625}, {276.562, 241.062}} -> {-2., 0., 0., 0.}, {{128.188, 163.688}, \ {276.562, 241.062}} -> {-3., 0., 0., 0.}, {{167.25, 202.75}, {276.562, \ 241.062}} -> {-4., 0., 0., 0.}, {{206.312, 241.812}, {276.562, 241.062}} -> \ {-4., 0., 0., 0.}, {{245.312, 280.812}, {276.562, 241.062}} -> {-5., 0., 0., \ 0.}, {{284.375, 319.875}, {276.562, 241.062}} -> {-6., 0., 0., 0.}, \ {{323.438, 358.938}, {276.562, 241.062}} -> {-7., 0., 0., 0.}, {{362.5, \ 398.}, {276.562, 241.062}} -> {-8., 0., 0., 0.}, {{401.562, 437.062}, \ {276.562, 241.062}} -> {-9., 0., 0., 0.}, {{11., 46.5}, {237.5, 202.}} -> \ {0., -3., 0., 0.}, {{50.0625, 85.5625}, {237.5, 202.}} -> {0., -1., 0., 0.}, \ {{89.125, 124.625}, {237.5, 202.}} -> {-1., -1., 0., 0.}, {{128.188, \ 163.688}, {237.5, 202.}} -> {-3., -1., 0., 0.}, {{167.25, 202.75}, {237.5, \ 202.}} -> {-4., -1., 0., 0.}, {{206.312, 241.812}, {237.5, 202.}} -> {-6., \ -1., 0., 0.}, {{11., 46.5}, {198.438, 162.938}} -> {0., -5., 0., 0.}, \ {{50.0625, 85.5625}, {198.438, 162.938}} -> {0., -1., 0., 0.}, {{89.125, \ 124.625}, {198.438, 162.938}} -> {-2., -3., 0., 0.}, {{11., 46.5}, {159.375, \ 123.875}} -> {0., -7., 0., 0.}, {{50.0625, 85.5625}, {159.375, 123.875}} -> \ {0., -2., 0., 0.}, {{11., 46.5}, {120.312, 84.8125}} -> {0., -10., 0., 0.}, \ {{11., 46.5}, {81.25, 45.75}} -> {0., -12., 0., 0.}, {{11., 46.5}, {42.1875, \ 6.6875}} -> {-1., -15., 0., \ 0.}},ExpressionUUID->"89fadf91-1055-4045-9b86-3c6f7fcfe427"], Cell[BoxData[ TagBox[ RowBox[{"\[SkeletonIndicator]", "GraphicsArray", "\[SkeletonIndicator]"}], False, Editable->False]], "Output",ExpressionUUID->"14128ff4-d373-41ff-bc5e-\ 8b9014abbf05"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Chemical structures", "Section",ExpressionUUID->"86126632-c984-4ad9-9ba7-9450d8f98dba"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"ChemicalData", "[", "All", "]"}], "//", "Length"}]], "Input",Expres\ sionUUID->"b6e015e0-aa73-4628-a99d-ca2a3841f25d"], Cell[BoxData["18179"], "Output",ExpressionUUID->"51152dfe-4b8a-40b8-a995-2999126784ed"] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ChemicalGraph", "[", "c_", "]"}], ":=", RowBox[{"RecognizeGraph", "[", RowBox[{"FromAdjacencyMatrix", "[", RowBox[{"Normal", "[", RowBox[{"ChemicalData", "[", RowBox[{"c", ",", "\"\\""}], "]"}], "]"}], "]"}], "]"}]}], "\[IndentingNewLine]"}], "\n", RowBox[{ RowBox[{"ChemicalStructureGraph", "[", "c_", "]"}], ":=", RowBox[{"RecognizeGraph", "[", RowBox[{"RemoveMultipleEdges", "[", RowBox[{"FromAdjacencyMatrix", "[", RowBox[{"Normal", "[", RowBox[{"ChemicalData", "[", RowBox[{"c", ",", "\"\\""}], "]"}], "]"}], "]"}], "]"}], "]"}]}]}], "Input",ExpressionUUID->"d09d4de5-0f27-4066-8017-\ 5a2cad05ba8b"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"#", ",", RowBox[{"ChemicalGraph", "[", "#", "]"}]}], "}"}], "&"}], "/@", RowBox[{"Take", "[", RowBox[{ RowBox[{"ChemicalData", "[", "All", "]"}], ",", "20"}], "]"}]}]], "Input",\ ExpressionUUID->"17646788-1e28-45d1-a309-e506f0425649"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Hydrogen\"\>", ",", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "2"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Helium\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Lithium\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"LithiumHydride\"\>", ",", RowBox[{"{", RowBox[{"\<\"Empty\"\>", ",", "2"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Beryllium\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Boron\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"BerylliumHydride\"\>", ",", RowBox[{"{", RowBox[{"\<\"Empty\"\>", ",", "3"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Carbon\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Methane\"\>", ",", RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "5"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Ammonia\"\>", ",", "\<\"Claw\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Water\"\>", ",", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "3"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"HydrogenFluoride\"\>", ",", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "2"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"HeavyWater\"\>", ",", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "3"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Neon\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Lithamide\"\>", ",", RowBox[{"{", RowBox[{"4", ",", "3"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Sodium\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"LithiumHydroxide\"\>", ",", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Magnesium\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"BoronNitride\"\>", ",", RowBox[{"{", "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"BerylliumOxide\"\>", ",", RowBox[{"{", "}"}]}], "}"}]}], "}"}]], "Output",ExpressionUUID->\ "6e58e538-ba0b-46d1-96e3-1c335ad6dbdc"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"#", ",", RowBox[{"ChemicalStructureGraph", "[", "#", "]"}]}], "}"}], "&"}], "/@", RowBox[{"Take", "[", RowBox[{ RowBox[{"ChemicalData", "[", "All", "]"}], ",", "20"}], "]"}]}]], "Input",\ ExpressionUUID->"faa44b13-efde-486a-807d-ca4602c094b1"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Hydrogen\"\>", ",", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "2"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Helium\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Lithium\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"LithiumHydride\"\>", ",", RowBox[{"{", RowBox[{"\<\"Empty\"\>", ",", "2"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Beryllium\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Boron\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"BerylliumHydride\"\>", ",", RowBox[{"{", RowBox[{"\<\"Empty\"\>", ",", "3"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Carbon\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Methane\"\>", ",", RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "5"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Ammonia\"\>", ",", "\<\"Claw\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Water\"\>", ",", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "3"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"HydrogenFluoride\"\>", ",", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "2"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"HeavyWater\"\>", ",", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "3"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Neon\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Lithamide\"\>", ",", RowBox[{"{", RowBox[{"4", ",", "3"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Sodium\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"LithiumHydroxide\"\>", ",", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Magnesium\"\>", ",", "\<\"SingletonGraph\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"BoronNitride\"\>", ",", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "2"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"BerylliumOxide\"\>", ",", RowBox[{"{", RowBox[{"\<\"Path\"\>", ",", "2"}], "}"}]}], "}"}]}], "}"}]], "Output",E\ xpressionUUID->"d076aa0c-1053-4441-9eb6-9f1853bdbe90"] }, Open ]], Cell[CellGroupData[{ Cell["Alkanes", "Subsection",ExpressionUUID->"6af9e340-a659-4e34-be15-630a5ee78a9c"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"DeleteCases", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"#", ",", RowBox[{"ChemicalGraph", "[", "#", "]"}]}], "}"}], "&"}], "/@", RowBox[{"ChemicalData", "[", "\"\\"", "]"}]}], ",", RowBox[{"{", RowBox[{"_", ",", RowBox[{"{", "}"}]}], "}"}]}], "]"}]], "Input",ExpressionUUID->"caada561-\ 3658-4b78-b680-a4f3580eb1f4"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\<\"Methane\"\>", ",", RowBox[{"{", RowBox[{"\<\"Star\"\>", ",", "5"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\<\"Ethane\"\>", ",", RowBox[{"{", RowBox[{"8", ",", "49"}], "}"}]}], "}"}]}], "}"}]], "Output",ExpressionU\ UID->"751db27a-5c87-455a-9c2d-c7172d9bda26"] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"CentralAlkane", "[", "n_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"r", "=", RowBox[{"Range", "[", "n", "]"}]}], ",", RowBox[{"s", "=", "1.5"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"Graph", "[", RowBox[{ RowBox[{"List", "/@", RowBox[{"Join", "[", RowBox[{ RowBox[{"Partition", "[", RowBox[{"r", ",", "2", ",", "1"}], "]"}], ",", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"#", ",", RowBox[{"#", "+", "n"}]}], "}"}], "&"}], "/@", "r"}], ",", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"#", ",", RowBox[{"#", "+", RowBox[{"2", "n"}]}]}], "}"}], "&"}], "/@", "r"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n", ",", RowBox[{ RowBox[{"3", "n"}], "+", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", RowBox[{ RowBox[{"3", "n"}], "+", "1"}]}], "}"}]}], "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"List", "/@", RowBox[{"Join", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"0", ",", "#"}], "}"}], "&"}], "/@", "r"}], ",", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "s"}], ",", "#"}], "}"}], "&"}], "/@", "r"}], ",", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"s", ",", "#"}], "}"}], "&"}], "/@", "r"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", RowBox[{"1", "-", "s"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"n", "+", "s"}]}], "}"}]}], "}"}]}], "]"}]}]}], "]"}]}], "\[IndentingNewLine]", "]"}]}]], "Input",ExpressionUUID->"0400fbe1-8029-\ 4870-b04a-e5270fa65252"], Cell[CellGroupData[{ Cell["Ethane", "Subsubsection",ExpressionUUID->"501de846-ea13-4082-89ad-3802aa42b9b7"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ShowGraph", "[", RowBox[{ RowBox[{"CentralAlkane", "[", "2", "]"}], ",", RowBox[{"ImageSize", "\[Rule]", "100"}]}], "]"}]], "Input",ExpressionUUID->\ "8df9843d-d249-403c-9c99-43686dbeabe3"], Cell[BoxData[ GraphicsBox[{{ {GrayLevel[0], Thickness[0.005], LineBox[{{0.30000000000000004`, 0.5}, {0.30000000000000004`, 0.7000000000000001}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.30000000000000004`, 0.5}, {0., 0.5}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.30000000000000004`, 0.7000000000000001}, {0., 0.7000000000000001}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.30000000000000004`, 0.5}, {0.6000000000000001, 0.5}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.30000000000000004`, 0.7000000000000001}, {0.6000000000000001, 0.7000000000000001}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.30000000000000004`, 0.7000000000000001}, { 0.30000000000000004`, 1.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.30000000000000004`, 0.5}, {0.30000000000000004`, 0.2}}], {GrayLevel[0]}}}, { {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}}}, AlignmentPoint->Center, AspectRatio->Automatic, Axes->False, AxesLabel->None, AxesOrigin->Automatic, AxesStyle->{}, Background->None, BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->Automatic, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->100, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->All, PlotRangeClipping->False, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->Automatic, TicksStyle->{}]], "Output",ExpressionUUID->"9d0df815-d3ed-4b4b-a18f-\ fef877a8e9b2"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Position", "[", RowBox[{ RowBox[{"CanonicalForm", "/@", RowBox[{"Trees", "[", "8", "]"}]}], ",", RowBox[{"CanonicalForm", "[", RowBox[{"CentralAlkane", "[", "2", "]"}], "]"}]}], "]"}]], "Input",Express\ ionUUID->"7260a402-56da-4dcc-b153-cd8c10f28a97"], Cell[BoxData[ RowBox[{"{", RowBox[{"{", "22", "}"}], "}"}]], "Output",ExpressionUUID->"328a11ca-a9b9-4acd-a989-2175e63ca693"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Trees", "[", "8", "]"}], "[", RowBox[{"[", "22", "]"}], "]"}], "//", "ShowGraph"}]], "Input",ExpressionUU\ ID->"9451ea68-2a0c-4ad3-bbeb-68535636acc0"], Cell[BoxData[ GraphicsBox[{{ {GrayLevel[0], Thickness[0.005], LineBox[{{0.6000000000000001, 0.6000000000000001}, {0.6000000000000001, 0.4}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.6000000000000001, 0.4}, {0.2, 0.2}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.6000000000000001, 0.4}, {0.6000000000000001, 0.2}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.6000000000000001, 0.4}, {1., 0.2}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.2, 0.2}, {0.0666666666666667, 0.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.2, 0.2}, {0.2, 0.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.2, 0.2}, {0.33333333333333337`, 0.}}], {GrayLevel[0]}}}, { {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}}}, AlignmentPoint->Center, AspectRatio->Automatic, Axes->False, AxesLabel->None, AxesOrigin->Automatic, AxesStyle->{}, Background->None, BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->Automatic, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->Automatic, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->All, PlotRangeClipping->False, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->Automatic, TicksStyle->{}]], "Output",ExpressionUUID->"3cba153c-2d7f-4a9c-9eb2-\ f56e5ef3ee26"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PadVertices", "[", RowBox[{"ToCommonEdges", "[", RowBox[{ RowBox[{"CentralAlkane", "[", "2", "]"}], ",", RowBox[{"Graph", "[", "\"\\"", "]"}]}], "]"}], "]"}]], "Input",Ex\ pressionUUID->"e70b5bc8-61ee-40a6-a679-3f73cca14cfd"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"-1.5000\"\>", -1.5, AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"1.0000\"\>", 1., AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"1.5000\"\>", 1.5, AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"1.0000\"\>", 1., AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"0.0000\"\>", 0, Editable->False], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"-0.5000\"\>", -0.5, AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"-1.5000\"\>", -1.5, AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"2.0000\"\>", 2., AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"1.5000\"\>", 1.5, AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"2.0000\"\>", 2., AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"0.0000\"\>", 0, Editable->False], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"3.5000\"\>", 3.5, AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"0.0000\"\>", 0, Editable->False], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"1.0000\"\>", 1., AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"0.0000\"\>", 0, Editable->False], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"2.0000\"\>", 2., AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}]}], "}"}]], "Output",ExpressionUUID->"714fe8e7-1e5d-44f7-bf03-fbdef7da8214"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Propane", "Subsubsection",ExpressionUUID->"2d495978-4f88-480a-9f79-b6f14bf010e7"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ShowGraph", "[", RowBox[{ RowBox[{"CentralAlkane", "[", "3", "]"}], ",", RowBox[{"ImageSize", "\[Rule]", "100"}]}], "]"}]], "Input",ExpressionUUID->\ "ac7f5314-360c-4b1e-9f56-54e7b58043e8"], Cell[BoxData[ GraphicsBox[{{ {GrayLevel[0], Thickness[0.005], LineBox[{{0.25, 0.41666666666666663`}, {0.25, 0.5833333333333333}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.25, 0.5833333333333333}, {0.25, 0.75}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.25, 0.41666666666666663`}, {0., 0.41666666666666663`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.25, 0.5833333333333333}, {0., 0.5833333333333333}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.25, 0.75}, {0., 0.75}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.25, 0.41666666666666663`}, {0.5, 0.41666666666666663`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.25, 0.5833333333333333}, {0.5, 0.5833333333333333}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.25, 0.75}, {0.5, 0.75}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.25, 0.75}, {0.25, 1.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.25, 0.41666666666666663`}, {0.25, 0.16666666666666666`}}], {GrayLevel[0]}}}, { {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}}}, AlignmentPoint->Center, AspectRatio->Automatic, Axes->False, AxesLabel->None, AxesOrigin->Automatic, AxesStyle->{}, Background->None, BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->Automatic, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->100, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->All, PlotRangeClipping->False, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->Automatic, TicksStyle->{}]], "Output",ExpressionUUID->"992990d5-dec9-4160-9317-\ bf328412c31a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Position", "[", RowBox[{ RowBox[{"CanonicalForm", "/@", RowBox[{"Trees", "[", "11", "]"}]}], ",", RowBox[{"CanonicalForm", "[", RowBox[{"CentralAlkane", "[", "3", "]"}], "]"}]}], "]"}]], "Input",Express\ ionUUID->"68523049-6b19-41ec-8a96-5730137c4a8f"], Cell[BoxData[ RowBox[{"{", RowBox[{"{", "231", "}"}], "}"}]], "Output",ExpressionUUID->"d1c9e43f-b143-4976-8fca-83b931d600d8"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Trees", "[", "11", "]"}], "[", RowBox[{"[", "231", "]"}], "]"}], "//", "ShowGraph"}]], "Input",ExpressionU\ UID->"1fec1bb1-2e81-4703-9e71-3f0ecce0199e"], Cell[BoxData[ GraphicsBox[{{ {GrayLevel[0], Thickness[0.005], LineBox[{{0.6000000000000001, 0.6000000000000001}, {0.6000000000000001, 0.45000000000000007`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.6000000000000001, 0.45000000000000007`}, { 0.20000000000000004`, 0.30000000000000004`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.6000000000000001, 0.45000000000000007`}, {0.6000000000000001, 0.30000000000000004`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.6000000000000001, 0.45000000000000007`}, {1., 0.30000000000000004`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.20000000000000004`, 0.30000000000000004`}, { 0.06666666666666671, 0.15000000000000002`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.20000000000000004`, 0.30000000000000004`}, { 0.20000000000000004`, 0.15000000000000002`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.20000000000000004`, 0.30000000000000004`}, { 0.33333333333333337`, 0.15000000000000002`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.06666666666666671, 0.15000000000000002`}, { 0.022222222222222258`, 0.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.06666666666666671, 0.15000000000000002`}, { 0.06666666666666671, 0.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.06666666666666671, 0.15000000000000002`}, { 0.11111111111111116`, 0.}}], {GrayLevel[0]}}}, { {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}}}, AlignmentPoint->Center, AspectRatio->Automatic, Axes->False, AxesLabel->None, AxesOrigin->Automatic, AxesStyle->{}, Background->None, BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->Automatic, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->Automatic, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->All, PlotRangeClipping->False, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->Automatic, TicksStyle->{}]], "Output",ExpressionUUID->"1776d107-0822-4943-a3d2-\ 7e16dfa0eb23"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PadVertices", "[", RowBox[{"ToCommonEdges", "[", RowBox[{ RowBox[{"CentralAlkane", "[", "3", "]"}], ",", RowBox[{ RowBox[{"Trees", "[", "11", "]"}], "[", RowBox[{"[", "231", "]"}], "]"}]}], "]"}], "]"}]], "Input",ExpressionUUID\ ->"6990f0dc-8d3e-493b-88b3-95f7c5bf4bdc"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"-1.5000\"\>", -1.5, AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"1.0000\"\>", 1., AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"0.0000\"\>", 0, Editable->False], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"1.0000\"\>", 1., AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"0.0000\"\>", 0, Editable->False], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"2.0000\"\>", 2., AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"0.0000\"\>", 0, Editable->False], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"3.0000\"\>", 3., AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"-1.5000\"\>", -1.5, AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"3.0000\"\>", 3., AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"1.5000\"\>", 1.5, AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"3.0000\"\>", 3., AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"0.0000\"\>", 0, Editable->False], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"4.5000\"\>", 4.5, AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"-1.5000\"\>", -1.5, AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"2.0000\"\>", 2., AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"1.5000\"\>", 1.5, AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"2.0000\"\>", 2., AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"1.5000\"\>", 1.5, AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"1.0000\"\>", 1., AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ InterpretationBox["\<\"0.0000\"\>", 0, Editable->False], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ], ",", TagBox[ InterpretationBox["\<\"-0.5000\"\>", -0.5, AutoDelete->True], NumberForm[#, {5, 4}, NumberPadding -> {"", "0"}]& ]}], "}"}]}], "}"}]], "Output",ExpressionUUID->"a0056831-f9f9-43a6-86a6-6b664fdd44ac"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Butane", "Subsubsection",ExpressionUUID->"714d6eb3-f833-4564-a06a-ebd4c9e5ff97"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ShowGraph", "[", RowBox[{ RowBox[{"CentralAlkane", "[", "4", "]"}], ",", RowBox[{"ImageSize", "\[Rule]", "100"}]}], "]"}]], "Input",ExpressionUUID->\ "df056351-0821-40a7-b136-7f3773bb152d"], Cell[BoxData[ GraphicsBox[{{ {GrayLevel[0], Thickness[0.005], LineBox[{{0.21428571428571427`, 0.3571428571428571}, { 0.21428571428571427`, 0.5}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.21428571428571427`, 0.5}, {0.21428571428571427`, 0.6428571428571428}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.21428571428571427`, 0.6428571428571428}, { 0.21428571428571427`, 0.7857142857142857}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.21428571428571427`, 0.3571428571428571}, {0., 0.3571428571428571}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.21428571428571427`, 0.5}, {0., 0.5}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.21428571428571427`, 0.6428571428571428}, {0., 0.6428571428571428}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.21428571428571427`, 0.7857142857142857}, {0., 0.7857142857142857}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.21428571428571427`, 0.3571428571428571}, { 0.42857142857142855`, 0.3571428571428571}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.21428571428571427`, 0.5}, {0.42857142857142855`, 0.5}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.21428571428571427`, 0.6428571428571428}, { 0.42857142857142855`, 0.6428571428571428}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.21428571428571427`, 0.7857142857142857}, { 0.42857142857142855`, 0.7857142857142857}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.21428571428571427`, 0.7857142857142857}, { 0.21428571428571427`, 1.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.21428571428571427`, 0.3571428571428571}, { 0.21428571428571427`, 0.14285714285714285`}}], {GrayLevel[0]}}}, { {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}}}, AlignmentPoint->Center, AspectRatio->Automatic, Axes->False, AxesLabel->None, AxesOrigin->Automatic, AxesStyle->{}, Background->None, BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->Automatic, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->100, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->All, PlotRangeClipping->False, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->Automatic, TicksStyle->{}]], "Output",ExpressionUUID->"5a33de46-ca3d-47e8-aa7d-\ 1ad8103a5e39"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Position", "[", RowBox[{ RowBox[{"CanonicalForm", "/@", RowBox[{"Trees", "[", "14", "]"}]}], ",", RowBox[{"CanonicalForm", "[", RowBox[{"CentralAlkane", "[", "4", "]"}], "]"}]}], "]"}]], "Input",Express\ ionUUID->"5073cb5b-6a34-4c48-a2bf-a22e24b685e4"], Cell[BoxData[ RowBox[{"{", RowBox[{"{", "68", "}"}], "}"}]], "Output",ExpressionUUID->"aca5223b-bf2f-4322-96e9-b9087500177d"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Trees", "[", "14", "]"}], "[", RowBox[{"[", "68", "]"}], "]"}], "//", "ShowGraph"}]], "Input",ExpressionUU\ ID->"a66aa04e-aebb-44ce-ab13-d8f080cbd4af"], Cell[BoxData[ GraphicsBox[{{ {GrayLevel[0], Thickness[0.005], LineBox[{{0.6521739130434783, 0.6521739130434783}, {0.6521739130434783, 0.5217391304347826}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.6521739130434783, 0.5217391304347826}, {0.30434782608695654`, 0.3913043478260869}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.6521739130434783, 0.5217391304347826}, {0.6521739130434783, 0.3913043478260869}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.6521739130434783, 0.5217391304347826}, {0.9999999999999999, 0.3913043478260869}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.30434782608695654`, 0.3913043478260869}, {0.1884057971014493, 0.2608695652173913}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.30434782608695654`, 0.3913043478260869}, { 0.30434782608695654`, 0.2608695652173913}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1884057971014493, 0.2608695652173913}, {0.14975845410628022`, 0.13043478260869565`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1884057971014493, 0.2608695652173913}, {0.1884057971014493, 0.13043478260869565`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1884057971014493, 0.2608695652173913}, {0.22705314009661837`, 0.13043478260869565`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.14975845410628022`, 0.13043478260869565`}, { 0.13687600644122386`, 0.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.14975845410628022`, 0.13043478260869565`}, { 0.14975845410628022`, 0.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.14975845410628022`, 0.13043478260869565`}, { 0.16264090177133658`, 0.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.30434782608695654`, 0.3913043478260869}, { 0.42028985507246375`, 0.2608695652173913}}], {GrayLevel[0]}}}, { {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}}}, AlignmentPoint->Center, AspectRatio->Automatic, Axes->False, AxesLabel->None, AxesOrigin->Automatic, AxesStyle->{}, Background->None, BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->Automatic, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->Automatic, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->All, PlotRangeClipping->False, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->Automatic, TicksStyle->{}]], "Output",ExpressionUUID->"0c294a9a-eb9d-48d2-9f79-\ a0e8ecb6172e"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"GraphDataString", "[", RowBox[{ RowBox[{"CentralAlkane", "[", "4", "]"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", "\"\<14-tree 68\>\"", "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{"{", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{"14", ",", "68"}], "}"}]}], "}"}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"Debug", "\[Rule]", "True"}]}], "\[IndentingNewLine]", "]"}]], "Input",ExpressionUUID->"f20f4c61-d358-4aaf-8ae7-150de23d9753"], Cell[BoxData["\<\"RawGraphData[\\\"Butane\\\",\\\"Name\\\"]:=\\\"butane\\\"\\\ nRawGraphData[\\\"Butane\\\",\\\"AlternateStandardNames\\\"]:={{\\\"Tree\\\",{\ 14,68}}}\\nRawGraphData[\\\"Butane\\\",\\\"AlternateNames\\\"]:={\\\"14-tree \ 68\\\"}\\nRawGraphData[\\\"Butane\\\",\\\"CanonicalForm\\\"]:={{2097152},{\ 2097152},{2097152},{1048576},{1048576},{1048576},{262144},{262144},{524288},{\ 524288},{-536346624},{470024192},{14942208},{51904512}}\\nRawGraphData[\\\"\ Butane\\\",\\\"Notation\\\"]:=Missing[\\\"NotAvailable\\\"]\\nRawGraphData[\\\ \"Butane\\\",\\\"Information\\\"]:=Missing[\\\"NotAvailable\\\"]\\\ nRawGraphData[\\\"Butane\\\",\\\"VertexCount\\\"]:=14\\nRawGraphData[\\\"\ Butane\\\",\\\"VertexCoordinates\\\"]:=\\!\\({\\(\\({\\*TagBox[\ InterpretationBox[\\\"\\\\\\\"0.0000\\\\\\\"\\\",0,Rule[Editable,False]],\ Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\ \"]]]]],\\*TagBox[InterpretationBox[\\\"\\\\\\\"1.0000\\\\\\\"\\\",1.`,Rule[\ AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,\ List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*TagBox[InterpretationBox[\\\"\\\ \\\\\"0.0000\\\\\\\"\\\",0,Rule[Editable,False]],Function[NumberForm[Slot[1],\ List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[\ InterpretationBox[\\\"\\\\\\\"2.0000\\\\\\\"\\\",2.`,Rule[AutoDelete,True]],\ Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\ \"]]]]]}\\)\\),\\(\\({\\*TagBox[InterpretationBox[\\\"\\\\\\\"0.0000\\\\\\\"\\\ \",0,Rule[Editable,False]],Function[NumberForm[Slot[1],List[5,4],Rule[\ NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[InterpretationBox[\\\"\\\ \\\\\"3.0000\\\\\\\"\\\",3.`,Rule[AutoDelete,True]],Function[NumberForm[Slot[\ 1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*\ TagBox[InterpretationBox[\\\"\\\\\\\"0.0000\\\\\\\"\\\",0,Rule[Editable,False]\ ],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"\ 0\\\"]]]]],\\*TagBox[InterpretationBox[\\\"\\\\\\\"4.0000\\\\\\\"\\\",4.`,\ Rule[AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[\ NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*TagBox[\ InterpretationBox[\\\"\\\\\\\"-1.5000\\\\\\\"\\\",-1.5`,Rule[AutoDelete,True]]\ ,Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\ \\\"]]]]],\\*TagBox[InterpretationBox[\\\"\\\\\\\"1.0000\\\\\\\"\\\",1.`,Rule[\ AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,\ List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*TagBox[InterpretationBox[\\\"\\\ \\\\\"-1.5000\\\\\\\"\\\",-1.5`,Rule[AutoDelete,True]],Function[NumberForm[\ Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[\ InterpretationBox[\\\"\\\\\\\"2.0000\\\\\\\"\\\",2.`,Rule[AutoDelete,True]],\ Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\ \"]]]]]}\\)\\),\\(\\({\\*TagBox[InterpretationBox[\\\"\\\\\\\"-1.5000\\\\\\\"\ \\\",-1.5`,Rule[AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[\ NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[InterpretationBox[\\\"\\\ \\\\\"3.0000\\\\\\\"\\\",3.`,Rule[AutoDelete,True]],Function[NumberForm[Slot[\ 1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*\ TagBox[InterpretationBox[\\\"\\\\\\\"-1.5000\\\\\\\"\\\",-1.5`,Rule[\ AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,\ List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[InterpretationBox[\\\"\\\\\\\"4.0000\\\ \\\\\"\\\",4.`,Rule[AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],\ Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*TagBox[\ InterpretationBox[\\\"\\\\\\\"1.5000\\\\\\\"\\\",1.5`,Rule[AutoDelete,True]],\ Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\ \"]]]]],\\*TagBox[InterpretationBox[\\\"\\\\\\\"1.0000\\\\\\\"\\\",1.`,Rule[\ AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,\ List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*TagBox[InterpretationBox[\\\"\\\ \\\\\"1.5000\\\\\\\"\\\",1.5`,Rule[AutoDelete,True]],Function[NumberForm[Slot[\ 1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[\ InterpretationBox[\\\"\\\\\\\"2.0000\\\\\\\"\\\",2.`,Rule[AutoDelete,True]],\ Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\ \"]]]]]}\\)\\),\\(\\({\\*TagBox[InterpretationBox[\\\"\\\\\\\"1.5000\\\\\\\"\\\ \",1.5`,Rule[AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[\ NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[InterpretationBox[\\\"\\\ \\\\\"3.0000\\\\\\\"\\\",3.`,Rule[AutoDelete,True]],Function[NumberForm[Slot[\ 1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*\ TagBox[InterpretationBox[\\\"\\\\\\\"1.5000\\\\\\\"\\\",1.5`,Rule[AutoDelete,\ True]],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\ \\\"0\\\"]]]]],\\*TagBox[InterpretationBox[\\\"\\\\\\\"4.0000\\\\\\\"\\\",4.`,\ Rule[AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[\ NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*TagBox[\ InterpretationBox[\\\"\\\\\\\"0.0000\\\\\\\"\\\",0,Rule[Editable,False]],\ Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\ \"]]]]],\\*TagBox[InterpretationBox[\\\"\\\\\\\"-0.5000\\\\\\\"\\\",-0.5`,\ Rule[AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[\ NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*TagBox[\ InterpretationBox[\\\"\\\\\\\"0.0000\\\\\\\"\\\",0,Rule[Editable,False]],\ Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\ \"]]]]],\\*TagBox[InterpretationBox[\\\"\\\\\\\"5.5000\\\\\\\"\\\",5.5`,Rule[\ AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,\ List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\)}\\)\\nRawGraphData[\\\"Butane\\\",\\\"\ AlternateVertexCoordinates\\\"]:=\\!\\({}\\)\\nRawGraphData[\\\"Butane\\\",\\\ \"EdgeCount\\\"]:=13\\nRawGraphData[\\\"Butane\\\",\\\"EdgeIndices\\\"]:={{1,\ 2},{1,5},{1,9},{1,13},{2,3},{2,6},{2,10},{3,4},{3,7},{3,11},{4,8},{4,12},{4,\ 14}}\\nRawGraphData[\\\"Butane\\\",\\\"AdjacencyMatrix\\\"]:=SparseArray[\ Automatic,{14,14},0,{1,{{0,4,8,12,16,17,18,19,20,21,22,23,24,25,26},{{2},{5},{\ 9},{13},{1},{3},{6},{10},{2},{4},{7},{11},{3},{8},{12},{14},{1},{2},{3},{4},{\ 1},{2},{3},{4},{1},{4}}},{1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1}\ }]\\nRawGraphData[\\\"Butane\\\",\\\"IncidenceMatrix\\\"]:=SparseArray[\ Automatic,{14,13},0,{1,{{0,4,8,12,16,17,18,19,20,21,22,23,24,25,26},{{1},{4},{\ 8},{13},{1},{2},{5},{9},{2},{3},{6},{10},{3},{7},{11},{12},{4},{5},{6},{7},{8}\ ,{9},{10},{11},{13},{12}}},{1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,\ 1}}]\\nRawGraphData[\\\"Butane\\\",\\\"LaplacianMatrix\\\"]:=SparseArray[\ Automatic,{14,14},0,{1,{{0,5,10,15,20,22,24,26,28,30,32,34,36,38,40},{{1},{2},\ {5},{9},{13},{1},{2},{3},{6},{10},{2},{3},{4},{7},{11},{3},{4},{8},{12},{14},{\ 1},{5},{2},{6},{3},{7},{4},{8},{1},{9},{2},{10},{3},{11},{4},{12},{1},{13},{4}\ ,{14}}},{4,-1,-1,-1,-1,-1,4,-1,-1,-1,-1,4,-1,-1,-1,-1,4,-1,-1,-1,-1,1,-1,1,-1,\ 1,-1,1,-1,1,-1,1,-1,1,-1,1,-1,1,-1,1}}]\\nRawGraphData[\\\"Butane\\\",\\\"\ NormalizedLaplacianMatrix\\\"]:=SparseArray[Automatic,{14,14},0,{1,{{0,5,10,\ 15,20,22,24,26,28,30,32,34,36,38,40},{{1},{2},{5},{9},{13},{1},{2},{3},{6},{\ 10},{2},{3},{4},{7},{11},{3},{4},{8},{12},{14},{1},{5},{2},{6},{3},{7},{4},{8}\ ,{1},{9},{2},{10},{3},{11},{4},{12},{1},{13},{4},{14}}},{1,-1/4,-1/2,-1/2,-1/\ 2,-1/4,1,-1/4,-1/2,-1/2,-1/4,1,-1/4,-1/2,-1/2,-1/4,1,-1/2,-1/2,-1/2,-1/2,1,-1/\ 2,1,-1/2,1,-1/2,1,-1/2,1,-1/2,1,-1/2,1,-1/2,1,-1/2,1,-1/2,1}}]\\nRawGraphData[\ \\\"Butane\\\",\\\"DistanceMatrix\\\"]:=SparseArray[Automatic,{14,14},0,{1,{{\ 0,13,26,39,52,65,78,91,104,117,130,143,156,169,182},{{2},{3},{4},{5},{6},{7},{\ 8},{9},{10},{11},{12},{13},{14},{1},{3},{4},{5},{6},{7},{8},{9},{10},{11},{12}\ ,{13},{14},{1},{2},{4},{5},{6},{7},{8},{9},{10},{11},{12},{13},{14},{1},{2},{\ 3},{5},{6},{7},{8},{9},{10},{11},{12},{13},{14},{1},{2},{3},{4},{6},{7},{8},{\ 9},{10},{11},{12},{13},{14},{1},{2},{3},{4},{5},{7},{8},{9},{10},{11},{12},{\ 13},{14},{1},{2},{3},{4},{5},{6},{8},{9},{10},{11},{12},{13},{14},{1},{2},{3},\ {4},{5},{6},{7},{9},{10},{11},{12},{13},{14},{1},{2},{3},{4},{5},{6},{7},{8},{\ 10},{11},{12},{13},{14},{1},{2},{3},{4},{5},{6},{7},{8},{9},{11},{12},{13},{\ 14},{1},{2},{3},{4},{5},{6},{7},{8},{9},{10},{12},{13},{14},{1},{2},{3},{4},{\ 5},{6},{7},{8},{9},{10},{11},{13},{14},{1},{2},{3},{4},{5},{6},{7},{8},{9},{\ 10},{11},{12},{14},{1},{2},{3},{4},{5},{6},{7},{8},{9},{10},{11},{12},{13}}},{\ 1,2,3,1,2,3,4,1,2,3,4,1,4,1,1,2,2,1,2,3,2,1,2,3,2,3,2,1,1,3,2,1,2,3,2,1,2,3,2,\ 3,2,1,4,3,2,1,4,3,2,1,4,1,1,2,3,4,3,4,5,2,3,4,5,2,5,2,1,2,3,3,3,4,3,2,3,4,3,4,\ 3,2,1,2,4,3,3,4,3,2,3,4,3,4,3,2,1,5,4,3,5,4,3,2,5,2,1,2,3,4,2,3,4,5,3,4,5,2,5,\ 2,1,2,3,3,2,3,4,3,3,4,3,4,3,2,1,2,4,3,2,3,4,3,3,4,3,4,3,2,1,5,4,3,2,5,4,3,5,2,\ 1,2,3,4,2,3,4,5,2,3,4,5,5,4,3,2,1,5,4,3,2,5,4,3,2,5}}]\\nRawGraphData[\\\"\ Butane\\\",\\\"Classes\\\"]:={\\\"Bicolorable\\\",\\\"Bipartite\\\",\\\"\ Bridged\\\",\\\"Caterpillar\\\",\\\"Class1\\\",\\\"Connected\\\",\\\"Perfect\\\ \",\\\"Planar\\\",\\\"SquareFree\\\",\\\"Tree\\\",\\\"TriangleFree\\\"}\\\ nRawGraphData[\\\"Butane\\\",\\\"NotationRules\\\"]:={}\\nRawGraphData[\\\"\ Butane\\\",\\\"DualGraphName\\\"]:=Missing[\\\"NotAvailable\\\"]\\\ nRawGraphData[\\\"Butane\\\",\\\"LineGraphName\\\"]:=Missing[\\\"NotAvailable\ \\\"]\\nRawGraphData[\\\"Butane\\\",\\\"ComplementGraphName\\\"]:=Missing[\\\"\ NotAvailable\\\"]\\nRawGraphData[\\\"Butane\\\",\\\"PolyhedralEmbeddings\\\"]:\ ={}\\nRawGraphData[\\\"Butane\\\",\\\"Girth\\\"]:=Infinity\\nRawGraphData[\\\"\ Butane\\\",\\\"Eccentricities\\\"]:={4,3,3,4,5,4,4,5,5,4,4,5,5,5}\\\ nRawGraphData[\\\"Butane\\\",\\\"Diameter\\\"]:=5\\nRawGraphData[\\\"Butane\\\ \",\\\"Radius\\\"]:=3\\nRawGraphData[\\\"Butane\\\",\\\"Automorphisms\\\"]:={{\ 1,2,3,4,5,6,7,8,9,10,11,12,13,14},{1,2,3,4,5,6,7,8,9,10,11,14,13,12},{1,2,3,4,\ 5,6,7,8,13,10,11,12,9,14},{1,2,3,4,5,6,7,8,13,10,11,14,9,12},{1,2,3,4,5,6,7,\ 12,9,10,11,8,13,14},{1,2,3,4,5,6,7,12,9,10,11,14,13,8},{1,2,3,4,5,6,7,12,13,\ 10,11,8,9,14},{1,2,3,4,5,6,7,12,13,10,11,14,9,8},{1,2,3,4,5,6,7,14,9,10,11,8,\ 13,12},{1,2,3,4,5,6,7,14,9,10,11,12,13,8},{1,2,3,4,5,6,7,14,13,10,11,8,9,12},{\ 1,2,3,4,5,6,7,14,13,10,11,12,9,8},{1,2,3,4,5,6,11,8,9,10,7,12,13,14},{1,2,3,4,\ 5,6,11,8,9,10,7,14,13,12},{1,2,3,4,5,6,11,8,13,10,7,12,9,14},{1,2,3,4,5,6,11,\ 8,13,10,7,14,9,12},{1,2,3,4,5,6,11,12,9,10,7,8,13,14},{1,2,3,4,5,6,11,12,9,10,\ 7,14,13,8},{1,2,3,4,5,6,11,12,13,10,7,8,9,14},{1,2,3,4,5,6,11,12,13,10,7,14,9,\ 8},{1,2,3,4,5,6,11,14,9,10,7,8,13,12},{1,2,3,4,5,6,11,14,9,10,7,12,13,8},{1,2,\ 3,4,5,6,11,14,13,10,7,8,9,12},{1,2,3,4,5,6,11,14,13,10,7,12,9,8},{1,2,3,4,5,\ 10,7,8,9,6,11,12,13,14},{1,2,3,4,5,10,7,8,9,6,11,14,13,12},{1,2,3,4,5,10,7,8,\ 13,6,11,12,9,14},{1,2,3,4,5,10,7,8,13,6,11,14,9,12},{1,2,3,4,5,10,7,12,9,6,11,\ 8,13,14},{1,2,3,4,5,10,7,12,9,6,11,14,13,8},{1,2,3,4,5,10,7,12,13,6,11,8,9,14}\ ,{1,2,3,4,5,10,7,12,13,6,11,14,9,8},{1,2,3,4,5,10,7,14,9,6,11,8,13,12},{1,2,3,\ 4,5,10,7,14,9,6,11,12,13,8},{1,2,3,4,5,10,7,14,13,6,11,8,9,12},{1,2,3,4,5,10,\ 7,14,13,6,11,12,9,8},{1,2,3,4,5,10,11,8,9,6,7,12,13,14},{1,2,3,4,5,10,11,8,9,\ 6,7,14,13,12},{1,2,3,4,5,10,11,8,13,6,7,12,9,14},{1,2,3,4,5,10,11,8,13,6,7,14,\ 9,12},{1,2,3,4,5,10,11,12,9,6,7,8,13,14},{1,2,3,4,5,10,11,12,9,6,7,14,13,8},{\ 1,2,3,4,5,10,11,12,13,6,7,8,9,14},{1,2,3,4,5,10,11,12,13,6,7,14,9,8},{1,2,3,4,\ 5,10,11,14,9,6,7,8,13,12},{1,2,3,4,5,10,11,14,9,6,7,12,13,8},{1,2,3,4,5,10,11,\ 14,13,6,7,8,9,12},{1,2,3,4,5,10,11,14,13,6,7,12,9,8},{1,2,3,4,9,6,7,8,5,10,11,\ 12,13,14},{1,2,3,4,9,6,7,8,5,10,11,14,13,12},{1,2,3,4,9,6,7,8,13,10,11,12,5,\ 14},{1,2,3,4,9,6,7,8,13,10,11,14,5,12},{1,2,3,4,9,6,7,12,5,10,11,8,13,14},{1,\ 2,3,4,9,6,7,12,5,10,11,14,13,8},{1,2,3,4,9,6,7,12,13,10,11,8,5,14},{1,2,3,4,9,\ 6,7,12,13,10,11,14,5,8},{1,2,3,4,9,6,7,14,5,10,11,8,13,12},{1,2,3,4,9,6,7,14,\ 5,10,11,12,13,8},{1,2,3,4,9,6,7,14,13,10,11,8,5,12},{1,2,3,4,9,6,7,14,13,10,\ 11,12,5,8},{1,2,3,4,9,6,11,8,5,10,7,12,13,14},{1,2,3,4,9,6,11,8,5,10,7,14,13,\ 12},{1,2,3,4,9,6,11,8,13,10,7,12,5,14},{1,2,3,4,9,6,11,8,13,10,7,14,5,12},{1,\ 2,3,4,9,6,11,12,5,10,7,8,13,14},{1,2,3,4,9,6,11,12,5,10,7,14,13,8},{1,2,3,4,9,\ 6,11,12,13,10,7,8,5,14},{1,2,3,4,9,6,11,12,13,10,7,14,5,8},{1,2,3,4,9,6,11,14,\ 5,10,7,8,13,12},{1,2,3,4,9,6,11,14,5,10,7,12,13,8},{1,2,3,4,9,6,11,14,13,10,7,\ 8,5,12},{1,2,3,4,9,6,11,14,13,10,7,12,5,8},{1,2,3,4,9,10,7,8,5,6,11,12,13,14},\ {1,2,3,4,9,10,7,8,5,6,11,14,13,12},{1,2,3,4,9,10,7,8,13,6,11,12,5,14},{1,2,3,\ 4,9,10,7,8,13,6,11,14,5,12},{1,2,3,4,9,10,7,12,5,6,11,8,13,14},{1,2,3,4,9,10,\ 7,12,5,6,11,14,13,8},{1,2,3,4,9,10,7,12,13,6,11,8,5,14},{1,2,3,4,9,10,7,12,13,\ 6,11,14,5,8},{1,2,3,4,9,10,7,14,5,6,11,8,13,12},{1,2,3,4,9,10,7,14,5,6,11,12,\ 13,8},{1,2,3,4,9,10,7,14,13,6,11,8,5,12},{1,2,3,4,9,10,7,14,13,6,11,12,5,8},{\ 1,2,3,4,9,10,11,8,5,6,7,12,13,14},{1,2,3,4,9,10,11,8,5,6,7,14,13,12},{1,2,3,4,\ 9,10,11,8,13,6,7,12,5,14},{1,2,3,4,9,10,11,8,13,6,7,14,5,12},{1,2,3,4,9,10,11,\ 12,5,6,7,8,13,14},{1,2,3,4,9,10,11,12,5,6,7,14,13,8},{1,2,3,4,9,10,11,12,13,6,\ 7,8,5,14},{1,2,3,4,9,10,11,12,13,6,7,14,5,8},{1,2,3,4,9,10,11,14,5,6,7,8,13,\ 12},{1,2,3,4,9,10,11,14,5,6,7,12,13,8},{1,2,3,4,9,10,11,14,13,6,7,8,5,12},{1,\ 2,3,4,9,10,11,14,13,6,7,12,5,8},{1,2,3,4,13,6,7,8,5,10,11,12,9,14},{1,2,3,4,\ 13,6,7,8,5,10,11,14,9,12},{1,2,3,4,13,6,7,8,9,10,11,12,5,14},{1,2,3,4,13,6,7,\ 8,9,10,11,14,5,12},{1,2,3,4,13,6,7,12,5,10,11,8,9,14},{1,2,3,4,13,6,7,12,5,10,\ 11,14,9,8},{1,2,3,4,13,6,7,12,9,10,11,8,5,14},{1,2,3,4,13,6,7,12,9,10,11,14,5,\ 8},{1,2,3,4,13,6,7,14,5,10,11,8,9,12},{1,2,3,4,13,6,7,14,5,10,11,12,9,8},{1,2,\ 3,4,13,6,7,14,9,10,11,8,5,12},{1,2,3,4,13,6,7,14,9,10,11,12,5,8},{1,2,3,4,13,\ 6,11,8,5,10,7,12,9,14},{1,2,3,4,13,6,11,8,5,10,7,14,9,12},{1,2,3,4,13,6,11,8,\ 9,10,7,12,5,14},{1,2,3,4,13,6,11,8,9,10,7,14,5,12},{1,2,3,4,13,6,11,12,5,10,7,\ 8,9,14},{1,2,3,4,13,6,11,12,5,10,7,14,9,8},{1,2,3,4,13,6,11,12,9,10,7,8,5,14},\ {1,2,3,4,13,6,11,12,9,10,7,14,5,8},{1,2,3,4,13,6,11,14,5,10,7,8,9,12},{1,2,3,\ 4,13,6,11,14,5,10,7,12,9,8},{1,2,3,4,13,6,11,14,9,10,7,8,5,12},{1,2,3,4,13,6,\ 11,14,9,10,7,12,5,8},{1,2,3,4,13,10,7,8,5,6,11,12,9,14},{1,2,3,4,13,10,7,8,5,\ 6,11,14,9,12},{1,2,3,4,13,10,7,8,9,6,11,12,5,14},{1,2,3,4,13,10,7,8,9,6,11,14,\ 5,12},{1,2,3,4,13,10,7,12,5,6,11,8,9,14},{1,2,3,4,13,10,7,12,5,6,11,14,9,8},{\ 1,2,3,4,13,10,7,12,9,6,11,8,5,14},{1,2,3,4,13,10,7,12,9,6,11,14,5,8},{1,2,3,4,\ 13,10,7,14,5,6,11,8,9,12},{1,2,3,4,13,10,7,14,5,6,11,12,9,8},{1,2,3,4,13,10,7,\ 14,9,6,11,8,5,12},{1,2,3,4,13,10,7,14,9,6,11,12,5,8},{1,2,3,4,13,10,11,8,5,6,\ 7,12,9,14},{1,2,3,4,13,10,11,8,5,6,7,14,9,12},{1,2,3,4,13,10,11,8,9,6,7,12,5,\ 14},{1,2,3,4,13,10,11,8,9,6,7,14,5,12},{1,2,3,4,13,10,11,12,5,6,7,8,9,14},{1,\ 2,3,4,13,10,11,12,5,6,7,14,9,8},{1,2,3,4,13,10,11,12,9,6,7,8,5,14},{1,2,3,4,\ 13,10,11,12,9,6,7,14,5,8},{1,2,3,4,13,10,11,14,5,6,7,8,9,12},{1,2,3,4,13,10,\ 11,14,5,6,7,12,9,8},{1,2,3,4,13,10,11,14,9,6,7,8,5,12},{1,2,3,4,13,10,11,14,9,\ 6,7,12,5,8},{4,3,2,1,8,7,6,5,12,11,10,9,14,13},{4,3,2,1,8,7,6,5,12,11,10,13,\ 14,9},{4,3,2,1,8,7,6,5,14,11,10,9,12,13},{4,3,2,1,8,7,6,5,14,11,10,13,12,9},{\ 4,3,2,1,8,7,6,9,12,11,10,5,14,13},{4,3,2,1,8,7,6,9,12,11,10,13,14,5},{4,3,2,1,\ 8,7,6,9,14,11,10,5,12,13},{4,3,2,1,8,7,6,9,14,11,10,13,12,5},{4,3,2,1,8,7,6,\ 13,12,11,10,5,14,9},{4,3,2,1,8,7,6,13,12,11,10,9,14,5},{4,3,2,1,8,7,6,13,14,\ 11,10,5,12,9},{4,3,2,1,8,7,6,13,14,11,10,9,12,5},{4,3,2,1,8,7,10,5,12,11,6,9,\ 14,13},{4,3,2,1,8,7,10,5,12,11,6,13,14,9},{4,3,2,1,8,7,10,5,14,11,6,9,12,13},{\ 4,3,2,1,8,7,10,5,14,11,6,13,12,9},{4,3,2,1,8,7,10,9,12,11,6,5,14,13},{4,3,2,1,\ 8,7,10,9,12,11,6,13,14,5},{4,3,2,1,8,7,10,9,14,11,6,5,12,13},{4,3,2,1,8,7,10,\ 9,14,11,6,13,12,5},{4,3,2,1,8,7,10,13,12,11,6,5,14,9},{4,3,2,1,8,7,10,13,12,\ 11,6,9,14,5},{4,3,2,1,8,7,10,13,14,11,6,5,12,9},{4,3,2,1,8,7,10,13,14,11,6,9,\ 12,5},{4,3,2,1,8,11,6,5,12,7,10,9,14,13},{4,3,2,1,8,11,6,5,12,7,10,13,14,9},{\ 4,3,2,1,8,11,6,5,14,7,10,9,12,13},{4,3,2,1,8,11,6,5,14,7,10,13,12,9},{4,3,2,1,\ 8,11,6,9,12,7,10,5,14,13},{4,3,2,1,8,11,6,9,12,7,10,13,14,5},{4,3,2,1,8,11,6,\ 9,14,7,10,5,12,13},{4,3,2,1,8,11,6,9,14,7,10,13,12,5},{4,3,2,1,8,11,6,13,12,7,\ 10,5,14,9},{4,3,2,1,8,11,6,13,12,7,10,9,14,5},{4,3,2,1,8,11,6,13,14,7,10,5,12,\ 9},{4,3,2,1,8,11,6,13,14,7,10,9,12,5},{4,3,2,1,8,11,10,5,12,7,6,9,14,13},{4,3,\ 2,1,8,11,10,5,12,7,6,13,14,9},{4,3,2,1,8,11,10,5,14,7,6,9,12,13},{4,3,2,1,8,\ 11,10,5,14,7,6,13,12,9},{4,3,2,1,8,11,10,9,12,7,6,5,14,13},{4,3,2,1,8,11,10,9,\ 12,7,6,13,14,5},{4,3,2,1,8,11,10,9,14,7,6,5,12,13},{4,3,2,1,8,11,10,9,14,7,6,\ 13,12,5},{4,3,2,1,8,11,10,13,12,7,6,5,14,9},{4,3,2,1,8,11,10,13,12,7,6,9,14,5}\ ,{4,3,2,1,8,11,10,13,14,7,6,5,12,9},{4,3,2,1,8,11,10,13,14,7,6,9,12,5},{4,3,2,\ 1,12,7,6,5,8,11,10,9,14,13},{4,3,2,1,12,7,6,5,8,11,10,13,14,9},{4,3,2,1,12,7,\ 6,5,14,11,10,9,8,13},{4,3,2,1,12,7,6,5,14,11,10,13,8,9},{4,3,2,1,12,7,6,9,8,\ 11,10,5,14,13},{4,3,2,1,12,7,6,9,8,11,10,13,14,5},{4,3,2,1,12,7,6,9,14,11,10,\ 5,8,13},{4,3,2,1,12,7,6,9,14,11,10,13,8,5},{4,3,2,1,12,7,6,13,8,11,10,5,14,9},\ {4,3,2,1,12,7,6,13,8,11,10,9,14,5},{4,3,2,1,12,7,6,13,14,11,10,5,8,9},{4,3,2,\ 1,12,7,6,13,14,11,10,9,8,5},{4,3,2,1,12,7,10,5,8,11,6,9,14,13},{4,3,2,1,12,7,\ 10,5,8,11,6,13,14,9},{4,3,2,1,12,7,10,5,14,11,6,9,8,13},{4,3,2,1,12,7,10,5,14,\ 11,6,13,8,9},{4,3,2,1,12,7,10,9,8,11,6,5,14,13},{4,3,2,1,12,7,10,9,8,11,6,13,\ 14,5},{4,3,2,1,12,7,10,9,14,11,6,5,8,13},{4,3,2,1,12,7,10,9,14,11,6,13,8,5},{\ 4,3,2,1,12,7,10,13,8,11,6,5,14,9},{4,3,2,1,12,7,10,13,8,11,6,9,14,5},{4,3,2,1,\ 12,7,10,13,14,11,6,5,8,9},{4,3,2,1,12,7,10,13,14,11,6,9,8,5},{4,3,2,1,12,11,6,\ 5,8,7,10,9,14,13},{4,3,2,1,12,11,6,5,8,7,10,13,14,9},{4,3,2,1,12,11,6,5,14,7,\ 10,9,8,13},{4,3,2,1,12,11,6,5,14,7,10,13,8,9},{4,3,2,1,12,11,6,9,8,7,10,5,14,\ 13},{4,3,2,1,12,11,6,9,8,7,10,13,14,5},{4,3,2,1,12,11,6,9,14,7,10,5,8,13},{4,\ 3,2,1,12,11,6,9,14,7,10,13,8,5},{4,3,2,1,12,11,6,13,8,7,10,5,14,9},{4,3,2,1,\ 12,11,6,13,8,7,10,9,14,5},{4,3,2,1,12,11,6,13,14,7,10,5,8,9},{4,3,2,1,12,11,6,\ 13,14,7,10,9,8,5},{4,3,2,1,12,11,10,5,8,7,6,9,14,13},{4,3,2,1,12,11,10,5,8,7,\ 6,13,14,9},{4,3,2,1,12,11,10,5,14,7,6,9,8,13},{4,3,2,1,12,11,10,5,14,7,6,13,8,\ 9},{4,3,2,1,12,11,10,9,8,7,6,5,14,13},{4,3,2,1,12,11,10,9,8,7,6,13,14,5},{4,3,\ 2,1,12,11,10,9,14,7,6,5,8,13},{4,3,2,1,12,11,10,9,14,7,6,13,8,5},{4,3,2,1,12,\ 11,10,13,8,7,6,5,14,9},{4,3,2,1,12,11,10,13,8,7,6,9,14,5},{4,3,2,1,12,11,10,\ 13,14,7,6,5,8,9},{4,3,2,1,12,11,10,13,14,7,6,9,8,5},{4,3,2,1,14,7,6,5,8,11,10,\ 9,12,13},{4,3,2,1,14,7,6,5,8,11,10,13,12,9},{4,3,2,1,14,7,6,5,12,11,10,9,8,13}\ ,{4,3,2,1,14,7,6,5,12,11,10,13,8,9},{4,3,2,1,14,7,6,9,8,11,10,5,12,13},{4,3,2,\ 1,14,7,6,9,8,11,10,13,12,5},{4,3,2,1,14,7,6,9,12,11,10,5,8,13},{4,3,2,1,14,7,\ 6,9,12,11,10,13,8,5},{4,3,2,1,14,7,6,13,8,11,10,5,12,9},{4,3,2,1,14,7,6,13,8,\ 11,10,9,12,5},{4,3,2,1,14,7,6,13,12,11,10,5,8,9},{4,3,2,1,14,7,6,13,12,11,10,\ 9,8,5},{4,3,2,1,14,7,10,5,8,11,6,9,12,13},{4,3,2,1,14,7,10,5,8,11,6,13,12,9},{\ 4,3,2,1,14,7,10,5,12,11,6,9,8,13},{4,3,2,1,14,7,10,5,12,11,6,13,8,9},{4,3,2,1,\ 14,7,10,9,8,11,6,5,12,13},{4,3,2,1,14,7,10,9,8,11,6,13,12,5},{4,3,2,1,14,7,10,\ 9,12,11,6,5,8,13},{4,3,2,1,14,7,10,9,12,11,6,13,8,5},{4,3,2,1,14,7,10,13,8,11,\ 6,5,12,9},{4,3,2,1,14,7,10,13,8,11,6,9,12,5},{4,3,2,1,14,7,10,13,12,11,6,5,8,\ 9},{4,3,2,1,14,7,10,13,12,11,6,9,8,5},{4,3,2,1,14,11,6,5,8,7,10,9,12,13},{4,3,\ 2,1,14,11,6,5,8,7,10,13,12,9},{4,3,2,1,14,11,6,5,12,7,10,9,8,13},{4,3,2,1,14,\ 11,6,5,12,7,10,13,8,9},{4,3,2,1,14,11,6,9,8,7,10,5,12,13},{4,3,2,1,14,11,6,9,\ 8,7,10,13,12,5},{4,3,2,1,14,11,6,9,12,7,10,5,8,13},{4,3,2,1,14,11,6,9,12,7,10,\ 13,8,5},{4,3,2,1,14,11,6,13,8,7,10,5,12,9},{4,3,2,1,14,11,6,13,8,7,10,9,12,5},\ {4,3,2,1,14,11,6,13,12,7,10,5,8,9},{4,3,2,1,14,11,6,13,12,7,10,9,8,5},{4,3,2,\ 1,14,11,10,5,8,7,6,9,12,13},{4,3,2,1,14,11,10,5,8,7,6,13,12,9},{4,3,2,1,14,11,\ 10,5,12,7,6,9,8,13},{4,3,2,1,14,11,10,5,12,7,6,13,8,9},{4,3,2,1,14,11,10,9,8,\ 7,6,5,12,13},{4,3,2,1,14,11,10,9,8,7,6,13,12,5},{4,3,2,1,14,11,10,9,12,7,6,5,\ 8,13},{4,3,2,1,14,11,10,9,12,7,6,13,8,5},{4,3,2,1,14,11,10,13,8,7,6,5,12,9},{\ 4,3,2,1,14,11,10,13,8,7,6,9,12,5},{4,3,2,1,14,11,10,13,12,7,6,5,8,9},{4,3,2,1,\ 14,11,10,13,12,7,6,9,8,5}}\\nRawGraphData[\\\"Butane\\\",\\\"\ AutomorphismCount\\\"]:=288\\nRawGraphData[\\\"Butane\\\",\\\"\ CharacteristicPolynomial\\\"]:=(-2+#1)#1^6(2+#1)(3-3#1^2+#1^3)(-3+3#1^2+#1^3)&\ \\nRawGraphData[\\\"Butane\\\",\\\"Spectrum\\\"]:={Root[-3+3#1^2+#1^3&,1,0],-\ 2,Root[-3+3#1^2+#1^3&,2,0],Root[3-3#1^2+#1^3&,1,0],0,0,0,0,0,0,Root[-3+3#1^2+#\ 1^3&,3,0],Root[3-3#1^2+#1^3&,2,0],2,Root[3-3#1^2+#1^3&,3,0]}\\nRawGraphData[\\\ \"Butane\\\",\\\"CospectralGraphNames\\\"]:={}\\nRawGraphData[\\\"Butane\\\",\ \\\"Degrees\\\"]:={4,4,4,4,1,1,1,1,1,1,1,1,1,1}\\nRawGraphData[\\\"Butane\\\",\ \\\"ChromaticNumber\\\"]:=2\\nRawGraphData[\\\"Butane\\\",\\\"\ EdgeConnectivity\\\"]:=1\\nRawGraphData[\\\"Butane\\\",\\\"VertexConnectivity\ \\\"]:=1\\nRawGraphData[\\\"Butane\\\",\\\"ChromaticPolynomial\\\"]:=(-1+#1)^\ 13#1&\\nRawGraphData[\\\"Butane\\\",\\\"EdgeChromaticNumber\\\"]:=4\\\ nRawGraphData[\\\"Butane\\\",\\\"IndependenceNumber\\\"]:=10\\nRawGraphData[\\\ \"Butane\\\",\\\"CliqueNumber\\\"]:=2\\nRawGraphData[\\\"Butane\\\",\\\"\ CrossingNumber\\\"]:=0\\nRawGraphData[\\\"Butane\\\",\\\"\ RectilinearCrossingNumber\\\"]:=0\\nRawGraphData[\\\"Butane\\\",\\\"\ ToroidalCrossingNumber\\\"]:=0\\nRawGraphData[\\\"Butane\\\",\\\"\ ProjectivePlaneCrossingNumber\\\"]:=0\\nRawGraphData[\\\"Butane\\\",\\\"\ ArticulationVertices\\\"]:={1,2,3,4}\\nRawGraphData[\\\"Butane\\\",\\\"\ Bridges\\\"]:={{4,8},{4,12},{4,14},{3,4},{3,7},{3,11},{2,3},{2,6},{2,10},{1,2}\ ,{1,5},{1,9},{1,13}}\\nRawGraphData[\\\"Butane\\\",\\\"HamiltonianPaths\\\"]:=\ {}\\nRawGraphData[\\\"Butane\\\",\\\"HamiltonianPathCount\\\"]:=0\\\ nRawGraphData[\\\"Butane\\\",\\\"HamiltonianCycles\\\"]:={}\\nRawGraphData[\\\ \"Butane\\\",\\\"HamiltonianCycleCount\\\"]:=0\\nRawGraphData[\\\"Butane\\\",\ \\\"Cycles\\\"]:={}\\nRawGraphData[\\\"Butane\\\",\\\"CycleCount\\\"]:=0\\n\\\ n\"\>"], "Output",ExpressionUUID->"2f5dc092-f0af-47e5-9d1f-5d2350e59375"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Isobutane", "Subsubsection",ExpressionUUID->"138c9da9-f6e7-488a-ba98-df22374a8629"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ShowLabeledGraph", "[", RowBox[{"isobutane", "=", RowBox[{"Graph", "[", RowBox[{ RowBox[{"List", "/@", RowBox[{"Sort", "/@", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "6"}], "}"}], ",", RowBox[{"{", RowBox[{"6", ",", "9"}], "}"}], ",", RowBox[{"{", RowBox[{"6", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"6", ",", "8"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"10", ",", "13"}], "}"}], ",", RowBox[{"{", RowBox[{"10", ",", "12"}], "}"}], ",", RowBox[{"{", RowBox[{"11", ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"14", ",", "1"}], "}"}]}], "}"}]}]}], ",", RowBox[{"List", "/@", RowBox[{"Join", "[", RowBox[{ RowBox[{"{", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], "}"}], ",", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"RotationMatrix", "[", RowBox[{"2", "s", " ", RowBox[{"Pi", "/", "3"}]}], "]"}], ".", "#"}], "&"}], "/@", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "0"}], "}"}]}], "}"}]}], ",", RowBox[{"{", RowBox[{"s", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "]"}], ",", "1"}], "]"}], ",", RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "0"}], "}"}], "}"}]}], "]"}]}]}], "]"}]}], "]"}]], "Input",ExpressionUUID->"eda0d9b6-221b-4ee5-82fe-0e450c860658"], Cell[BoxData[ GraphicsBox[{{ {GrayLevel[0], Thickness[0.005], LineBox[{{0.46410161513775455`, 0.46410161513775455`}, { 0.7320508075688772, 0.46410161513775455`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.7320508075688772, 0.46410161513775455`}, {0.9999999999999999, 0.46410161513775455`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.7320508075688772, 0.46410161513775455`}, {0.7320508075688772, 0.7320508075688772}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.7320508075688772, 0.46410161513775455`}, {0.7320508075688772, 0.19615242270663186`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.46410161513775455`, 0.46410161513775455`}, { 0.3301270189221932, 0.6961524227066319}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.3301270189221932, 0.6961524227066319}, {0.19615242270663186`, 0.9282032302755091}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.3301270189221932, 0.6961524227066319}, {0.5621778264910705, 0.8301270189221932}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.3301270189221932, 0.6961524227066319}, {0.09807621135331593, 0.5621778264910705}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.46410161513775455`, 0.46410161513775455`}, { 0.3301270189221932, 0.23205080756887728`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.3301270189221932, 0.23205080756887728`}, { 0.19615242270663186`, 0.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.3301270189221932, 0.23205080756887728`}, { 0.09807621135331593, 0.3660254037844386}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.3301270189221932, 0.23205080756887728`}, {0.5621778264910705, 0.09807621135331593}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.46410161513775455`, 0.46410161513775455`}, { 0.19615242270663186`, 0.46410161513775455`}}], {GrayLevel[0]}}}, { {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0], InsetBox["1", Scaled[{-0.02, -0.02}, {0.46410161513775455, 0.46410161513775455}], \ {1, 0}]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0], InsetBox["2", Scaled[{-0.02, -0.02}, {0.3301270189221932, 0.23205080756887728}], \ {1, 0}]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0], InsetBox["3", Scaled[{-0.02, -0.02}, {0.5621778264910705, 0.09807621135331593}], \ {1, 0}]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0], InsetBox["4", Scaled[{-0.02, -0.02}, {0.09807621135331593, 0.3660254037844386}], \ {1, 0}]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0], InsetBox["5", Scaled[{-0.02, -0.02}, {0.19615242270663186, 0.}], {1, 0}]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0], InsetBox["6", Scaled[{-0.02, -0.02}, {0.7320508075688772, 0.46410161513775455}], \ {1, 0}]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0], InsetBox["7", Scaled[{-0.02, -0.02}, {0.7320508075688772, 0.7320508075688772}], \ {1, 0}]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0], InsetBox["8", Scaled[{-0.02, -0.02}, {0.7320508075688772, 0.19615242270663186}], \ {1, 0}]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0], InsetBox["9", Scaled[{-0.02, -0.02}, {0.9999999999999999, 0.46410161513775455}], \ {1, 0}]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0], InsetBox["10", Scaled[{-0.02, -0.02}, {0.3301270189221932, 0.6961524227066319}], \ {1, 0}]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0], InsetBox["11", Scaled[{-0.02, -0.02}, {0.09807621135331593, 0.5621778264910705}], \ {1, 0}]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0], InsetBox["12", Scaled[{-0.02, -0.02}, {0.5621778264910705, 0.8301270189221932}], \ {1, 0}]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0], InsetBox["13", Scaled[{-0.02, -0.02}, {0.19615242270663186, 0.9282032302755091}], \ {1, 0}]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0], InsetBox["14", Scaled[{-0.02, -0.02}, {0.19615242270663186, 0.46410161513775455}], \ {1, 0}]}, {GrayLevel[0]}}}}, AlignmentPoint->Center, AspectRatio->Automatic, Axes->False, AxesLabel->None, AxesOrigin->Automatic, AxesStyle->{}, Background->None, BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->Automatic, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->Automatic, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->All, PlotRangeClipping->False, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->Automatic, TicksStyle->{}]], "Output",ExpressionUUID->"5a76abfa-bb3f-4a59-b88e-\ d496a04cbcfc"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Position", "[", RowBox[{ RowBox[{"CanonicalForm", "/@", RowBox[{"Trees", "[", "14", "]"}]}], ",", RowBox[{"CanonicalForm", "[", "isobutane", "]"}]}], "]"}]], "Input",Express\ ionUUID->"aab647cd-87d7-4d23-ad48-e3ea0b3b4cd6"], Cell[BoxData[ RowBox[{"{", RowBox[{"{", "48", "}"}], "}"}]], "Output",ExpressionUUID->"d746e435-8c25-4a33-953b-ef346ac17dc9"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Trees", "[", "14", "]"}], "[", RowBox[{"[", "48", "]"}], "]"}], "//", "ShowGraph"}]], "Input",ExpressionUU\ ID->"c7e3f968-f2d0-49cf-a18c-da02efa3e684"], Cell[BoxData[ GraphicsBox[{{ {GrayLevel[0], Thickness[0.005], LineBox[{{0.6000000000000001, 0.6000000000000001}, {0.6000000000000001, 0.45000000000000007`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.6000000000000001, 0.45000000000000007`}, { 0.20000000000000004`, 0.30000000000000004`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.6000000000000001, 0.45000000000000007`}, {0.6000000000000001, 0.30000000000000004`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.6000000000000001, 0.45000000000000007`}, {1., 0.30000000000000004`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.20000000000000004`, 0.30000000000000004`}, { 0.06666666666666671, 0.15000000000000002`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.20000000000000004`, 0.30000000000000004`}, { 0.20000000000000004`, 0.15000000000000002`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.06666666666666671, 0.15000000000000002`}, { 0.022222222222222258`, 0.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.06666666666666671, 0.15000000000000002`}, { 0.06666666666666671, 0.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.06666666666666671, 0.15000000000000002`}, { 0.11111111111111116`, 0.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.20000000000000004`, 0.15000000000000002`}, { 0.1555555555555556, 0.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.20000000000000004`, 0.15000000000000002`}, { 0.20000000000000004`, 0.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.20000000000000004`, 0.15000000000000002`}, { 0.2444444444444445, 0.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.20000000000000004`, 0.30000000000000004`}, { 0.33333333333333337`, 0.15000000000000002`}}], {GrayLevel[0]}}}, { {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}}}, AlignmentPoint->Center, AspectRatio->Automatic, Axes->False, AxesLabel->None, AxesOrigin->Automatic, AxesStyle->{}, Background->None, BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->Automatic, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->Automatic, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->All, PlotRangeClipping->False, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->Automatic, TicksStyle->{}]], "Output",ExpressionUUID->"1e774ace-4193-460e-b4cf-\ 4708002c819c"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"GraphDataString", "[", RowBox[{"isobutane", ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", "\"\<14-tree 48\>\"", "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{"{", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{"14", ",", "48"}], "}"}]}], "}"}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"Debug", "\[Rule]", "True"}]}], "\[IndentingNewLine]", "]"}]], "Input",ExpressionUUID->"e323743c-56a1-46ec-ae49-62d02dca1111"], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Starting main routine...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.000092`2.41533282084153", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000092`2.41533282084153", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.224544`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Starting main routine...", " (AbsoluteTime: ", 0.000092`2.41533282084153, ", Time: ", 0.000092`2.41533282084153, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.224544, ")"], Editable->False]], "Print",ExpressionUUID->"a20e8294-dfe0-4e0b-91eb-\ d3398a620ea4"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"AlternateStandardNames...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.003053`3.9362717977946353", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.002961`3.922983400885272", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.22491199999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "AlternateStandardNames...", " (AbsoluteTime: ", 0.003053`3.9362717977946353, ", Time: ", 0.002961`3.922983400885272, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.22491199999999`, ")"], Editable->False]], "Print",ExpressionUUID->"8888a450-da65-4d0a-8015-\ ee8faeec46c6"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"CanonicalForm...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.003429`3.986712478610919", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000376`3.0267328384236345", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.22511999999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "CanonicalForm...", " (AbsoluteTime: ", 0.003429`3.986712478610919, ", Time: ", 0.000376`3.0267328384236345, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.22511999999999`, ")"], Editable->False]], "Print",ExpressionUUID->"7ea319aa-eda5-47ad-b05c-\ bd127cd15697"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"AdjacencyMatrix...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.007819`4.344696206625839", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.00439`4.0940095137380945", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.225256`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "AdjacencyMatrix...", " (AbsoluteTime: ", 0.007819`4.344696206625839, ", Time: ", 0.00439`4.0940095137380945, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.225256, ")"], Editable->False]], "Print",ExpressionUUID->"7b64be80-cafd-4455-aada-\ 5d26998dc4dd"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"VertexConnectivity...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.014096`4.600640884563949", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.006277`4.249297122146681", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.22643199999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "VertexConnectivity...", " (AbsoluteTime: ", 0.014096`4.600640884563949, ", Time: ", 0.006277`4.249297122146681, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.22643199999999`, ")"], Editable->False]], "Print",ExpressionUUID->"26234a39-68b5-4c32-a3a4-\ 626a0269ec0e"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"CharacteristicPolynomial...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.194661`5.7408239435708115", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.180565`5.708178565719555", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.225488`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "CharacteristicPolynomial...", " (AbsoluteTime: ", 0.194661`5.7408239435708115, ", Time: ", 0.180565`5.708178565719555, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.225488, ")"], Editable->False]], "Print",ExpressionUUID->"b2496fcc-d66a-42dc-9593-\ 1477a6caa451"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Spectrum...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.199058`5.750524629754388", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.004397`4.094701459115677", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.227952`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Spectrum...", " (AbsoluteTime: ", 0.199058`5.750524629754388, ", Time: ", 0.004397`4.094701459115677, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.227952, ")"], Editable->False]], "Print",ExpressionUUID->"bc9a93a2-85ae-48ce-a053-\ fecddf281eb8"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Girth...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.201948`5.756784549970712", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.00289`3.9124428362525197", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.230328`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Girth...", " (AbsoluteTime: ", 0.201948`5.756784549970712, ", Time: ", 0.00289`3.9124428362525197, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.230328, ")"], Editable->False]], "Print",ExpressionUUID->"46f7c9ef-34c3-4222-a5f6-\ 863dd2d5b2b4"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"CompleteBipartiteIndices...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.212377`5.778652475237109", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.010429`4.469787660953886", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.23041599999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "CompleteBipartiteIndices...", " (AbsoluteTime: ", 0.212377`5.778652475237109, ", Time: ", 0.010429`4.469787660953886, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.23041599999999`, ")"], Editable->False]], "Print",ExpressionUUID->"4bb1657f-b019-4134-921c-\ 643b7587b9da"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"EdgeConnectivity...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.217803`5.789608850892188", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.005426`4.186024782921553", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.23056`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "EdgeConnectivity...", " (AbsoluteTime: ", 0.217803`5.789608850892188, ", Time: ", 0.005426`4.186024782921553, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.23056, ")"], Editable->False]], "Print",ExpressionUUID->"ab079839-9857-4cae-b0f2-\ 76189f5f780b"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"IncidenceMatrix...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.2916`5.916332513141912", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.073797`5.319583700712946", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.230768`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "IncidenceMatrix...", " (AbsoluteTime: ", 0.2916`5.916332513141912, ", Time: ", 0.073797`5.319583700712946, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.230768, ")"], Editable->False]], "Print",ExpressionUUID->"bc7916ca-2e7f-42f3-8298-\ dc45e7ec7159"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"IndependenceNumber...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.292839`5.918173908631254", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.001239`3.5446162998720347", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.23088`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "IndependenceNumber...", " (AbsoluteTime: ", 0.292839`5.918173908631254, ", Time: ", 0.001239`3.5446162998720347, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.23088, ")"], Editable->False]], "Print",ExpressionUUID->"2a1dfe8c-d19d-414e-83d4-\ fde651097332"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"CliqueNumber...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.368017`6.017412874222932", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.075178`5.327635761262199", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.231944`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "CliqueNumber...", " (AbsoluteTime: ", 0.368017`6.017412874222932, ", Time: ", 0.075178`5.327635761262199, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.231944, ")"], Editable->False]], "Print",ExpressionUUID->"12e431c6-b6e9-4fba-8e6d-\ e383bef0ab70"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"ChromaticPolynomial...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.395615`6.048817743291005", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.027598`4.892422603806264", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.231664`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "ChromaticPolynomial...", " (AbsoluteTime: ", 0.395615`6.048817743291005, ", Time: ", 0.027598`4.892422603806264, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.231664, ")"], Editable->False]], "Print",ExpressionUUID->"4a0abf1b-7a4b-452d-b305-\ 14ce92372541"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Eccentricity...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.402543`6.056357272399274", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.006928`4.292152872505261", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.231848`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Eccentricity...", " (AbsoluteTime: ", 0.402543`6.056357272399274, ", Time: ", 0.006928`4.292152872505261, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.231848, ")"], Editable->False]], "Print",ExpressionUUID->"6f36c16f-4521-49d0-91de-\ 325c3f56b3bd"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"HamiltonianCycles...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.414361`6.068923866000874", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.011818`4.524088979139619", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.23199199999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "HamiltonianCycles...", " (AbsoluteTime: ", 0.414361`6.068923866000874, ", Time: ", 0.011818`4.524088979139619, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.23199199999999`, ")"], Editable->False]], "Print",ExpressionUUID->"1d36c47a-a178-4c26-bfe9-\ abb53e15d1de"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"HamiltonianPaths...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "0.440313`6.095306501451342", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.025952`4.865715826027034", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.23096799999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "HamiltonianPaths...", " (AbsoluteTime: ", 0.440313`6.095306501451342, ", Time: ", 0.025952`4.865715826027034, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.23096799999999`, ")"], Editable->False]], "Print",ExpressionUUID->"d7f2bc5b-5d47-4714-942f-\ 1b129c351914"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"HamiltonianPath...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "1.171154`6.5201589995442255", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.730841`6.3153678966733136", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.232024`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "HamiltonianPath...", " (AbsoluteTime: ", 1.171154`6.5201589995442255, ", Time: ", 0.730841`6.3153678966733136, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.232024, ")"], Editable->False]], "Print",ExpressionUUID->"c7725080-2f70-4810-bd5b-\ a51e999767c3"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Bridges...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "1.476716`6.620841973918041", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.305562`5.936644337455759", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.229344`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Bridges...", " (AbsoluteTime: ", 1.476716`6.620841973918041, ", Time: ", 0.305562`5.936644337455759, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.229344, ")"], Editable->False]], "Print",ExpressionUUID->"6e58d480-d67f-430d-b965-\ 14618cd7cdca"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"ConnectedQ...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "1.492773`6.6255387648226645", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.016057`4.657209400867659", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.229592`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "ConnectedQ...", " (AbsoluteTime: ", 1.492773`6.6255387648226645, ", Time: ", 0.016057`4.657209400867659, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.229592, ")"], Editable->False]], "Print",ExpressionUUID->"35eece65-268a-4b19-a741-\ d128bd9a28c8"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"ChromaticNumber...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "1.495881`6.62644203949838", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.003108`3.9440260036248493", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.22973599999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "ChromaticNumber...", " (AbsoluteTime: ", 1.495881`6.62644203949838, ", Time: ", 0.003108`3.9440260036248493, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.22973599999999`, ")"], Editable->False]], "Print",ExpressionUUID->"9b4f9bb1-d614-489b-acd2-\ bc69fc27a82e"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"EdgeChromaticNumber...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "1.498839`6.627299978467798", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.002958`3.9225431631568473", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.229872`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "EdgeChromaticNumber...", " (AbsoluteTime: ", 1.498839`6.627299978467798, ", Time: ", 0.002958`3.9225431631568473, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.229872, ")"], Editable->False]], "Print",ExpressionUUID->"f5b698e7-6326-41ca-827d-\ 4ee686d387dd"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Planar...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "1.509145`6.630275962678152", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.010306`4.464635131621027", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.22999999999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Planar...", " (AbsoluteTime: ", 1.509145`6.630275962678152, ", Time: ", 0.010306`4.464635131621027, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.22999999999999`, ")"], Editable->False]], "Print",ExpressionUUID->"e7e6c228-63d0-437b-be83-\ 196702bbe299"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Circulant indices...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "1.547542`6.641187438018963", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.038397`5.035842287281673", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.229592`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Circulant indices...", " (AbsoluteTime: ", 1.547542`6.641187438018963, ", Time: ", 0.038397`5.035842287281673, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.229592, ")"], Editable->False]], "Print",ExpressionUUID->"614d2dff-6657-4e09-9129-\ 0fcecc6dbf15"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"TreeQ...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "1.732314`6.6901716087220295", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.184772`5.718181153200313", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.22968`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "TreeQ...", " (AbsoluteTime: ", 1.732314`6.6901716087220295, ", Time: ", 0.184772`5.718181153200313, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.22968, ")"], Editable->False]], "Print",ExpressionUUID->"10a5f522-1c87-4a54-a037-\ e328ae3783bf"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Cycles...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "1.733847`6.690555764844131", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.001533`3.6370871483503477", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.22979199999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Cycles...", " (AbsoluteTime: ", 1.733847`6.690555764844131, ", Time: ", 0.001533`3.6370871483503477, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.22979199999999`, ")"], Editable->False]], "Print",ExpressionUUID->"612104cb-2609-4670-adcc-\ 0bdadd6ec7b4"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"AutomorphismsCount...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "1.734228`6.69065118734697", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000381`3.0324699691715913", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.22994399999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "AutomorphismsCount...", " (AbsoluteTime: ", 1.734228`6.69065118734697, ", Time: ", 0.000381`3.0324699691715913, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.22994399999999`, ")"], Editable->False]], "Print",ExpressionUUID->"3fc54b0f-732f-4dfc-bc9e-\ 127b448a3f0b"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Automorphisms...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "1.790134`6.704430534689509", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.055906`5.199003413673222", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.232472`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Automorphisms...", " (AbsoluteTime: ", 1.790134`6.704430534689509, ", Time: ", 0.055906`5.199003413673222, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.232472, ")"], Editable->False]], "Print",ExpressionUUID->"4f72c090-e3e0-4d74-aa38-\ b366c54f7b12"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"GraphDual...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.17099`6.788202816510587", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.380856`6.0323057953483525", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.32892`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "GraphDual...", " (AbsoluteTime: ", 2.17099`6.788202816510587, ", Time: ", 0.380856`6.0323057953483525, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.32892, ")"], Editable->False]], "Print",ExpressionUUID->"74c876fa-aaac-41e0-8551-\ c6713b61985d"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"GridIndices...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.200325`6.794031826719136", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.029335`4.918931086048321", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.32959199999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "GridIndices...", " (AbsoluteTime: ", 2.200325`6.794031826719136, ", Time: ", 0.029335`4.918931086048321, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.32959199999999`, ")"], Editable->False]], "Print",ExpressionUUID->"00553325-ffbc-4f74-bc7f-\ 936eb378e49f"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"EdgeTransitive...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.203682`6.794693917791258", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.003357`3.977496334743983", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.329432`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "EdgeTransitive...", " (AbsoluteTime: ", 2.203682`6.794693917791258, ", Time: ", 0.003357`3.977496334743983, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.329432, ")"], Editable->False]], "Print",ExpressionUUID->"f3418f46-ae09-4128-9b9f-\ 368ba17d5a08"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"GeneralizedPetersen...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.641709`6.873429969282159", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.438027`6.093045874752605", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.351816`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "GeneralizedPetersen...", " (AbsoluteTime: ", 2.641709`6.873429969282159, ", Time: ", 0.438027`6.093045874752605, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.351816, ")"], Editable->False]], "Print",ExpressionUUID->"6ad82b3d-1759-476b-beeb-\ 9cb844e162f2"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"LaplacianMatrix...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.673616`6.878644025046979", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.031907`4.955430965828168", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.35132`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "LaplacianMatrix...", " (AbsoluteTime: ", 2.673616`6.878644025046979, ", Time: ", 0.031907`4.955430965828168, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.35132, ")"], Editable->False]], "Print",ExpressionUUID->"d93efd96-c1fd-4b82-957a-\ 7eced8d376d9"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"NormalizedLaplacianMatrix...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.676536`6.8791180826113525", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.00292`3.9169278449443885", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.35140799999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "NormalizedLaplacianMatrix...", " (AbsoluteTime: ", 2.676536`6.8791180826113525, ", Time: ", 0.00292`3.9169278449443885, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.35140799999999`, ")"], Editable->False]], "Print",ExpressionUUID->"76d80d56-b226-415b-bf26-\ f6231134f2ed"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"TriangleFree...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.679852`6.879655803435897", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.003316`3.9721595153742064", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.35139199999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "TriangleFree...", " (AbsoluteTime: ", 2.679852`6.879655803435897, ", Time: ", 0.003316`3.9721595153742064, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.35139199999999`, ")"], Editable->False]], "Print",ExpressionUUID->"a7ea5c42-ffb0-4260-a0e5-\ 392aed993190"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"PlatonicQ...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.6804`6.87974460275985", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000548`3.1903255519803397", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.351424`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "PlatonicQ...", " (AbsoluteTime: ", 2.6804`6.87974460275985, ", Time: ", 0.000548`3.1903255519803397, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.351424, ")"], Editable->False]], "Print",ExpressionUUID->"9cdef1d3-98fa-4387-9905-\ 1ffea9b2a5c7"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"ArchimedeanQ...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.68065`6.8797851073701635", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.00025`2.849485002168009", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.351568`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "ArchimedeanQ...", " (AbsoluteTime: ", 2.68065`6.8797851073701635, ", Time: ", 0.00025`2.849485002168009, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.351568, ")"], Editable->False]], "Print",ExpressionUUID->"455bc520-1420-4bb4-ba82-\ 9dc8122822d9"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"BiconnectedQ...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.680936`6.8798314400120155", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000286`2.9079110266250185", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.351672`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "BiconnectedQ...", " (AbsoluteTime: ", 2.680936`6.8798314400120155, ", Time: ", 0.000286`2.9079110266250185, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.351672, ")"], Editable->False]], "Print",ExpressionUUID->"92c35e91-225b-4ce9-92d9-\ d575f165414e"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"RegularParameters...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.684158`6.88035307001101", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.003222`3.959670529579174", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.3518`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "RegularParameters...", " (AbsoluteTime: ", 2.684158`6.88035307001101, ", Time: ", 0.003222`3.959670529579174, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.3518, ")"], Editable->False]], "Print",ExpressionUUID->"60c40b01-1b7d-4165-aa70-\ 4adc2ecc90ac"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"VertexTransitive...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.684458`6.880401607043533", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.0003`2.9286662482156354", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.351824`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "VertexTransitive...", " (AbsoluteTime: ", 2.684458`6.880401607043533, ", Time: ", 0.0003`2.9286662482156354, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.351824, ")"], Editable->False]], "Print",ExpressionUUID->"133b1721-fb62-413c-9bb9-\ 9766217e89d9"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Caterpillar...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.880963`6.911082674199496", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.196505`5.744918598816999", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.351984`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Caterpillar...", " (AbsoluteTime: ", 2.880963`6.911082674199496, ", Time: ", 0.196505`5.744918598816999, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.351984, ")"], Editable->False]], "Print",ExpressionUUID->"0359bbfb-37f9-493a-a8b0-\ 7f90cba40b4f"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Circulant...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.883175`6.911415997045387", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.002212`3.7963301161286314", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.35194399999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Circulant...", " (AbsoluteTime: ", 2.883175`6.911415997045387, ", Time: ", 0.002212`3.7963301161286314, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.35194399999999`, ")"], Editable->False]], "Print",ExpressionUUID->"277c6dfe-30e8-4088-993d-\ fcd4010eb658"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Class1...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.883495`6.911464196173948", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.00032`2.95669497181588", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.351992`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Class1...", " (AbsoluteTime: ", 2.883495`6.911464196173948, ", Time: ", 0.00032`2.95669497181588, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.351992, ")"], Editable->False]], "Print",ExpressionUUID->"11f470d2-24b2-408b-8396-\ 3ac6186ee8d8"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"ClawFree...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.883867`6.911520220937955", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000372`3.0220879333778714", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.352136`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "ClawFree...", " (AbsoluteTime: ", 2.883867`6.911520220937955, ", Time: ", 0.000372`3.0220879333778714, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.352136, ")"], Editable->False]], "Print",ExpressionUUID->"2e73df5d-dd87-4f30-9b8e-\ a44d6dba6cd9"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"CocktailPartyGraph...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.884125`6.911559072578664", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000258`2.863164699459201", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.35228`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "CocktailPartyGraph...", " (AbsoluteTime: ", 2.884125`6.911559072578664, ", Time: ", 0.000258`2.863164699459201, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.35228, ")"], Editable->False]], "Print",ExpressionUUID->"fc6e9993-38e0-4113-b4e7-\ 1c5fa859cac5"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"ComplementGraph...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.884392`6.911599275849892", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000267`2.878056254860545", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.35239999999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "ComplementGraph...", " (AbsoluteTime: ", 2.884392`6.911599275849892, ", Time: ", 0.000267`2.878056254860545, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.35239999999999`, ")"], Editable->False]], "Print",ExpressionUUID->"60832796-950c-4b58-a931-\ 9d248072ee6b"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Complete...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.927581`6.91805391342018", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.043189`5.086918141986404", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.3604`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Complete...", " (AbsoluteTime: ", 2.927581`6.91805391342018, ", Time: ", 0.043189`5.086918141986404, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.3604, ")"], Editable->False]], "Print",ExpressionUUID->"a933d7dd-8fd6-4132-9ea1-\ ebe515189446"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"CrownGraph...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.931042`6.918567035147492", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.003461`3.990746592790098", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.36048`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "CrownGraph...", " (AbsoluteTime: ", 2.931042`6.918567035147492, ", Time: ", 0.003461`3.990746592790098, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.36048, ")"], Editable->False]], "Print",ExpressionUUID->"a1084a84-61c0-427a-a7d9-\ cdbc482608de"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Cubic...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.931356`6.918613558248604", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000314`2.9484746415691863", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.360568`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Cubic...", " (AbsoluteTime: ", 2.931356`6.918613558248604, ", Time: ", 0.000314`2.9484746415691863, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.360568, ")"], Editable->False]], "Print",ExpressionUUID->"f90b50c1-8a8f-40a9-9071-\ 160e98414d0d"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Eulerian...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.931629`6.918654002627584", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000273`2.8877076405367275", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.36072`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Eulerian...", " (AbsoluteTime: ", 2.931629`6.918654002627584, ", Time: ", 0.000273`2.8877076405367275, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.36072, ")"], Editable->False]], "Print",ExpressionUUID->"44d42ac7-5722-48e2-827c-\ c0bd4e72ef1c"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"GeneralizedPetersen...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.933097`6.9188714192000695", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.001468`3.6182710490760237", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.361136`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "GeneralizedPetersen...", " (AbsoluteTime: ", 2.933097`6.9188714192000695, ", Time: ", 0.001468`3.6182710490760237, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.361136, ")"], Editable->False]], "Print",ExpressionUUID->"bec4ad51-b979-44b0-9ea4-\ c8cf21e8ec7a"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"HamiltonConnected...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.933405`6.9189170214006825", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000308`2.9400957099964145", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.36075199999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "HamiltonConnected...", " (AbsoluteTime: ", 2.933405`6.9189170214006825, ", Time: ", 0.000308`2.9400957099964145, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.36075199999999`, ")"], Editable->False]], "Print",ExpressionUUID->"d4942845-68c2-4a33-8da0-\ 7eb2c83c0a81"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Hypercube...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.933671`6.918956401266312", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000266`2.876426630127037", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.36084799999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Hypercube...", " (AbsoluteTime: ", 2.933671`6.918956401266312, ", Time: ", 0.000266`2.876426630127037, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.36084799999999`, ")"], Editable->False]], "Print",ExpressionUUID->"8e0e7515-67a6-47f2-bc9b-\ f6b17741002e"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Hypohamiltonian...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.933983`6.9190025866339155", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000312`2.945699587514414", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.36095999999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Hypohamiltonian...", " (AbsoluteTime: ", 2.933983`6.9190025866339155, ", Time: ", 0.000312`2.945699587514414, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.36095999999999`, ")"], Editable->False]], "Print",ExpressionUUID->"8a6896c3-9d91-4114-808e-\ cfda094b223e"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Hypotraceable...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.941806`6.920159022897852", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.007823`4.344918323741996", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.360608`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Hypotraceable...", " (AbsoluteTime: ", 2.941806`6.920159022897852, ", Time: ", 0.007823`4.344918323741996, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.360608, ")"], Editable->False]], "Print",ExpressionUUID->"a66faf3f-4bc6-4935-8034-\ 4aeaf72f710d"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Ladder...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.947817`6.9210455125890045", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.006011`4.2304917214645865", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.36052`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Ladder...", " (AbsoluteTime: ", 2.947817`6.9210455125890045, ", Time: ", 0.006011`4.2304917214645865, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.36052, ")"], Editable->False]], "Print",ExpressionUUID->"136b11a6-0441-4595-b8d7-\ 187da8d5f4b4"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"LCF...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.948176`6.921098399937817", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000359`3.0066394420742943", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.360568`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "LCF...", " (AbsoluteTime: ", 2.948176`6.921098399937817, ", Time: ", 0.000359`3.0066394420742943, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.360568, ")"], Editable->False]], "Print",ExpressionUUID->"9f46cc5e-7809-4704-b6e2-\ 23c62647e2da"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Path...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.94843`6.921135814951975", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000254`2.8563787101159126", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.36068`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Path...", " (AbsoluteTime: ", 2.94843`6.921135814951975, ", Time: ", 0.000254`2.8563787101159126, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.36068, ")"], Editable->False]], "Print",ExpressionUUID->"061f5347-373d-4857-aac0-\ eacefd10ab18"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Perfect...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "2.961685`6.923083859282585", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.013255`4.573924725565087", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "102.22564799999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.360816`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Perfect...", " (AbsoluteTime: ", 2.961685`6.923083859282585, ", Time: ", 0.013255`4.573924725565087, ", MaxMemoryUsed: ", 102.22564799999999`, ", MemoryInUse: ", 100.360816, ")"], Editable->False]], "Print",ExpressionUUID->"15afdd61-455a-431c-978d-\ 4fe780a333d0"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"PerfectMatching...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "130.759448`8.568018072037372", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "127.797763`8.558068245399273", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "106.63951999999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.360784`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "PerfectMatching...", " (AbsoluteTime: ", 130.759448`8.568018072037372, ", Time: ", 127.797763`8.558068245399273, ", MaxMemoryUsed: ", 106.63951999999999`, ", MemoryInUse: ", 100.360784, ")"], Editable->False]], "Print",ExpressionUUID->"cc6d30d5-4edc-45d4-b8f5-\ f57a9932647b"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Prism...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "130.795738`8.568138586159767", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.03629`5.011331961696526", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "106.63951999999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.36023999999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Prism...", " (AbsoluteTime: ", 130.795738`8.568138586159767, ", Time: ", 0.03629`5.011331961696526, ", MaxMemoryUsed: ", 106.63951999999999`, ", MemoryInUse: ", 100.36023999999999`, ")"], Editable->False]], "Print",ExpressionUUID->"d8bf0204-741d-4f8c-92ca-\ a24e4cfd47b6"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"SelfComplementaryQ...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "130.805387`8.568170623540784", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.009649`4.436027299898236", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "106.63951999999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.360416`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "SelfComplementaryQ...", " (AbsoluteTime: ", 130.805387`8.568170623540784, ", Time: ", 0.009649`4.436027299898236, ", MaxMemoryUsed: ", 106.63951999999999`, ", MemoryInUse: ", 100.360416, ")"], Editable->False]], "Print",ExpressionUUID->"54bd13c2-3788-4643-b8e4-\ 2a7b70eec4f6"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"SquareFree...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "130.809563`8.568184488297035", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.004176`4.07230548349018", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "106.63951999999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.360424`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "SquareFree...", " (AbsoluteTime: ", 130.809563`8.568184488297035, ", Time: ", 0.004176`4.07230548349018, ", MaxMemoryUsed: ", 106.63951999999999`, ", MemoryInUse: ", 100.360424, ")"], Editable->False]], "Print",ExpressionUUID->"cf798c6a-882a-40ef-bb60-\ 501cd6d39bd8"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"TreeQ...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "130.810191`8.568186573284352", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000628`3.2495046372331693", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "106.63951999999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.360472`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "TreeQ...", " (AbsoluteTime: ", 130.810191`8.568186573284352, ", Time: ", 0.000628`3.2495046372331693, ", MaxMemoryUsed: ", 106.63951999999999`, ", MemoryInUse: ", 100.360472, ")"], Editable->False]], "Print",ExpressionUUID->"f571e069-92ee-4f71-b213-\ 3d1539ed5c42"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"TriangleFree...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "130.810493`8.568187575933925", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000302`2.931551936453122", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "106.63951999999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.360552`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "TriangleFree...", " (AbsoluteTime: ", 130.810493`8.568187575933925, ", Time: ", 0.000302`2.931551936453122, ", MaxMemoryUsed: ", 106.63951999999999`, ", MemoryInUse: ", 100.360552, ")"], Editable->False]], "Print",ExpressionUUID->"b6655334-fc8a-4371-9e21-\ 15f8e1ca3723"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Wheel...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "130.810776`8.568188515500797", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000283`2.903331429020264", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "106.63951999999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.360624`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Wheel...", " (AbsoluteTime: ", 130.810776`8.568188515500797, ", Time: ", 0.000283`2.903331429020264, ", MaxMemoryUsed: ", 106.63951999999999`, ", MemoryInUse: ", 100.360624, ")"], Editable->False]], "Print",ExpressionUUID->"f3cc79a9-4b9a-4b69-a265-\ b9d51de4e7bc"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"ZeroSymmetric...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "130.811061`8.56818946170566", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000285`2.9063898535044856", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "106.63951999999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.360704`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "ZeroSymmetric...", " (AbsoluteTime: ", 130.811061`8.56818946170566, ", Time: ", 0.000285`2.9063898535044856, ", MaxMemoryUsed: ", 106.63951999999999`, ", MemoryInUse: ", 100.360704, ")"], Editable->False]], "Print",ExpressionUUID->"7e81eee6-6478-4370-bba7-\ 44efdd41d4d5"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"VertexCoordinates...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "130.811323`8.56819033154831", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000262`2.8698462848157194", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "106.63951999999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.360744`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "VertexCoordinates...", " (AbsoluteTime: ", 130.811323`8.56819033154831, ", Time: ", 0.000262`2.8698462848157194, ", MaxMemoryUsed: ", 106.63951999999999`, ", MemoryInUse: ", 100.360744, ")"], Editable->False]], "Print",ExpressionUUID->"029f8628-7d0c-457c-ae03-\ 2f4541b59237"], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"Starting classes...\"\>", "\[InvisibleSpace]", "\<\" (AbsoluteTime: \"\>", "\[InvisibleSpace]", "130.811655`8.568191433789169", "\[InvisibleSpace]", "\<\", Time: \"\>", "\[InvisibleSpace]", "0.000332`2.972683077200007", "\[InvisibleSpace]", "\<\", MaxMemoryUsed: \"\>", "\[InvisibleSpace]", "106.63951999999999`", "\[InvisibleSpace]", "\<\", MemoryInUse: \"\>", "\[InvisibleSpace]", "100.36084799999999`", "\[InvisibleSpace]", "\<\")\"\>"}], SequenceForm[ "Starting classes...", " (AbsoluteTime: ", 130.811655`8.568191433789169, ", Time: ", 0.000332`2.972683077200007, ", MaxMemoryUsed: ", 106.63951999999999`, ", MemoryInUse: ", 100.36084799999999`, ")"], Editable->False]], "Print",ExpressionUUID->"6d16b701-d25b-4612-b0a0-\ 61455ee6ff03"] }, Open ]], Cell[BoxData["\<\"RawGraphData[\\\"Isobutane\\\",\\\"Name\\\"]:=\\\"isobutane\ \\\"\\nRawGraphData[\\\"Isobutane\\\",\\\"AlternateStandardNames\\\"]:={{\\\"\ Tree\\\",{14,48}}}\\nRawGraphData[\\\"Isobutane\\\",\\\"AlternateNames\\\"]:={\ \\\"14-tree \ 48\\\"}\\nRawGraphData[\\\"Isobutane\\\",\\\"CanonicalForm\\\"]:={{262144},{\ 2097152},{2097152},{2097152},{1048576},{524288},{524288},{524288},{1048576},{\ 1048576},{1879310336},{147062784},{117702656},{-2143813632}}\\nRawGraphData[\\\ \"Isobutane\\\",\\\"Notation\\\"]:=Missing[\\\"NotAvailable\\\"]\\\ nRawGraphData[\\\"Isobutane\\\",\\\"Information\\\"]:=Missing[\\\"\ NotAvailable\\\"]\\nRawGraphData[\\\"Isobutane\\\",\\\"VertexCount\\\"]:=14\\\ nRawGraphData[\\\"Isobutane\\\",\\\"VertexCoordinates\\\"]:=\\!\\({\\(\\({\\*\ TagBox[InterpretationBox[\\\"\\\\\\\"0.0000\\\\\\\"\\\",0,Rule[Editable,False]\ ],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"\ 0\\\"]]]]],\\*TagBox[InterpretationBox[\\\"\\\\\\\"0.0000\\\\\\\"\\\",0,Rule[\ Editable,False]],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,\ List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*TagBox[InterpretationBox[\\\"\\\ \\\\\"-0.5000\\\\\\\"\\\",-0.5`,Rule[AutoDelete,True]],Function[NumberForm[\ Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[\ InterpretationBox[\\\"\\\\\\\"-0.8660\\\\\\\"\\\",-0.8660254037844386`,Rule[\ AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,\ List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*TagBox[InterpretationBox[\\\"\\\ \\\\\"0.3660\\\\\\\"\\\",0.3660254037844386`,Rule[AutoDelete,True]],Function[\ NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]],\ \\*TagBox[InterpretationBox[\\\"\\\\\\\"-1.3660\\\\\\\"\\\",-1.\ 3660254037844386`,Rule[AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4]\ ,Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*TagBox[\ InterpretationBox[\\\"\\\\\\\"-1.3660\\\\\\\"\\\",-1.3660254037844386`,Rule[\ AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,\ List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[InterpretationBox[\\\"\\\\\\\"-0.3660\\\ \\\\\"\\\",-0.3660254037844386`,Rule[AutoDelete,True]],Function[NumberForm[\ Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\\ ({\\*TagBox[InterpretationBox[\\\"\\\\\\\"-1.0000\\\\\\\"\\\",-1.`,Rule[\ AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,\ List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[InterpretationBox[\\\"\\\\\\\"-1.7321\\\ \\\\\"\\\",-1.7320508075688772`,Rule[AutoDelete,True]],Function[NumberForm[\ Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\\ ({\\*TagBox[InterpretationBox[\\\"\\\\\\\"1.0000\\\\\\\"\\\",1.`,Rule[\ AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,\ List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[InterpretationBox[\\\"\\\\\\\"0.0000\\\ \\\\\"\\\",0,Rule[Editable,False]],Function[NumberForm[Slot[1],List[5,4],Rule[\ NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*TagBox[\ InterpretationBox[\\\"\\\\\\\"1.0000\\\\\\\"\\\",1.`,Rule[AutoDelete,True]],\ Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\ \"]]]]],\\*TagBox[InterpretationBox[\\\"\\\\\\\"1.0000\\\\\\\"\\\",1.`,Rule[\ AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,\ List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*TagBox[InterpretationBox[\\\"\\\ \\\\\"1.0000\\\\\\\"\\\",1.`,Rule[AutoDelete,True]],Function[NumberForm[Slot[\ 1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[\ InterpretationBox[\\\"\\\\\\\"-1.0000\\\\\\\"\\\",-1.`,Rule[AutoDelete,True]],\ Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\ \"]]]]]}\\)\\),\\(\\({\\*TagBox[InterpretationBox[\\\"\\\\\\\"2.0000\\\\\\\"\\\ \",2.`,Rule[AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[\ NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[InterpretationBox[\\\"\\\ \\\\\"0.0000\\\\\\\"\\\",0,Rule[Editable,False]],Function[NumberForm[Slot[1],\ List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*\ TagBox[InterpretationBox[\\\"\\\\\\\"-0.5000\\\\\\\"\\\",-0.5`,Rule[\ AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,\ List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[InterpretationBox[\\\"\\\\\\\"0.8660\\\ \\\\\"\\\",0.8660254037844386`,Rule[AutoDelete,True]],Function[NumberForm[\ Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\\ ({\\*TagBox[InterpretationBox[\\\"\\\\\\\"-1.3660\\\\\\\"\\\",-1.\ 3660254037844386`,Rule[AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4]\ ,Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[InterpretationBox[\ \\\"\\\\\\\"0.3660\\\\\\\"\\\",0.3660254037844386`,Rule[AutoDelete,True]],\ Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\ \"]]]]]}\\)\\),\\(\\({\\*TagBox[InterpretationBox[\\\"\\\\\\\"0.3660\\\\\\\"\\\ \",0.3660254037844386`,Rule[AutoDelete,True]],Function[NumberForm[Slot[1],\ List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[\ InterpretationBox[\\\"\\\\\\\"1.3660\\\\\\\"\\\",1.3660254037844386`,Rule[\ AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,\ List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*TagBox[InterpretationBox[\\\"\\\ \\\\\"-1.0000\\\\\\\"\\\",-1.`,Rule[AutoDelete,True]],Function[NumberForm[\ Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[\ InterpretationBox[\\\"\\\\\\\"1.7321\\\\\\\"\\\",1.7320508075688772`,Rule[\ AutoDelete,True]],Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,\ List[\\\"\\\",\\\"0\\\"]]]]]}\\)\\),\\(\\({\\*TagBox[InterpretationBox[\\\"\\\ \\\\\"-1.0000\\\\\\\"\\\",-1.`,Rule[AutoDelete,True]],Function[NumberForm[\ Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\"]]]]],\\*TagBox[\ InterpretationBox[\\\"\\\\\\\"0.0000\\\\\\\"\\\",0,Rule[Editable,False]],\ Function[NumberForm[Slot[1],List[5,4],Rule[NumberPadding,List[\\\"\\\",\\\"0\\\ \"]]]]]}\\)\\)}\\)\\nRawGraphData[\\\"Isobutane\\\",\\\"\ AlternateVertexCoordinates\\\"]:=\\!\\({}\\)\\nRawGraphData[\\\"Isobutane\\\",\ \\\"EdgeCount\\\"]:=13\\nRawGraphData[\\\"Isobutane\\\",\\\"EdgeIndices\\\"]:=\ {{1,2},{1,6},{1,10},{1,14},{2,3},{2,4},{2,5},{6,7},{6,8},{6,9},{10,11},{10,12}\ ,{10,13}}\\nRawGraphData[\\\"Isobutane\\\",\\\"AdjacencyMatrix\\\"]:=\ SparseArray[Automatic,{14,14},0,{1,{{0,4,8,9,10,11,15,16,17,18,22,23,24,25,26}\ ,{{2},{6},{10},{14},{1},{3},{4},{5},{2},{2},{2},{1},{7},{8},{9},{6},{6},{6},{\ 1},{11},{12},{13},{10},{10},{10},{1}}},{1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,\ 1,1,1,1,1,1,1}}]\\nRawGraphData[\\\"Isobutane\\\",\\\"IncidenceMatrix\\\"]:=\ SparseArray[Automatic,{14,13},0,{1,{{0,4,8,9,10,11,15,16,17,18,22,23,24,25,26}\ ,{{1},{5},{9},{13},{9},{10},{11},{12},{12},{11},{10},{1},{2},{3},{4},{3},{4},{\ 2},{5},{6},{7},{8},{8},{7},{6},{13}}},{1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,\ 1,1,1,1,1,1,1}}]\\nRawGraphData[\\\"Isobutane\\\",\\\"LaplacianMatrix\\\"]:=\ SparseArray[Automatic,{14,14},0,{1,{{0,5,10,12,14,16,21,23,25,27,32,34,36,38,\ 40},{{1},{2},{6},{10},{14},{1},{2},{3},{4},{5},{2},{3},{2},{4},{2},{5},{1},{6}\ ,{7},{8},{9},{6},{7},{6},{8},{6},{9},{1},{10},{11},{12},{13},{10},{11},{10},{\ 12},{10},{13},{1},{14}}},{4,-1,-1,-1,-1,-1,4,-1,-1,-1,-1,1,-1,1,-1,1,-1,4,-1,-\ 1,-1,-1,1,-1,1,-1,1,-1,4,-1,-1,-1,-1,1,-1,1,-1,1,-1,1}}]\\nRawGraphData[\\\"\ Isobutane\\\",\\\"NormalizedLaplacianMatrix\\\"]:=SparseArray[Automatic,{14,\ 14},0,{1,{{0,5,10,12,14,16,21,23,25,27,32,34,36,38,40},{{1},{2},{6},{10},{14},\ {1},{2},{3},{4},{5},{2},{3},{2},{4},{2},{5},{1},{6},{7},{8},{9},{6},{7},{6},{\ 8},{6},{9},{1},{10},{11},{12},{13},{10},{11},{10},{12},{10},{13},{1},{14}}},{\ 1,-1/4,-1/4,-1/4,-1/2,-1/4,1,-1/2,-1/2,-1/2,-1/2,1,-1/2,1,-1/2,1,-1/4,1,-1/2,-\ 1/2,-1/2,-1/2,1,-1/2,1,-1/2,1,-1/4,1,-1/2,-1/2,-1/2,-1/2,1,-1/2,1,-1/2,1,-1/2,\ 1}}]\\nRawGraphData[\\\"Isobutane\\\",\\\"DistanceMatrix\\\"]:=SparseArray[\ Automatic,{14,14},0,{1,{{0,13,26,39,52,65,78,91,104,117,130,143,156,169,182},{\ {2},{3},{4},{5},{6},{7},{8},{9},{10},{11},{12},{13},{14},{1},{3},{4},{5},{6},{\ 7},{8},{9},{10},{11},{12},{13},{14},{1},{2},{4},{5},{6},{7},{8},{9},{10},{11},\ {12},{13},{14},{1},{2},{3},{5},{6},{7},{8},{9},{10},{11},{12},{13},{14},{1},{\ 2},{3},{4},{6},{7},{8},{9},{10},{11},{12},{13},{14},{1},{2},{3},{4},{5},{7},{\ 8},{9},{10},{11},{12},{13},{14},{1},{2},{3},{4},{5},{6},{8},{9},{10},{11},{12}\ ,{13},{14},{1},{2},{3},{4},{5},{6},{7},{9},{10},{11},{12},{13},{14},{1},{2},{\ 3},{4},{5},{6},{7},{8},{10},{11},{12},{13},{14},{1},{2},{3},{4},{5},{6},{7},{\ 8},{9},{11},{12},{13},{14},{1},{2},{3},{4},{5},{6},{7},{8},{9},{10},{12},{13},\ {14},{1},{2},{3},{4},{5},{6},{7},{8},{9},{10},{11},{13},{14},{1},{2},{3},{4},{\ 5},{6},{7},{8},{9},{10},{11},{12},{14},{1},{2},{3},{4},{5},{6},{7},{8},{9},{\ 10},{11},{12},{13}}},{1,2,2,2,1,2,2,2,1,2,2,2,1,1,1,1,1,2,3,3,3,2,3,3,3,2,2,1,\ 2,2,3,4,4,4,3,4,4,4,3,2,1,2,2,3,4,4,4,3,4,4,4,3,2,1,2,2,3,4,4,4,3,4,4,4,3,1,2,\ 3,3,3,1,1,1,2,3,3,3,2,2,3,4,4,4,1,2,2,3,4,4,4,3,2,3,4,4,4,1,2,2,3,4,4,4,3,2,3,\ 4,4,4,1,2,2,3,4,4,4,3,1,2,3,3,3,2,3,3,3,1,1,1,2,2,3,4,4,4,3,4,4,4,1,2,2,3,2,3,\ 4,4,4,3,4,4,4,1,2,2,3,2,3,4,4,4,3,4,4,4,1,2,2,3,1,2,3,3,3,2,3,3,3,2,3,3,3}}]\\\ nRawGraphData[\\\"Isobutane\\\",\\\"Classes\\\"]:={\\\"Bicolorable\\\",\\\"\ Bipartite\\\",\\\"Bridged\\\",\\\"Class1\\\",\\\"Connected\\\",\\\"Perfect\\\"\ ,\\\"Planar\\\",\\\"SquareFree\\\",\\\"Tree\\\",\\\"TriangleFree\\\"}\\\ nRawGraphData[\\\"Isobutane\\\",\\\"NotationRules\\\"]:={}\\nRawGraphData[\\\"\ Isobutane\\\",\\\"DualGraphName\\\"]:=Missing[\\\"NotAvailable\\\"]\\\ nRawGraphData[\\\"Isobutane\\\",\\\"LineGraphName\\\"]:=Missing[\\\"\ NotAvailable\\\"]\\nRawGraphData[\\\"Isobutane\\\",\\\"ComplementGraphName\\\"\ ]:=Missing[\\\"NotAvailable\\\"]\\nRawGraphData[\\\"Isobutane\\\",\\\"\ PolyhedralEmbeddings\\\"]:={}\\nRawGraphData[\\\"Isobutane\\\",\\\"Girth\\\"]:\ =Infinity\\nRawGraphData[\\\"Isobutane\\\",\\\"Eccentricities\\\"]:={2,3,4,4,\ 4,3,4,4,4,3,4,4,4,3}\\nRawGraphData[\\\"Isobutane\\\",\\\"Diameter\\\"]:=4\\\ nRawGraphData[\\\"Isobutane\\\",\\\"Radius\\\"]:=2\\nRawGraphData[\\\"\ Isobutane\\\",\\\"Automorphisms\\\"]:={{1,2,3,4,5,6,7,8,9,10,11,12,13,14},{1,\ 2,3,4,5,6,7,8,9,10,11,13,12,14},{1,2,3,4,5,6,7,8,9,10,12,11,13,14},{1,2,3,4,5,\ 6,7,8,9,10,12,13,11,14},{1,2,3,4,5,6,7,8,9,10,13,11,12,14},{1,2,3,4,5,6,7,8,9,\ 10,13,12,11,14},{1,2,3,4,5,6,7,9,8,10,11,12,13,14},{1,2,3,4,5,6,7,9,8,10,11,\ 13,12,14},{1,2,3,4,5,6,7,9,8,10,12,11,13,14},{1,2,3,4,5,6,7,9,8,10,12,13,11,\ 14},{1,2,3,4,5,6,7,9,8,10,13,11,12,14},{1,2,3,4,5,6,7,9,8,10,13,12,11,14},{1,\ 2,3,4,5,6,8,7,9,10,11,12,13,14},{1,2,3,4,5,6,8,7,9,10,11,13,12,14},{1,2,3,4,5,\ 6,8,7,9,10,12,11,13,14},{1,2,3,4,5,6,8,7,9,10,12,13,11,14},{1,2,3,4,5,6,8,7,9,\ 10,13,11,12,14},{1,2,3,4,5,6,8,7,9,10,13,12,11,14},{1,2,3,4,5,6,8,9,7,10,11,\ 12,13,14},{1,2,3,4,5,6,8,9,7,10,11,13,12,14},{1,2,3,4,5,6,8,9,7,10,12,11,13,\ 14},{1,2,3,4,5,6,8,9,7,10,12,13,11,14},{1,2,3,4,5,6,8,9,7,10,13,11,12,14},{1,\ 2,3,4,5,6,8,9,7,10,13,12,11,14},{1,2,3,4,5,6,9,7,8,10,11,12,13,14},{1,2,3,4,5,\ 6,9,7,8,10,11,13,12,14},{1,2,3,4,5,6,9,7,8,10,12,11,13,14},{1,2,3,4,5,6,9,7,8,\ 10,12,13,11,14},{1,2,3,4,5,6,9,7,8,10,13,11,12,14},{1,2,3,4,5,6,9,7,8,10,13,\ 12,11,14},{1,2,3,4,5,6,9,8,7,10,11,12,13,14},{1,2,3,4,5,6,9,8,7,10,11,13,12,\ 14},{1,2,3,4,5,6,9,8,7,10,12,11,13,14},{1,2,3,4,5,6,9,8,7,10,12,13,11,14},{1,\ 2,3,4,5,6,9,8,7,10,13,11,12,14},{1,2,3,4,5,6,9,8,7,10,13,12,11,14},{1,2,3,4,5,\ 10,11,12,13,6,7,8,9,14},{1,2,3,4,5,10,11,12,13,6,7,9,8,14},{1,2,3,4,5,10,11,\ 12,13,6,8,7,9,14},{1,2,3,4,5,10,11,12,13,6,8,9,7,14},{1,2,3,4,5,10,11,12,13,6,\ 9,7,8,14},{1,2,3,4,5,10,11,12,13,6,9,8,7,14},{1,2,3,4,5,10,11,13,12,6,7,8,9,\ 14},{1,2,3,4,5,10,11,13,12,6,7,9,8,14},{1,2,3,4,5,10,11,13,12,6,8,7,9,14},{1,\ 2,3,4,5,10,11,13,12,6,8,9,7,14},{1,2,3,4,5,10,11,13,12,6,9,7,8,14},{1,2,3,4,5,\ 10,11,13,12,6,9,8,7,14},{1,2,3,4,5,10,12,11,13,6,7,8,9,14},{1,2,3,4,5,10,12,\ 11,13,6,7,9,8,14},{1,2,3,4,5,10,12,11,13,6,8,7,9,14},{1,2,3,4,5,10,12,11,13,6,\ 8,9,7,14},{1,2,3,4,5,10,12,11,13,6,9,7,8,14},{1,2,3,4,5,10,12,11,13,6,9,8,7,\ 14},{1,2,3,4,5,10,12,13,11,6,7,8,9,14},{1,2,3,4,5,10,12,13,11,6,7,9,8,14},{1,\ 2,3,4,5,10,12,13,11,6,8,7,9,14},{1,2,3,4,5,10,12,13,11,6,8,9,7,14},{1,2,3,4,5,\ 10,12,13,11,6,9,7,8,14},{1,2,3,4,5,10,12,13,11,6,9,8,7,14},{1,2,3,4,5,10,13,\ 11,12,6,7,8,9,14},{1,2,3,4,5,10,13,11,12,6,7,9,8,14},{1,2,3,4,5,10,13,11,12,6,\ 8,7,9,14},{1,2,3,4,5,10,13,11,12,6,8,9,7,14},{1,2,3,4,5,10,13,11,12,6,9,7,8,\ 14},{1,2,3,4,5,10,13,11,12,6,9,8,7,14},{1,2,3,4,5,10,13,12,11,6,7,8,9,14},{1,\ 2,3,4,5,10,13,12,11,6,7,9,8,14},{1,2,3,4,5,10,13,12,11,6,8,7,9,14},{1,2,3,4,5,\ 10,13,12,11,6,8,9,7,14},{1,2,3,4,5,10,13,12,11,6,9,7,8,14},{1,2,3,4,5,10,13,\ 12,11,6,9,8,7,14},{1,2,3,5,4,6,7,8,9,10,11,12,13,14},{1,2,3,5,4,6,7,8,9,10,11,\ 13,12,14},{1,2,3,5,4,6,7,8,9,10,12,11,13,14},{1,2,3,5,4,6,7,8,9,10,12,13,11,\ 14},{1,2,3,5,4,6,7,8,9,10,13,11,12,14},{1,2,3,5,4,6,7,8,9,10,13,12,11,14},{1,\ 2,3,5,4,6,7,9,8,10,11,12,13,14},{1,2,3,5,4,6,7,9,8,10,11,13,12,14},{1,2,3,5,4,\ 6,7,9,8,10,12,11,13,14},{1,2,3,5,4,6,7,9,8,10,12,13,11,14},{1,2,3,5,4,6,7,9,8,\ 10,13,11,12,14},{1,2,3,5,4,6,7,9,8,10,13,12,11,14},{1,2,3,5,4,6,8,7,9,10,11,\ 12,13,14},{1,2,3,5,4,6,8,7,9,10,11,13,12,14},{1,2,3,5,4,6,8,7,9,10,12,11,13,\ 14},{1,2,3,5,4,6,8,7,9,10,12,13,11,14},{1,2,3,5,4,6,8,7,9,10,13,11,12,14},{1,\ 2,3,5,4,6,8,7,9,10,13,12,11,14},{1,2,3,5,4,6,8,9,7,10,11,12,13,14},{1,2,3,5,4,\ 6,8,9,7,10,11,13,12,14},{1,2,3,5,4,6,8,9,7,10,12,11,13,14},{1,2,3,5,4,6,8,9,7,\ 10,12,13,11,14},{1,2,3,5,4,6,8,9,7,10,13,11,12,14},{1,2,3,5,4,6,8,9,7,10,13,\ 12,11,14},{1,2,3,5,4,6,9,7,8,10,11,12,13,14},{1,2,3,5,4,6,9,7,8,10,11,13,12,\ 14},{1,2,3,5,4,6,9,7,8,10,12,11,13,14},{1,2,3,5,4,6,9,7,8,10,12,13,11,14},{1,\ 2,3,5,4,6,9,7,8,10,13,11,12,14},{1,2,3,5,4,6,9,7,8,10,13,12,11,14},{1,2,3,5,4,\ 6,9,8,7,10,11,12,13,14},{1,2,3,5,4,6,9,8,7,10,11,13,12,14},{1,2,3,5,4,6,9,8,7,\ 10,12,11,13,14},{1,2,3,5,4,6,9,8,7,10,12,13,11,14},{1,2,3,5,4,6,9,8,7,10,13,\ 11,12,14},{1,2,3,5,4,6,9,8,7,10,13,12,11,14},{1,2,3,5,4,10,11,12,13,6,7,8,9,\ 14},{1,2,3,5,4,10,11,12,13,6,7,9,8,14},{1,2,3,5,4,10,11,12,13,6,8,7,9,14},{1,\ 2,3,5,4,10,11,12,13,6,8,9,7,14},{1,2,3,5,4,10,11,12,13,6,9,7,8,14},{1,2,3,5,4,\ 10,11,12,13,6,9,8,7,14},{1,2,3,5,4,10,11,13,12,6,7,8,9,14},{1,2,3,5,4,10,11,\ 13,12,6,7,9,8,14},{1,2,3,5,4,10,11,13,12,6,8,7,9,14},{1,2,3,5,4,10,11,13,12,6,\ 8,9,7,14},{1,2,3,5,4,10,11,13,12,6,9,7,8,14},{1,2,3,5,4,10,11,13,12,6,9,8,7,\ 14},{1,2,3,5,4,10,12,11,13,6,7,8,9,14},{1,2,3,5,4,10,12,11,13,6,7,9,8,14},{1,\ 2,3,5,4,10,12,11,13,6,8,7,9,14},{1,2,3,5,4,10,12,11,13,6,8,9,7,14},{1,2,3,5,4,\ 10,12,11,13,6,9,7,8,14},{1,2,3,5,4,10,12,11,13,6,9,8,7,14},{1,2,3,5,4,10,12,\ 13,11,6,7,8,9,14},{1,2,3,5,4,10,12,13,11,6,7,9,8,14},{1,2,3,5,4,10,12,13,11,6,\ 8,7,9,14},{1,2,3,5,4,10,12,13,11,6,8,9,7,14},{1,2,3,5,4,10,12,13,11,6,9,7,8,\ 14},{1,2,3,5,4,10,12,13,11,6,9,8,7,14},{1,2,3,5,4,10,13,11,12,6,7,8,9,14},{1,\ 2,3,5,4,10,13,11,12,6,7,9,8,14},{1,2,3,5,4,10,13,11,12,6,8,7,9,14},{1,2,3,5,4,\ 10,13,11,12,6,8,9,7,14},{1,2,3,5,4,10,13,11,12,6,9,7,8,14},{1,2,3,5,4,10,13,\ 11,12,6,9,8,7,14},{1,2,3,5,4,10,13,12,11,6,7,8,9,14},{1,2,3,5,4,10,13,12,11,6,\ 7,9,8,14},{1,2,3,5,4,10,13,12,11,6,8,7,9,14},{1,2,3,5,4,10,13,12,11,6,8,9,7,\ 14},{1,2,3,5,4,10,13,12,11,6,9,7,8,14},{1,2,3,5,4,10,13,12,11,6,9,8,7,14},{1,\ 2,4,3,5,6,7,8,9,10,11,12,13,14},{1,2,4,3,5,6,7,8,9,10,11,13,12,14},{1,2,4,3,5,\ 6,7,8,9,10,12,11,13,14},{1,2,4,3,5,6,7,8,9,10,12,13,11,14},{1,2,4,3,5,6,7,8,9,\ 10,13,11,12,14},{1,2,4,3,5,6,7,8,9,10,13,12,11,14},{1,2,4,3,5,6,7,9,8,10,11,\ 12,13,14},{1,2,4,3,5,6,7,9,8,10,11,13,12,14},{1,2,4,3,5,6,7,9,8,10,12,11,13,\ 14},{1,2,4,3,5,6,7,9,8,10,12,13,11,14},{1,2,4,3,5,6,7,9,8,10,13,11,12,14},{1,\ 2,4,3,5,6,7,9,8,10,13,12,11,14},{1,2,4,3,5,6,8,7,9,10,11,12,13,14},{1,2,4,3,5,\ 6,8,7,9,10,11,13,12,14},{1,2,4,3,5,6,8,7,9,10,12,11,13,14},{1,2,4,3,5,6,8,7,9,\ 10,12,13,11,14},{1,2,4,3,5,6,8,7,9,10,13,11,12,14},{1,2,4,3,5,6,8,7,9,10,13,\ 12,11,14},{1,2,4,3,5,6,8,9,7,10,11,12,13,14},{1,2,4,3,5,6,8,9,7,10,11,13,12,\ 14},{1,2,4,3,5,6,8,9,7,10,12,11,13,14},{1,2,4,3,5,6,8,9,7,10,12,13,11,14},{1,\ 2,4,3,5,6,8,9,7,10,13,11,12,14},{1,2,4,3,5,6,8,9,7,10,13,12,11,14},{1,2,4,3,5,\ 6,9,7,8,10,11,12,13,14},{1,2,4,3,5,6,9,7,8,10,11,13,12,14},{1,2,4,3,5,6,9,7,8,\ 10,12,11,13,14},{1,2,4,3,5,6,9,7,8,10,12,13,11,14},{1,2,4,3,5,6,9,7,8,10,13,\ 11,12,14},{1,2,4,3,5,6,9,7,8,10,13,12,11,14},{1,2,4,3,5,6,9,8,7,10,11,12,13,\ 14},{1,2,4,3,5,6,9,8,7,10,11,13,12,14},{1,2,4,3,5,6,9,8,7,10,12,11,13,14},{1,\ 2,4,3,5,6,9,8,7,10,12,13,11,14},{1,2,4,3,5,6,9,8,7,10,13,11,12,14},{1,2,4,3,5,\ 6,9,8,7,10,13,12,11,14},{1,2,4,3,5,10,11,12,13,6,7,8,9,14},{1,2,4,3,5,10,11,\ 12,13,6,7,9,8,14},{1,2,4,3,5,10,11,12,13,6,8,7,9,14},{1,2,4,3,5,10,11,12,13,6,\ 8,9,7,14},{1,2,4,3,5,10,11,12,13,6,9,7,8,14},{1,2,4,3,5,10,11,12,13,6,9,8,7,\ 14},{1,2,4,3,5,10,11,13,12,6,7,8,9,14},{1,2,4,3,5,10,11,13,12,6,7,9,8,14},{1,\ 2,4,3,5,10,11,13,12,6,8,7,9,14},{1,2,4,3,5,10,11,13,12,6,8,9,7,14},{1,2,4,3,5,\ 10,11,13,12,6,9,7,8,14},{1,2,4,3,5,10,11,13,12,6,9,8,7,14},{1,2,4,3,5,10,12,\ 11,13,6,7,8,9,14},{1,2,4,3,5,10,12,11,13,6,7,9,8,14},{1,2,4,3,5,10,12,11,13,6,\ 8,7,9,14},{1,2,4,3,5,10,12,11,13,6,8,9,7,14},{1,2,4,3,5,10,12,11,13,6,9,7,8,\ 14},{1,2,4,3,5,10,12,11,13,6,9,8,7,14},{1,2,4,3,5,10,12,13,11,6,7,8,9,14},{1,\ 2,4,3,5,10,12,13,11,6,7,9,8,14},{1,2,4,3,5,10,12,13,11,6,8,7,9,14},{1,2,4,3,5,\ 10,12,13,11,6,8,9,7,14},{1,2,4,3,5,10,12,13,11,6,9,7,8,14},{1,2,4,3,5,10,12,\ 13,11,6,9,8,7,14},{1,2,4,3,5,10,13,11,12,6,7,8,9,14},{1,2,4,3,5,10,13,11,12,6,\ 7,9,8,14},{1,2,4,3,5,10,13,11,12,6,8,7,9,14},{1,2,4,3,5,10,13,11,12,6,8,9,7,\ 14},{1,2,4,3,5,10,13,11,12,6,9,7,8,14},{1,2,4,3,5,10,13,11,12,6,9,8,7,14},{1,\ 2,4,3,5,10,13,12,11,6,7,8,9,14},{1,2,4,3,5,10,13,12,11,6,7,9,8,14},{1,2,4,3,5,\ 10,13,12,11,6,8,7,9,14},{1,2,4,3,5,10,13,12,11,6,8,9,7,14},{1,2,4,3,5,10,13,\ 12,11,6,9,7,8,14},{1,2,4,3,5,10,13,12,11,6,9,8,7,14},{1,2,4,5,3,6,7,8,9,10,11,\ 12,13,14},{1,2,4,5,3,6,7,8,9,10,11,13,12,14},{1,2,4,5,3,6,7,8,9,10,12,11,13,\ 14},{1,2,4,5,3,6,7,8,9,10,12,13,11,14},{1,2,4,5,3,6,7,8,9,10,13,11,12,14},{1,\ 2,4,5,3,6,7,8,9,10,13,12,11,14},{1,2,4,5,3,6,7,9,8,10,11,12,13,14},{1,2,4,5,3,\ 6,7,9,8,10,11,13,12,14},{1,2,4,5,3,6,7,9,8,10,12,11,13,14},{1,2,4,5,3,6,7,9,8,\ 10,12,13,11,14},{1,2,4,5,3,6,7,9,8,10,13,11,12,14},{1,2,4,5,3,6,7,9,8,10,13,\ 12,11,14},{1,2,4,5,3,6,8,7,9,10,11,12,13,14},{1,2,4,5,3,6,8,7,9,10,11,13,12,\ 14},{1,2,4,5,3,6,8,7,9,10,12,11,13,14},{1,2,4,5,3,6,8,7,9,10,12,13,11,14},{1,\ 2,4,5,3,6,8,7,9,10,13,11,12,14},{1,2,4,5,3,6,8,7,9,10,13,12,11,14},{1,2,4,5,3,\ 6,8,9,7,10,11,12,13,14},{1,2,4,5,3,6,8,9,7,10,11,13,12,14},{1,2,4,5,3,6,8,9,7,\ 10,12,11,13,14},{1,2,4,5,3,6,8,9,7,10,12,13,11,14},{1,2,4,5,3,6,8,9,7,10,13,\ 11,12,14},{1,2,4,5,3,6,8,9,7,10,13,12,11,14},{1,2,4,5,3,6,9,7,8,10,11,12,13,\ 14},{1,2,4,5,3,6,9,7,8,10,11,13,12,14},{1,2,4,5,3,6,9,7,8,10,12,11,13,14},{1,\ 2,4,5,3,6,9,7,8,10,12,13,11,14},{1,2,4,5,3,6,9,7,8,10,13,11,12,14},{1,2,4,5,3,\ 6,9,7,8,10,13,12,11,14},{1,2,4,5,3,6,9,8,7,10,11,12,13,14},{1,2,4,5,3,6,9,8,7,\ 10,11,13,12,14},{1,2,4,5,3,6,9,8,7,10,12,11,13,14},{1,2,4,5,3,6,9,8,7,10,12,\ 13,11,14},{1,2,4,5,3,6,9,8,7,10,13,11,12,14},{1,2,4,5,3,6,9,8,7,10,13,12,11,\ 14},{1,2,4,5,3,10,11,12,13,6,7,8,9,14},{1,2,4,5,3,10,11,12,13,6,7,9,8,14},{1,\ 2,4,5,3,10,11,12,13,6,8,7,9,14},{1,2,4,5,3,10,11,12,13,6,8,9,7,14},{1,2,4,5,3,\ 10,11,12,13,6,9,7,8,14},{1,2,4,5,3,10,11,12,13,6,9,8,7,14},{1,2,4,5,3,10,11,\ 13,12,6,7,8,9,14},{1,2,4,5,3,10,11,13,12,6,7,9,8,14},{1,2,4,5,3,10,11,13,12,6,\ 8,7,9,14},{1,2,4,5,3,10,11,13,12,6,8,9,7,14},{1,2,4,5,3,10,11,13,12,6,9,7,8,\ 14},{1,2,4,5,3,10,11,13,12,6,9,8,7,14},{1,2,4,5,3,10,12,11,13,6,7,8,9,14},{1,\ 2,4,5,3,10,12,11,13,6,7,9,8,14},{1,2,4,5,3,10,12,11,13,6,8,7,9,14},{1,2,4,5,3,\ 10,12,11,13,6,8,9,7,14},{1,2,4,5,3,10,12,11,13,6,9,7,8,14},{1,2,4,5,3,10,12,\ 11,13,6,9,8,7,14},{1,2,4,5,3,10,12,13,11,6,7,8,9,14},{1,2,4,5,3,10,12,13,11,6,\ 7,9,8,14},{1,2,4,5,3,10,12,13,11,6,8,7,9,14},{1,2,4,5,3,10,12,13,11,6,8,9,7,\ 14},{1,2,4,5,3,10,12,13,11,6,9,7,8,14},{1,2,4,5,3,10,12,13,11,6,9,8,7,14},{1,\ 2,4,5,3,10,13,11,12,6,7,8,9,14},{1,2,4,5,3,10,13,11,12,6,7,9,8,14},{1,2,4,5,3,\ 10,13,11,12,6,8,7,9,14},{1,2,4,5,3,10,13,11,12,6,8,9,7,14},{1,2,4,5,3,10,13,\ 11,12,6,9,7,8,14},{1,2,4,5,3,10,13,11,12,6,9,8,7,14},{1,2,4,5,3,10,13,12,11,6,\ 7,8,9,14},{1,2,4,5,3,10,13,12,11,6,7,9,8,14},{1,2,4,5,3,10,13,12,11,6,8,7,9,\ 14},{1,2,4,5,3,10,13,12,11,6,8,9,7,14},{1,2,4,5,3,10,13,12,11,6,9,7,8,14},{1,\ 2,4,5,3,10,13,12,11,6,9,8,7,14},{1,2,5,3,4,6,7,8,9,10,11,12,13,14},{1,2,5,3,4,\ 6,7,8,9,10,11,13,12,14},{1,2,5,3,4,6,7,8,9,10,12,11,13,14},{1,2,5,3,4,6,7,8,9,\ 10,12,13,11,14},{1,2,5,3,4,6,7,8,9,10,13,11,12,14},{1,2,5,3,4,6,7,8,9,10,13,\ 12,11,14},{1,2,5,3,4,6,7,9,8,10,11,12,13,14},{1,2,5,3,4,6,7,9,8,10,11,13,12,\ 14},{1,2,5,3,4,6,7,9,8,10,12,11,13,14},{1,2,5,3,4,6,7,9,8,10,12,13,11,14},{1,\ 2,5,3,4,6,7,9,8,10,13,11,12,14},{1,2,5,3,4,6,7,9,8,10,13,12,11,14},{1,2,5,3,4,\ 6,8,7,9,10,11,12,13,14},{1,2,5,3,4,6,8,7,9,10,11,13,12,14},{1,2,5,3,4,6,8,7,9,\ 10,12,11,13,14},{1,2,5,3,4,6,8,7,9,10,12,13,11,14},{1,2,5,3,4,6,8,7,9,10,13,\ 11,12,14},{1,2,5,3,4,6,8,7,9,10,13,12,11,14},{1,2,5,3,4,6,8,9,7,10,11,12,13,\ 14},{1,2,5,3,4,6,8,9,7,10,11,13,12,14},{1,2,5,3,4,6,8,9,7,10,12,11,13,14},{1,\ 2,5,3,4,6,8,9,7,10,12,13,11,14},{1,2,5,3,4,6,8,9,7,10,13,11,12,14},{1,2,5,3,4,\ 6,8,9,7,10,13,12,11,14},{1,2,5,3,4,6,9,7,8,10,11,12,13,14},{1,2,5,3,4,6,9,7,8,\ 10,11,13,12,14},{1,2,5,3,4,6,9,7,8,10,12,11,13,14},{1,2,5,3,4,6,9,7,8,10,12,\ 13,11,14},{1,2,5,3,4,6,9,7,8,10,13,11,12,14},{1,2,5,3,4,6,9,7,8,10,13,12,11,\ 14},{1,2,5,3,4,6,9,8,7,10,11,12,13,14},{1,2,5,3,4,6,9,8,7,10,11,13,12,14},{1,\ 2,5,3,4,6,9,8,7,10,12,11,13,14},{1,2,5,3,4,6,9,8,7,10,12,13,11,14},{1,2,5,3,4,\ 6,9,8,7,10,13,11,12,14},{1,2,5,3,4,6,9,8,7,10,13,12,11,14},{1,2,5,3,4,10,11,\ 12,13,6,7,8,9,14},{1,2,5,3,4,10,11,12,13,6,7,9,8,14},{1,2,5,3,4,10,11,12,13,6,\ 8,7,9,14},{1,2,5,3,4,10,11,12,13,6,8,9,7,14},{1,2,5,3,4,10,11,12,13,6,9,7,8,\ 14},{1,2,5,3,4,10,11,12,13,6,9,8,7,14},{1,2,5,3,4,10,11,13,12,6,7,8,9,14},{1,\ 2,5,3,4,10,11,13,12,6,7,9,8,14},{1,2,5,3,4,10,11,13,12,6,8,7,9,14},{1,2,5,3,4,\ 10,11,13,12,6,8,9,7,14},{1,2,5,3,4,10,11,13,12,6,9,7,8,14},{1,2,5,3,4,10,11,\ 13,12,6,9,8,7,14},{1,2,5,3,4,10,12,11,13,6,7,8,9,14},{1,2,5,3,4,10,12,11,13,6,\ 7,9,8,14},{1,2,5,3,4,10,12,11,13,6,8,7,9,14},{1,2,5,3,4,10,12,11,13,6,8,9,7,\ 14},{1,2,5,3,4,10,12,11,13,6,9,7,8,14},{1,2,5,3,4,10,12,11,13,6,9,8,7,14},{1,\ 2,5,3,4,10,12,13,11,6,7,8,9,14},{1,2,5,3,4,10,12,13,11,6,7,9,8,14},{1,2,5,3,4,\ 10,12,13,11,6,8,7,9,14},{1,2,5,3,4,10,12,13,11,6,8,9,7,14},{1,2,5,3,4,10,12,\ 13,11,6,9,7,8,14},{1,2,5,3,4,10,12,13,11,6,9,8,7,14},{1,2,5,3,4,10,13,11,12,6,\ 7,8,9,14},{1,2,5,3,4,10,13,11,12,6,7,9,8,14},{1,2,5,3,4,10,13,11,12,6,8,7,9,\ 14},{1,2,5,3,4,10,13,11,12,6,8,9,7,14},{1,2,5,3,4,10,13,11,12,6,9,7,8,14},{1,\ 2,5,3,4,10,13,11,12,6,9,8,7,14},{1,2,5,3,4,10,13,12,11,6,7,8,9,14},{1,2,5,3,4,\ 10,13,12,11,6,7,9,8,14},{1,2,5,3,4,10,13,12,11,6,8,7,9,14},{1,2,5,3,4,10,13,\ 12,11,6,8,9,7,14},{1,2,5,3,4,10,13,12,11,6,9,7,8,14},{1,2,5,3,4,10,13,12,11,6,\ 9,8,7,14},{1,2,5,4,3,6,7,8,9,10,11,12,13,14},{1,2,5,4,3,6,7,8,9,10,11,13,12,\ 14},{1,2,5,4,3,6,7,8,9,10,12,11,13,14},{1,2,5,4,3,6,7,8,9,10,12,13,11,14},{1,\ 2,5,4,3,6,7,8,9,10,13,11,12,14},{1,2,5,4,3,6,7,8,9,10,13,12,11,14},{1,2,5,4,3,\ 6,7,9,8,10,11,12,13,14},{1,2,5,4,3,6,7,9,8,10,11,13,12,14},{1,2,5,4,3,6,7,9,8,\ 10,12,11,13,14},{1,2,5,4,3,6,7,9,8,10,12,13,11,14},{1,2,5,4,3,6,7,9,8,10,13,\ 11,12,14},{1,2,5,4,3,6,7,9,8,10,13,12,11,14},{1,2,5,4,3,6,8,7,9,10,11,12,13,\ 14},{1,2,5,4,3,6,8,7,9,10,11,13,12,14},{1,2,5,4,3,6,8,7,9,10,12,11,13,14},{1,\ 2,5,4,3,6,8,7,9,10,12,13,11,14},{1,2,5,4,3,6,8,7,9,10,13,11,12,14},{1,2,5,4,3,\ 6,8,7,9,10,13,12,11,14},{1,2,5,4,3,6,8,9,7,10,11,12,13,14},{1,2,5,4,3,6,8,9,7,\ 10,11,13,12,14},{1,2,5,4,3,6,8,9,7,10,12,11,13,14},{1,2,5,4,3,6,8,9,7,10,12,\ 13,11,14},{1,2,5,4,3,6,8,9,7,10,13,11,12,14},{1,2,5,4,3,6,8,9,7,10,13,12,11,\ 14},{1,2,5,4,3,6,9,7,8,10,11,12,13,14},{1,2,5,4,3,6,9,7,8,10,11,13,12,14},{1,\ 2,5,4,3,6,9,7,8,10,12,11,13,14},{1,2,5,4,3,6,9,7,8,10,12,13,11,14},{1,2,5,4,3,\ 6,9,7,8,10,13,11,12,14},{1,2,5,4,3,6,9,7,8,10,13,12,11,14},{1,2,5,4,3,6,9,8,7,\ 10,11,12,13,14},{1,2,5,4,3,6,9,8,7,10,11,13,12,14},{1,2,5,4,3,6,9,8,7,10,12,\ 11,13,14},{1,2,5,4,3,6,9,8,7,10,12,13,11,14},{1,2,5,4,3,6,9,8,7,10,13,11,12,\ 14},{1,2,5,4,3,6,9,8,7,10,13,12,11,14},{1,2,5,4,3,10,11,12,13,6,7,8,9,14},{1,\ 2,5,4,3,10,11,12,13,6,7,9,8,14},{1,2,5,4,3,10,11,12,13,6,8,7,9,14},{1,2,5,4,3,\ 10,11,12,13,6,8,9,7,14},{1,2,5,4,3,10,11,12,13,6,9,7,8,14},{1,2,5,4,3,10,11,\ 12,13,6,9,8,7,14},{1,2,5,4,3,10,11,13,12,6,7,8,9,14},{1,2,5,4,3,10,11,13,12,6,\ 7,9,8,14},{1,2,5,4,3,10,11,13,12,6,8,7,9,14},{1,2,5,4,3,10,11,13,12,6,8,9,7,\ 14},{1,2,5,4,3,10,11,13,12,6,9,7,8,14},{1,2,5,4,3,10,11,13,12,6,9,8,7,14},{1,\ 2,5,4,3,10,12,11,13,6,7,8,9,14},{1,2,5,4,3,10,12,11,13,6,7,9,8,14},{1,2,5,4,3,\ 10,12,11,13,6,8,7,9,14},{1,2,5,4,3,10,12,11,13,6,8,9,7,14},{1,2,5,4,3,10,12,\ 11,13,6,9,7,8,14},{1,2,5,4,3,10,12,11,13,6,9,8,7,14},{1,2,5,4,3,10,12,13,11,6,\ 7,8,9,14},{1,2,5,4,3,10,12,13,11,6,7,9,8,14},{1,2,5,4,3,10,12,13,11,6,8,7,9,\ 14},{1,2,5,4,3,10,12,13,11,6,8,9,7,14},{1,2,5,4,3,10,12,13,11,6,9,7,8,14},{1,\ 2,5,4,3,10,12,13,11,6,9,8,7,14},{1,2,5,4,3,10,13,11,12,6,7,8,9,14},{1,2,5,4,3,\ 10,13,11,12,6,7,9,8,14},{1,2,5,4,3,10,13,11,12,6,8,7,9,14},{1,2,5,4,3,10,13,\ 11,12,6,8,9,7,14},{1,2,5,4,3,10,13,11,12,6,9,7,8,14},{1,2,5,4,3,10,13,11,12,6,\ 9,8,7,14},{1,2,5,4,3,10,13,12,11,6,7,8,9,14},{1,2,5,4,3,10,13,12,11,6,7,9,8,\ 14},{1,2,5,4,3,10,13,12,11,6,8,7,9,14},{1,2,5,4,3,10,13,12,11,6,8,9,7,14},{1,\ 2,5,4,3,10,13,12,11,6,9,7,8,14},{1,2,5,4,3,10,13,12,11,6,9,8,7,14},{1,6,7,8,9,\ 2,3,4,5,10,11,12,13,14},{1,6,7,8,9,2,3,4,5,10,11,13,12,14},{1,6,7,8,9,2,3,4,5,\ 10,12,11,13,14},{1,6,7,8,9,2,3,4,5,10,12,13,11,14},{1,6,7,8,9,2,3,4,5,10,13,\ 11,12,14},{1,6,7,8,9,2,3,4,5,10,13,12,11,14},{1,6,7,8,9,2,3,5,4,10,11,12,13,\ 14},{1,6,7,8,9,2,3,5,4,10,11,13,12,14},{1,6,7,8,9,2,3,5,4,10,12,11,13,14},{1,\ 6,7,8,9,2,3,5,4,10,12,13,11,14},{1,6,7,8,9,2,3,5,4,10,13,11,12,14},{1,6,7,8,9,\ 2,3,5,4,10,13,12,11,14},{1,6,7,8,9,2,4,3,5,10,11,12,13,14},{1,6,7,8,9,2,4,3,5,\ 10,11,13,12,14},{1,6,7,8,9,2,4,3,5,10,12,11,13,14},{1,6,7,8,9,2,4,3,5,10,12,\ 13,11,14},{1,6,7,8,9,2,4,3,5,10,13,11,12,14},{1,6,7,8,9,2,4,3,5,10,13,12,11,\ 14},{1,6,7,8,9,2,4,5,3,10,11,12,13,14},{1,6,7,8,9,2,4,5,3,10,11,13,12,14},{1,\ 6,7,8,9,2,4,5,3,10,12,11,13,14},{1,6,7,8,9,2,4,5,3,10,12,13,11,14},{1,6,7,8,9,\ 2,4,5,3,10,13,11,12,14},{1,6,7,8,9,2,4,5,3,10,13,12,11,14},{1,6,7,8,9,2,5,3,4,\ 10,11,12,13,14},{1,6,7,8,9,2,5,3,4,10,11,13,12,14},{1,6,7,8,9,2,5,3,4,10,12,\ 11,13,14},{1,6,7,8,9,2,5,3,4,10,12,13,11,14},{1,6,7,8,9,2,5,3,4,10,13,11,12,\ 14},{1,6,7,8,9,2,5,3,4,10,13,12,11,14},{1,6,7,8,9,2,5,4,3,10,11,12,13,14},{1,\ 6,7,8,9,2,5,4,3,10,11,13,12,14},{1,6,7,8,9,2,5,4,3,10,12,11,13,14},{1,6,7,8,9,\ 2,5,4,3,10,12,13,11,14},{1,6,7,8,9,2,5,4,3,10,13,11,12,14},{1,6,7,8,9,2,5,4,3,\ 10,13,12,11,14},{1,6,7,8,9,10,11,12,13,2,3,4,5,14},{1,6,7,8,9,10,11,12,13,2,3,\ 5,4,14},{1,6,7,8,9,10,11,12,13,2,4,3,5,14},{1,6,7,8,9,10,11,12,13,2,4,5,3,14},\ {1,6,7,8,9,10,11,12,13,2,5,3,4,14},{1,6,7,8,9,10,11,12,13,2,5,4,3,14},{1,6,7,\ 8,9,10,11,13,12,2,3,4,5,14},{1,6,7,8,9,10,11,13,12,2,3,5,4,14},{1,6,7,8,9,10,\ 11,13,12,2,4,3,5,14},{1,6,7,8,9,10,11,13,12,2,4,5,3,14},{1,6,7,8,9,10,11,13,\ 12,2,5,3,4,14},{1,6,7,8,9,10,11,13,12,2,5,4,3,14},{1,6,7,8,9,10,12,11,13,2,3,\ 4,5,14},{1,6,7,8,9,10,12,11,13,2,3,5,4,14},{1,6,7,8,9,10,12,11,13,2,4,3,5,14},\ {1,6,7,8,9,10,12,11,13,2,4,5,3,14},{1,6,7,8,9,10,12,11,13,2,5,3,4,14},{1,6,7,\ 8,9,10,12,11,13,2,5,4,3,14},{1,6,7,8,9,10,12,13,11,2,3,4,5,14},{1,6,7,8,9,10,\ 12,13,11,2,3,5,4,14},{1,6,7,8,9,10,12,13,11,2,4,3,5,14},{1,6,7,8,9,10,12,13,\ 11,2,4,5,3,14},{1,6,7,8,9,10,12,13,11,2,5,3,4,14},{1,6,7,8,9,10,12,13,11,2,5,\ 4,3,14},{1,6,7,8,9,10,13,11,12,2,3,4,5,14},{1,6,7,8,9,10,13,11,12,2,3,5,4,14},\ {1,6,7,8,9,10,13,11,12,2,4,3,5,14},{1,6,7,8,9,10,13,11,12,2,4,5,3,14},{1,6,7,\ 8,9,10,13,11,12,2,5,3,4,14},{1,6,7,8,9,10,13,11,12,2,5,4,3,14},{1,6,7,8,9,10,\ 13,12,11,2,3,4,5,14},{1,6,7,8,9,10,13,12,11,2,3,5,4,14},{1,6,7,8,9,10,13,12,\ 11,2,4,3,5,14},{1,6,7,8,9,10,13,12,11,2,4,5,3,14},{1,6,7,8,9,10,13,12,11,2,5,\ 3,4,14},{1,6,7,8,9,10,13,12,11,2,5,4,3,14},{1,6,7,9,8,2,3,4,5,10,11,12,13,14},\ {1,6,7,9,8,2,3,4,5,10,11,13,12,14},{1,6,7,9,8,2,3,4,5,10,12,11,13,14},{1,6,7,\ 9,8,2,3,4,5,10,12,13,11,14},{1,6,7,9,8,2,3,4,5,10,13,11,12,14},{1,6,7,9,8,2,3,\ 4,5,10,13,12,11,14},{1,6,7,9,8,2,3,5,4,10,11,12,13,14},{1,6,7,9,8,2,3,5,4,10,\ 11,13,12,14},{1,6,7,9,8,2,3,5,4,10,12,11,13,14},{1,6,7,9,8,2,3,5,4,10,12,13,\ 11,14},{1,6,7,9,8,2,3,5,4,10,13,11,12,14},{1,6,7,9,8,2,3,5,4,10,13,12,11,14},{\ 1,6,7,9,8,2,4,3,5,10,11,12,13,14},{1,6,7,9,8,2,4,3,5,10,11,13,12,14},{1,6,7,9,\ 8,2,4,3,5,10,12,11,13,14},{1,6,7,9,8,2,4,3,5,10,12,13,11,14},{1,6,7,9,8,2,4,3,\ 5,10,13,11,12,14},{1,6,7,9,8,2,4,3,5,10,13,12,11,14},{1,6,7,9,8,2,4,5,3,10,11,\ 12,13,14},{1,6,7,9,8,2,4,5,3,10,11,13,12,14},{1,6,7,9,8,2,4,5,3,10,12,11,13,\ 14},{1,6,7,9,8,2,4,5,3,10,12,13,11,14},{1,6,7,9,8,2,4,5,3,10,13,11,12,14},{1,\ 6,7,9,8,2,4,5,3,10,13,12,11,14},{1,6,7,9,8,2,5,3,4,10,11,12,13,14},{1,6,7,9,8,\ 2,5,3,4,10,11,13,12,14},{1,6,7,9,8,2,5,3,4,10,12,11,13,14},{1,6,7,9,8,2,5,3,4,\ 10,12,13,11,14},{1,6,7,9,8,2,5,3,4,10,13,11,12,14},{1,6,7,9,8,2,5,3,4,10,13,\ 12,11,14},{1,6,7,9,8,2,5,4,3,10,11,12,13,14},{1,6,7,9,8,2,5,4,3,10,11,13,12,\ 14},{1,6,7,9,8,2,5,4,3,10,12,11,13,14},{1,6,7,9,8,2,5,4,3,10,12,13,11,14},{1,\ 6,7,9,8,2,5,4,3,10,13,11,12,14},{1,6,7,9,8,2,5,4,3,10,13,12,11,14},{1,6,7,9,8,\ 10,11,12,13,2,3,4,5,14},{1,6,7,9,8,10,11,12,13,2,3,5,4,14},{1,6,7,9,8,10,11,\ 12,13,2,4,3,5,14},{1,6,7,9,8,10,11,12,13,2,4,5,3,14},{1,6,7,9,8,10,11,12,13,2,\ 5,3,4,14},{1,6,7,9,8,10,11,12,13,2,5,4,3,14},{1,6,7,9,8,10,11,13,12,2,3,4,5,\ 14},{1,6,7,9,8,10,11,13,12,2,3,5,4,14},{1,6,7,9,8,10,11,13,12,2,4,3,5,14},{1,\ 6,7,9,8,10,11,13,12,2,4,5,3,14},{1,6,7,9,8,10,11,13,12,2,5,3,4,14},{1,6,7,9,8,\ 10,11,13,12,2,5,4,3,14},{1,6,7,9,8,10,12,11,13,2,3,4,5,14},{1,6,7,9,8,10,12,\ 11,13,2,3,5,4,14},{1,6,7,9,8,10,12,11,13,2,4,3,5,14},{1,6,7,9,8,10,12,11,13,2,\ 4,5,3,14},{1,6,7,9,8,10,12,11,13,2,5,3,4,14},{1,6,7,9,8,10,12,11,13,2,5,4,3,\ 14},{1,6,7,9,8,10,12,13,11,2,3,4,5,14},{1,6,7,9,8,10,12,13,11,2,3,5,4,14},{1,\ 6,7,9,8,10,12,13,11,2,4,3,5,14},{1,6,7,9,8,10,12,13,11,2,4,5,3,14},{1,6,7,9,8,\ 10,12,13,11,2,5,3,4,14},{1,6,7,9,8,10,12,13,11,2,5,4,3,14},{1,6,7,9,8,10,13,\ 11,12,2,3,4,5,14},{1,6,7,9,8,10,13,11,12,2,3,5,4,14},{1,6,7,9,8,10,13,11,12,2,\ 4,3,5,14},{1,6,7,9,8,10,13,11,12,2,4,5,3,14},{1,6,7,9,8,10,13,11,12,2,5,3,4,\ 14},{1,6,7,9,8,10,13,11,12,2,5,4,3,14},{1,6,7,9,8,10,13,12,11,2,3,4,5,14},{1,\ 6,7,9,8,10,13,12,11,2,3,5,4,14},{1,6,7,9,8,10,13,12,11,2,4,3,5,14},{1,6,7,9,8,\ 10,13,12,11,2,4,5,3,14},{1,6,7,9,8,10,13,12,11,2,5,3,4,14},{1,6,7,9,8,10,13,\ 12,11,2,5,4,3,14},{1,6,8,7,9,2,3,4,5,10,11,12,13,14},{1,6,8,7,9,2,3,4,5,10,11,\ 13,12,14},{1,6,8,7,9,2,3,4,5,10,12,11,13,14},{1,6,8,7,9,2,3,4,5,10,12,13,11,\ 14},{1,6,8,7,9,2,3,4,5,10,13,11,12,14},{1,6,8,7,9,2,3,4,5,10,13,12,11,14},{1,\ 6,8,7,9,2,3,5,4,10,11,12,13,14},{1,6,8,7,9,2,3,5,4,10,11,13,12,14},{1,6,8,7,9,\ 2,3,5,4,10,12,11,13,14},{1,6,8,7,9,2,3,5,4,10,12,13,11,14},{1,6,8,7,9,2,3,5,4,\ 10,13,11,12,14},{1,6,8,7,9,2,3,5,4,10,13,12,11,14},{1,6,8,7,9,2,4,3,5,10,11,\ 12,13,14},{1,6,8,7,9,2,4,3,5,10,11,13,12,14},{1,6,8,7,9,2,4,3,5,10,12,11,13,\ 14},{1,6,8,7,9,2,4,3,5,10,12,13,11,14},{1,6,8,7,9,2,4,3,5,10,13,11,12,14},{1,\ 6,8,7,9,2,4,3,5,10,13,12,11,14},{1,6,8,7,9,2,4,5,3,10,11,12,13,14},{1,6,8,7,9,\ 2,4,5,3,10,11,13,12,14},{1,6,8,7,9,2,4,5,3,10,12,11,13,14},{1,6,8,7,9,2,4,5,3,\ 10,12,13,11,14},{1,6,8,7,9,2,4,5,3,10,13,11,12,14},{1,6,8,7,9,2,4,5,3,10,13,\ 12,11,14},{1,6,8,7,9,2,5,3,4,10,11,12,13,14},{1,6,8,7,9,2,5,3,4,10,11,13,12,\ 14},{1,6,8,7,9,2,5,3,4,10,12,11,13,14},{1,6,8,7,9,2,5,3,4,10,12,13,11,14},{1,\ 6,8,7,9,2,5,3,4,10,13,11,12,14},{1,6,8,7,9,2,5,3,4,10,13,12,11,14},{1,6,8,7,9,\ 2,5,4,3,10,11,12,13,14},{1,6,8,7,9,2,5,4,3,10,11,13,12,14},{1,6,8,7,9,2,5,4,3,\ 10,12,11,13,14},{1,6,8,7,9,2,5,4,3,10,12,13,11,14},{1,6,8,7,9,2,5,4,3,10,13,\ 11,12,14},{1,6,8,7,9,2,5,4,3,10,13,12,11,14},{1,6,8,7,9,10,11,12,13,2,3,4,5,\ 14},{1,6,8,7,9,10,11,12,13,2,3,5,4,14},{1,6,8,7,9,10,11,12,13,2,4,3,5,14},{1,\ 6,8,7,9,10,11,12,13,2,4,5,3,14},{1,6,8,7,9,10,11,12,13,2,5,3,4,14},{1,6,8,7,9,\ 10,11,12,13,2,5,4,3,14},{1,6,8,7,9,10,11,13,12,2,3,4,5,14},{1,6,8,7,9,10,11,\ 13,12,2,3,5,4,14},{1,6,8,7,9,10,11,13,12,2,4,3,5,14},{1,6,8,7,9,10,11,13,12,2,\ 4,5,3,14},{1,6,8,7,9,10,11,13,12,2,5,3,4,14},{1,6,8,7,9,10,11,13,12,2,5,4,3,\ 14},{1,6,8,7,9,10,12,11,13,2,3,4,5,14},{1,6,8,7,9,10,12,11,13,2,3,5,4,14},{1,\ 6,8,7,9,10,12,11,13,2,4,3,5,14},{1,6,8,7,9,10,12,11,13,2,4,5,3,14},{1,6,8,7,9,\ 10,12,11,13,2,5,3,4,14},{1,6,8,7,9,10,12,11,13,2,5,4,3,14},{1,6,8,7,9,10,12,\ 13,11,2,3,4,5,14},{1,6,8,7,9,10,12,13,11,2,3,5,4,14},{1,6,8,7,9,10,12,13,11,2,\ 4,3,5,14},{1,6,8,7,9,10,12,13,11,2,4,5,3,14},{1,6,8,7,9,10,12,13,11,2,5,3,4,\ 14},{1,6,8,7,9,10,12,13,11,2,5,4,3,14},{1,6,8,7,9,10,13,11,12,2,3,4,5,14},{1,\ 6,8,7,9,10,13,11,12,2,3,5,4,14},{1,6,8,7,9,10,13,11,12,2,4,3,5,14},{1,6,8,7,9,\ 10,13,11,12,2,4,5,3,14},{1,6,8,7,9,10,13,11,12,2,5,3,4,14},{1,6,8,7,9,10,13,\ 11,12,2,5,4,3,14},{1,6,8,7,9,10,13,12,11,2,3,4,5,14},{1,6,8,7,9,10,13,12,11,2,\ 3,5,4,14},{1,6,8,7,9,10,13,12,11,2,4,3,5,14},{1,6,8,7,9,10,13,12,11,2,4,5,3,\ 14},{1,6,8,7,9,10,13,12,11,2,5,3,4,14},{1,6,8,7,9,10,13,12,11,2,5,4,3,14},{1,\ 6,8,9,7,2,3,4,5,10,11,12,13,14},{1,6,8,9,7,2,3,4,5,10,11,13,12,14},{1,6,8,9,7,\ 2,3,4,5,10,12,11,13,14},{1,6,8,9,7,2,3,4,5,10,12,13,11,14},{1,6,8,9,7,2,3,4,5,\ 10,13,11,12,14},{1,6,8,9,7,2,3,4,5,10,13,12,11,14},{1,6,8,9,7,2,3,5,4,10,11,\ 12,13,14},{1,6,8,9,7,2,3,5,4,10,11,13,12,14},{1,6,8,9,7,2,3,5,4,10,12,11,13,\ 14},{1,6,8,9,7,2,3,5,4,10,12,13,11,14},{1,6,8,9,7,2,3,5,4,10,13,11,12,14},{1,\ 6,8,9,7,2,3,5,4,10,13,12,11,14},{1,6,8,9,7,2,4,3,5,10,11,12,13,14},{1,6,8,9,7,\ 2,4,3,5,10,11,13,12,14},{1,6,8,9,7,2,4,3,5,10,12,11,13,14},{1,6,8,9,7,2,4,3,5,\ 10,12,13,11,14},{1,6,8,9,7,2,4,3,5,10,13,11,12,14},{1,6,8,9,7,2,4,3,5,10,13,\ 12,11,14},{1,6,8,9,7,2,4,5,3,10,11,12,13,14},{1,6,8,9,7,2,4,5,3,10,11,13,12,\ 14},{1,6,8,9,7,2,4,5,3,10,12,11,13,14},{1,6,8,9,7,2,4,5,3,10,12,13,11,14},{1,\ 6,8,9,7,2,4,5,3,10,13,11,12,14},{1,6,8,9,7,2,4,5,3,10,13,12,11,14},{1,6,8,9,7,\ 2,5,3,4,10,11,12,13,14},{1,6,8,9,7,2,5,3,4,10,11,13,12,14},{1,6,8,9,7,2,5,3,4,\ 10,12,11,13,14},{1,6,8,9,7,2,5,3,4,10,12,13,11,14},{1,6,8,9,7,2,5,3,4,10,13,\ 11,12,14},{1,6,8,9,7,2,5,3,4,10,13,12,11,14},{1,6,8,9,7,2,5,4,3,10,11,12,13,\ 14},{1,6,8,9,7,2,5,4,3,10,11,13,12,14},{1,6,8,9,7,2,5,4,3,10,12,11,13,14},{1,\ 6,8,9,7,2,5,4,3,10,12,13,11,14},{1,6,8,9,7,2,5,4,3,10,13,11,12,14},{1,6,8,9,7,\ 2,5,4,3,10,13,12,11,14},{1,6,8,9,7,10,11,12,13,2,3,4,5,14},{1,6,8,9,7,10,11,\ 12,13,2,3,5,4,14},{1,6,8,9,7,10,11,12,13,2,4,3,5,14},{1,6,8,9,7,10,11,12,13,2,\ 4,5,3,14},{1,6,8,9,7,10,11,12,13,2,5,3,4,14},{1,6,8,9,7,10,11,12,13,2,5,4,3,\ 14},{1,6,8,9,7,10,11,13,12,2,3,4,5,14},{1,6,8,9,7,10,11,13,12,2,3,5,4,14},{1,\ 6,8,9,7,10,11,13,12,2,4,3,5,14},{1,6,8,9,7,10,11,13,12,2,4,5,3,14},{1,6,8,9,7,\ 10,11,13,12,2,5,3,4,14},{1,6,8,9,7,10,11,13,12,2,5,4,3,14},{1,6,8,9,7,10,12,\ 11,13,2,3,4,5,14},{1,6,8,9,7,10,12,11,13,2,3,5,4,14},{1,6,8,9,7,10,12,11,13,2,\ 4,3,5,14},{1,6,8,9,7,10,12,11,13,2,4,5,3,14},{1,6,8,9,7,10,12,11,13,2,5,3,4,\ 14},{1,6,8,9,7,10,12,11,13,2,5,4,3,14},{1,6,8,9,7,10,12,13,11,2,3,4,5,14},{1,\ 6,8,9,7,10,12,13,11,2,3,5,4,14},{1,6,8,9,7,10,12,13,11,2,4,3,5,14},{1,6,8,9,7,\ 10,12,13,11,2,4,5,3,14},{1,6,8,9,7,10,12,13,11,2,5,3,4,14},{1,6,8,9,7,10,12,\ 13,11,2,5,4,3,14},{1,6,8,9,7,10,13,11,12,2,3,4,5,14},{1,6,8,9,7,10,13,11,12,2,\ 3,5,4,14},{1,6,8,9,7,10,13,11,12,2,4,3,5,14},{1,6,8,9,7,10,13,11,12,2,4,5,3,\ 14},{1,6,8,9,7,10,13,11,12,2,5,3,4,14},{1,6,8,9,7,10,13,11,12,2,5,4,3,14},{1,\ 6,8,9,7,10,13,12,11,2,3,4,5,14},{1,6,8,9,7,10,13,12,11,2,3,5,4,14},{1,6,8,9,7,\ 10,13,12,11,2,4,3,5,14},{1,6,8,9,7,10,13,12,11,2,4,5,3,14},{1,6,8,9,7,10,13,\ 12,11,2,5,3,4,14},{1,6,8,9,7,10,13,12,11,2,5,4,3,14},{1,6,9,7,8,2,3,4,5,10,11,\ 12,13,14},{1,6,9,7,8,2,3,4,5,10,11,13,12,14},{1,6,9,7,8,2,3,4,5,10,12,11,13,\ 14},{1,6,9,7,8,2,3,4,5,10,12,13,11,14},{1,6,9,7,8,2,3,4,5,10,13,11,12,14},{1,\ 6,9,7,8,2,3,4,5,10,13,12,11,14},{1,6,9,7,8,2,3,5,4,10,11,12,13,14},{1,6,9,7,8,\ 2,3,5,4,10,11,13,12,14},{1,6,9,7,8,2,3,5,4,10,12,11,13,14},{1,6,9,7,8,2,3,5,4,\ 10,12,13,11,14},{1,6,9,7,8,2,3,5,4,10,13,11,12,14},{1,6,9,7,8,2,3,5,4,10,13,\ 12,11,14},{1,6,9,7,8,2,4,3,5,10,11,12,13,14},{1,6,9,7,8,2,4,3,5,10,11,13,12,\ 14},{1,6,9,7,8,2,4,3,5,10,12,11,13,14},{1,6,9,7,8,2,4,3,5,10,12,13,11,14},{1,\ 6,9,7,8,2,4,3,5,10,13,11,12,14},{1,6,9,7,8,2,4,3,5,10,13,12,11,14},{1,6,9,7,8,\ 2,4,5,3,10,11,12,13,14},{1,6,9,7,8,2,4,5,3,10,11,13,12,14},{1,6,9,7,8,2,4,5,3,\ 10,12,11,13,14},{1,6,9,7,8,2,4,5,3,10,12,13,11,14},{1,6,9,7,8,2,4,5,3,10,13,\ 11,12,14},{1,6,9,7,8,2,4,5,3,10,13,12,11,14},{1,6,9,7,8,2,5,3,4,10,11,12,13,\ 14},{1,6,9,7,8,2,5,3,4,10,11,13,12,14},{1,6,9,7,8,2,5,3,4,10,12,11,13,14},{1,\ 6,9,7,8,2,5,3,4,10,12,13,11,14},{1,6,9,7,8,2,5,3,4,10,13,11,12,14},{1,6,9,7,8,\ 2,5,3,4,10,13,12,11,14},{1,6,9,7,8,2,5,4,3,10,11,12,13,14},{1,6,9,7,8,2,5,4,3,\ 10,11,13,12,14},{1,6,9,7,8,2,5,4,3,10,12,11,13,14},{1,6,9,7,8,2,5,4,3,10,12,\ 13,11,14},{1,6,9,7,8,2,5,4,3,10,13,11,12,14},{1,6,9,7,8,2,5,4,3,10,13,12,11,\ 14},{1,6,9,7,8,10,11,12,13,2,3,4,5,14},{1,6,9,7,8,10,11,12,13,2,3,5,4,14},{1,\ 6,9,7,8,10,11,12,13,2,4,3,5,14},{1,6,9,7,8,10,11,12,13,2,4,5,3,14},{1,6,9,7,8,\ 10,11,12,13,2,5,3,4,14},{1,6,9,7,8,10,11,12,13,2,5,4,3,14},{1,6,9,7,8,10,11,\ 13,12,2,3,4,5,14},{1,6,9,7,8,10,11,13,12,2,3,5,4,14},{1,6,9,7,8,10,11,13,12,2,\ 4,3,5,14},{1,6,9,7,8,10,11,13,12,2,4,5,3,14},{1,6,9,7,8,10,11,13,12,2,5,3,4,\ 14},{1,6,9,7,8,10,11,13,12,2,5,4,3,14},{1,6,9,7,8,10,12,11,13,2,3,4,5,14},{1,\ 6,9,7,8,10,12,11,13,2,3,5,4,14},{1,6,9,7,8,10,12,11,13,2,4,3,5,14},{1,6,9,7,8,\ 10,12,11,13,2,4,5,3,14},{1,6,9,7,8,10,12,11,13,2,5,3,4,14},{1,6,9,7,8,10,12,\ 11,13,2,5,4,3,14},{1,6,9,7,8,10,12,13,11,2,3,4,5,14},{1,6,9,7,8,10,12,13,11,2,\ 3,5,4,14},{1,6,9,7,8,10,12,13,11,2,4,3,5,14},{1,6,9,7,8,10,12,13,11,2,4,5,3,\ 14},{1,6,9,7,8,10,12,13,11,2,5,3,4,14},{1,6,9,7,8,10,12,13,11,2,5,4,3,14},{1,\ 6,9,7,8,10,13,11,12,2,3,4,5,14},{1,6,9,7,8,10,13,11,12,2,3,5,4,14},{1,6,9,7,8,\ 10,13,11,12,2,4,3,5,14},{1,6,9,7,8,10,13,11,12,2,4,5,3,14},{1,6,9,7,8,10,13,\ 11,12,2,5,3,4,14},{1,6,9,7,8,10,13,11,12,2,5,4,3,14},{1,6,9,7,8,10,13,12,11,2,\ 3,4,5,14},{1,6,9,7,8,10,13,12,11,2,3,5,4,14},{1,6,9,7,8,10,13,12,11,2,4,3,5,\ 14},{1,6,9,7,8,10,13,12,11,2,4,5,3,14},{1,6,9,7,8,10,13,12,11,2,5,3,4,14},{1,\ 6,9,7,8,10,13,12,11,2,5,4,3,14},{1,6,9,8,7,2,3,4,5,10,11,12,13,14},{1,6,9,8,7,\ 2,3,4,5,10,11,13,12,14},{1,6,9,8,7,2,3,4,5,10,12,11,13,14},{1,6,9,8,7,2,3,4,5,\ 10,12,13,11,14},{1,6,9,8,7,2,3,4,5,10,13,11,12,14},{1,6,9,8,7,2,3,4,5,10,13,\ 12,11,14},{1,6,9,8,7,2,3,5,4,10,11,12,13,14},{1,6,9,8,7,2,3,5,4,10,11,13,12,\ 14},{1,6,9,8,7,2,3,5,4,10,12,11,13,14},{1,6,9,8,7,2,3,5,4,10,12,13,11,14},{1,\ 6,9,8,7,2,3,5,4,10,13,11,12,14},{1,6,9,8,7,2,3,5,4,10,13,12,11,14},{1,6,9,8,7,\ 2,4,3,5,10,11,12,13,14},{1,6,9,8,7,2,4,3,5,10,11,13,12,14},{1,6,9,8,7,2,4,3,5,\ 10,12,11,13,14},{1,6,9,8,7,2,4,3,5,10,12,13,11,14},{1,6,9,8,7,2,4,3,5,10,13,\ 11,12,14},{1,6,9,8,7,2,4,3,5,10,13,12,11,14},{1,6,9,8,7,2,4,5,3,10,11,12,13,\ 14},{1,6,9,8,7,2,4,5,3,10,11,13,12,14},{1,6,9,8,7,2,4,5,3,10,12,11,13,14},{1,\ 6,9,8,7,2,4,5,3,10,12,13,11,14},{1,6,9,8,7,2,4,5,3,10,13,11,12,14},{1,6,9,8,7,\ 2,4,5,3,10,13,12,11,14},{1,6,9,8,7,2,5,3,4,10,11,12,13,14},{1,6,9,8,7,2,5,3,4,\ 10,11,13,12,14},{1,6,9,8,7,2,5,3,4,10,12,11,13,14},{1,6,9,8,7,2,5,3,4,10,12,\ 13,11,14},{1,6,9,8,7,2,5,3,4,10,13,11,12,14},{1,6,9,8,7,2,5,3,4,10,13,12,11,\ 14},{1,6,9,8,7,2,5,4,3,10,11,12,13,14},{1,6,9,8,7,2,5,4,3,10,11,13,12,14},{1,\ 6,9,8,7,2,5,4,3,10,12,11,13,14},{1,6,9,8,7,2,5,4,3,10,12,13,11,14},{1,6,9,8,7,\ 2,5,4,3,10,13,11,12,14},{1,6,9,8,7,2,5,4,3,10,13,12,11,14},{1,6,9,8,7,10,11,\ 12,13,2,3,4,5,14},{1,6,9,8,7,10,11,12,13,2,3,5,4,14},{1,6,9,8,7,10,11,12,13,2,\ 4,3,5,14},{1,6,9,8,7,10,11,12,13,2,4,5,3,14},{1,6,9,8,7,10,11,12,13,2,5,3,4,\ 14},{1,6,9,8,7,10,11,12,13,2,5,4,3,14},{1,6,9,8,7,10,11,13,12,2,3,4,5,14},{1,\ 6,9,8,7,10,11,13,12,2,3,5,4,14},{1,6,9,8,7,10,11,13,12,2,4,3,5,14},{1,6,9,8,7,\ 10,11,13,12,2,4,5,3,14},{1,6,9,8,7,10,11,13,12,2,5,3,4,14},{1,6,9,8,7,10,11,\ 13,12,2,5,4,3,14},{1,6,9,8,7,10,12,11,13,2,3,4,5,14},{1,6,9,8,7,10,12,11,13,2,\ 3,5,4,14},{1,6,9,8,7,10,12,11,13,2,4,3,5,14},{1,6,9,8,7,10,12,11,13,2,4,5,3,\ 14},{1,6,9,8,7,10,12,11,13,2,5,3,4,14},{1,6,9,8,7,10,12,11,13,2,5,4,3,14},{1,\ 6,9,8,7,10,12,13,11,2,3,4,5,14},{1,6,9,8,7,10,12,13,11,2,3,5,4,14},{1,6,9,8,7,\ 10,12,13,11,2,4,3,5,14},{1,6,9,8,7,10,12,13,11,2,4,5,3,14},{1,6,9,8,7,10,12,\ 13,11,2,5,3,4,14},{1,6,9,8,7,10,12,13,11,2,5,4,3,14},{1,6,9,8,7,10,13,11,12,2,\ 3,4,5,14},{1,6,9,8,7,10,13,11,12,2,3,5,4,14},{1,6,9,8,7,10,13,11,12,2,4,3,5,\ 14},{1,6,9,8,7,10,13,11,12,2,4,5,3,14},{1,6,9,8,7,10,13,11,12,2,5,3,4,14},{1,\ 6,9,8,7,10,13,11,12,2,5,4,3,14},{1,6,9,8,7,10,13,12,11,2,3,4,5,14},{1,6,9,8,7,\ 10,13,12,11,2,3,5,4,14},{1,6,9,8,7,10,13,12,11,2,4,3,5,14},{1,6,9,8,7,10,13,\ 12,11,2,4,5,3,14},{1,6,9,8,7,10,13,12,11,2,5,3,4,14},{1,6,9,8,7,10,13,12,11,2,\ 5,4,3,14},{1,10,11,12,13,2,3,4,5,6,7,8,9,14},{1,10,11,12,13,2,3,4,5,6,7,9,8,\ 14},{1,10,11,12,13,2,3,4,5,6,8,7,9,14},{1,10,11,12,13,2,3,4,5,6,8,9,7,14},{1,\ 10,11,12,13,2,3,4,5,6,9,7,8,14},{1,10,11,12,13,2,3,4,5,6,9,8,7,14},{1,10,11,\ 12,13,2,3,5,4,6,7,8,9,14},{1,10,11,12,13,2,3,5,4,6,7,9,8,14},{1,10,11,12,13,2,\ 3,5,4,6,8,7,9,14},{1,10,11,12,13,2,3,5,4,6,8,9,7,14},{1,10,11,12,13,2,3,5,4,6,\ 9,7,8,14},{1,10,11,12,13,2,3,5,4,6,9,8,7,14},{1,10,11,12,13,2,4,3,5,6,7,8,9,\ 14},{1,10,11,12,13,2,4,3,5,6,7,9,8,14},{1,10,11,12,13,2,4,3,5,6,8,7,9,14},{1,\ 10,11,12,13,2,4,3,5,6,8,9,7,14},{1,10,11,12,13,2,4,3,5,6,9,7,8,14},{1,10,11,\ 12,13,2,4,3,5,6,9,8,7,14},{1,10,11,12,13,2,4,5,3,6,7,8,9,14},{1,10,11,12,13,2,\ 4,5,3,6,7,9,8,14},{1,10,11,12,13,2,4,5,3,6,8,7,9,14},{1,10,11,12,13,2,4,5,3,6,\ 8,9,7,14},{1,10,11,12,13,2,4,5,3,6,9,7,8,14},{1,10,11,12,13,2,4,5,3,6,9,8,7,\ 14},{1,10,11,12,13,2,5,3,4,6,7,8,9,14},{1,10,11,12,13,2,5,3,4,6,7,9,8,14},{1,\ 10,11,12,13,2,5,3,4,6,8,7,9,14},{1,10,11,12,13,2,5,3,4,6,8,9,7,14},{1,10,11,\ 12,13,2,5,3,4,6,9,7,8,14},{1,10,11,12,13,2,5,3,4,6,9,8,7,14},{1,10,11,12,13,2,\ 5,4,3,6,7,8,9,14},{1,10,11,12,13,2,5,4,3,6,7,9,8,14},{1,10,11,12,13,2,5,4,3,6,\ 8,7,9,14},{1,10,11,12,13,2,5,4,3,6,8,9,7,14},{1,10,11,12,13,2,5,4,3,6,9,7,8,\ 14},{1,10,11,12,13,2,5,4,3,6,9,8,7,14},{1,10,11,12,13,6,7,8,9,2,3,4,5,14},{1,\ 10,11,12,13,6,7,8,9,2,3,5,4,14},{1,10,11,12,13,6,7,8,9,2,4,3,5,14},{1,10,11,\ 12,13,6,7,8,9,2,4,5,3,14},{1,10,11,12,13,6,7,8,9,2,5,3,4,14},{1,10,11,12,13,6,\ 7,8,9,2,5,4,3,14},{1,10,11,12,13,6,7,9,8,2,3,4,5,14},{1,10,11,12,13,6,7,9,8,2,\ 3,5,4,14},{1,10,11,12,13,6,7,9,8,2,4,3,5,14},{1,10,11,12,13,6,7,9,8,2,4,5,3,\ 14},{1,10,11,12,13,6,7,9,8,2,5,3,4,14},{1,10,11,12,13,6,7,9,8,2,5,4,3,14},{1,\ 10,11,12,13,6,8,7,9,2,3,4,5,14},{1,10,11,12,13,6,8,7,9,2,3,5,4,14},{1,10,11,\ 12,13,6,8,7,9,2,4,3,5,14},{1,10,11,12,13,6,8,7,9,2,4,5,3,14},{1,10,11,12,13,6,\ 8,7,9,2,5,3,4,14},{1,10,11,12,13,6,8,7,9,2,5,4,3,14},{1,10,11,12,13,6,8,9,7,2,\ 3,4,5,14},{1,10,11,12,13,6,8,9,7,2,3,5,4,14},{1,10,11,12,13,6,8,9,7,2,4,3,5,\ 14},{1,10,11,12,13,6,8,9,7,2,4,5,3,14},{1,10,11,12,13,6,8,9,7,2,5,3,4,14},{1,\ 10,11,12,13,6,8,9,7,2,5,4,3,14},{1,10,11,12,13,6,9,7,8,2,3,4,5,14},{1,10,11,\ 12,13,6,9,7,8,2,3,5,4,14},{1,10,11,12,13,6,9,7,8,2,4,3,5,14},{1,10,11,12,13,6,\ 9,7,8,2,4,5,3,14},{1,10,11,12,13,6,9,7,8,2,5,3,4,14},{1,10,11,12,13,6,9,7,8,2,\ 5,4,3,14},{1,10,11,12,13,6,9,8,7,2,3,4,5,14},{1,10,11,12,13,6,9,8,7,2,3,5,4,\ 14},{1,10,11,12,13,6,9,8,7,2,4,3,5,14},{1,10,11,12,13,6,9,8,7,2,4,5,3,14},{1,\ 10,11,12,13,6,9,8,7,2,5,3,4,14},{1,10,11,12,13,6,9,8,7,2,5,4,3,14},{1,10,11,\ 13,12,2,3,4,5,6,7,8,9,14},{1,10,11,13,12,2,3,4,5,6,7,9,8,14},{1,10,11,13,12,2,\ 3,4,5,6,8,7,9,14},{1,10,11,13,12,2,3,4,5,6,8,9,7,14},{1,10,11,13,12,2,3,4,5,6,\ 9,7,8,14},{1,10,11,13,12,2,3,4,5,6,9,8,7,14},{1,10,11,13,12,2,3,5,4,6,7,8,9,\ 14},{1,10,11,13,12,2,3,5,4,6,7,9,8,14},{1,10,11,13,12,2,3,5,4,6,8,7,9,14},{1,\ 10,11,13,12,2,3,5,4,6,8,9,7,14},{1,10,11,13,12,2,3,5,4,6,9,7,8,14},{1,10,11,\ 13,12,2,3,5,4,6,9,8,7,14},{1,10,11,13,12,2,4,3,5,6,7,8,9,14},{1,10,11,13,12,2,\ 4,3,5,6,7,9,8,14},{1,10,11,13,12,2,4,3,5,6,8,7,9,14},{1,10,11,13,12,2,4,3,5,6,\ 8,9,7,14},{1,10,11,13,12,2,4,3,5,6,9,7,8,14},{1,10,11,13,12,2,4,3,5,6,9,8,7,\ 14},{1,10,11,13,12,2,4,5,3,6,7,8,9,14},{1,10,11,13,12,2,4,5,3,6,7,9,8,14},{1,\ 10,11,13,12,2,4,5,3,6,8,7,9,14},{1,10,11,13,12,2,4,5,3,6,8,9,7,14},{1,10,11,\ 13,12,2,4,5,3,6,9,7,8,14},{1,10,11,13,12,2,4,5,3,6,9,8,7,14},{1,10,11,13,12,2,\ 5,3,4,6,7,8,9,14},{1,10,11,13,12,2,5,3,4,6,7,9,8,14},{1,10,11,13,12,2,5,3,4,6,\ 8,7,9,14},{1,10,11,13,12,2,5,3,4,6,8,9,7,14},{1,10,11,13,12,2,5,3,4,6,9,7,8,\ 14},{1,10,11,13,12,2,5,3,4,6,9,8,7,14},{1,10,11,13,12,2,5,4,3,6,7,8,9,14},{1,\ 10,11,13,12,2,5,4,3,6,7,9,8,14},{1,10,11,13,12,2,5,4,3,6,8,7,9,14},{1,10,11,\ 13,12,2,5,4,3,6,8,9,7,14},{1,10,11,13,12,2,5,4,3,6,9,7,8,14},{1,10,11,13,12,2,\ 5,4,3,6,9,8,7,14},{1,10,11,13,12,6,7,8,9,2,3,4,5,14},{1,10,11,13,12,6,7,8,9,2,\ 3,5,4,14},{1,10,11,13,12,6,7,8,9,2,4,3,5,14},{1,10,11,13,12,6,7,8,9,2,4,5,3,\ 14},{1,10,11,13,12,6,7,8,9,2,5,3,4,14},{1,10,11,13,12,6,7,8,9,2,5,4,3,14},{1,\ 10,11,13,12,6,7,9,8,2,3,4,5,14},{1,10,11,13,12,6,7,9,8,2,3,5,4,14},{1,10,11,\ 13,12,6,7,9,8,2,4,3,5,14},{1,10,11,13,12,6,7,9,8,2,4,5,3,14},{1,10,11,13,12,6,\ 7,9,8,2,5,3,4,14},{1,10,11,13,12,6,7,9,8,2,5,4,3,14},{1,10,11,13,12,6,8,7,9,2,\ 3,4,5,14},{1,10,11,13,12,6,8,7,9,2,3,5,4,14},{1,10,11,13,12,6,8,7,9,2,4,3,5,\ 14},{1,10,11,13,12,6,8,7,9,2,4,5,3,14},{1,10,11,13,12,6,8,7,9,2,5,3,4,14},{1,\ 10,11,13,12,6,8,7,9,2,5,4,3,14},{1,10,11,13,12,6,8,9,7,2,3,4,5,14},{1,10,11,\ 13,12,6,8,9,7,2,3,5,4,14},{1,10,11,13,12,6,8,9,7,2,4,3,5,14},{1,10,11,13,12,6,\ 8,9,7,2,4,5,3,14},{1,10,11,13,12,6,8,9,7,2,5,3,4,14},{1,10,11,13,12,6,8,9,7,2,\ 5,4,3,14},{1,10,11,13,12,6,9,7,8,2,3,4,5,14},{1,10,11,13,12,6,9,7,8,2,3,5,4,\ 14},{1,10,11,13,12,6,9,7,8,2,4,3,5,14},{1,10,11,13,12,6,9,7,8,2,4,5,3,14},{1,\ 10,11,13,12,6,9,7,8,2,5,3,4,14},{1,10,11,13,12,6,9,7,8,2,5,4,3,14},{1,10,11,\ 13,12,6,9,8,7,2,3,4,5,14},{1,10,11,13,12,6,9,8,7,2,3,5,4,14},{1,10,11,13,12,6,\ 9,8,7,2,4,3,5,14},{1,10,11,13,12,6,9,8,7,2,4,5,3,14},{1,10,11,13,12,6,9,8,7,2,\ 5,3,4,14},{1,10,11,13,12,6,9,8,7,2,5,4,3,14},{1,10,12,11,13,2,3,4,5,6,7,8,9,\ 14},{1,10,12,11,13,2,3,4,5,6,7,9,8,14},{1,10,12,11,13,2,3,4,5,6,8,7,9,14},{1,\ 10,12,11,13,2,3,4,5,6,8,9,7,14},{1,10,12,11,13,2,3,4,5,6,9,7,8,14},{1,10,12,\ 11,13,2,3,4,5,6,9,8,7,14},{1,10,12,11,13,2,3,5,4,6,7,8,9,14},{1,10,12,11,13,2,\ 3,5,4,6,7,9,8,14},{1,10,12,11,13,2,3,5,4,6,8,7,9,14},{1,10,12,11,13,2,3,5,4,6,\ 8,9,7,14},{1,10,12,11,13,2,3,5,4,6,9,7,8,14},{1,10,12,11,13,2,3,5,4,6,9,8,7,\ 14},{1,10,12,11,13,2,4,3,5,6,7,8,9,14},{1,10,12,11,13,2,4,3,5,6,7,9,8,14},{1,\ 10,12,11,13,2,4,3,5,6,8,7,9,14},{1,10,12,11,13,2,4,3,5,6,8,9,7,14},{1,10,12,\ 11,13,2,4,3,5,6,9,7,8,14},{1,10,12,11,13,2,4,3,5,6,9,8,7,14},{1,10,12,11,13,2,\ 4,5,3,6,7,8,9,14},{1,10,12,11,13,2,4,5,3,6,7,9,8,14},{1,10,12,11,13,2,4,5,3,6,\ 8,7,9,14},{1,10,12,11,13,2,4,5,3,6,8,9,7,14},{1,10,12,11,13,2,4,5,3,6,9,7,8,\ 14},{1,10,12,11,13,2,4,5,3,6,9,8,7,14},{1,10,12,11,13,2,5,3,4,6,7,8,9,14},{1,\ 10,12,11,13,2,5,3,4,6,7,9,8,14},{1,10,12,11,13,2,5,3,4,6,8,7,9,14},{1,10,12,\ 11,13,2,5,3,4,6,8,9,7,14},{1,10,12,11,13,2,5,3,4,6,9,7,8,14},{1,10,12,11,13,2,\ 5,3,4,6,9,8,7,14},{1,10,12,11,13,2,5,4,3,6,7,8,9,14},{1,10,12,11,13,2,5,4,3,6,\ 7,9,8,14},{1,10,12,11,13,2,5,4,3,6,8,7,9,14},{1,10,12,11,13,2,5,4,3,6,8,9,7,\ 14},{1,10,12,11,13,2,5,4,3,6,9,7,8,14},{1,10,12,11,13,2,5,4,3,6,9,8,7,14},{1,\ 10,12,11,13,6,7,8,9,2,3,4,5,14},{1,10,12,11,13,6,7,8,9,2,3,5,4,14},{1,10,12,\ 11,13,6,7,8,9,2,4,3,5,14},{1,10,12,11,13,6,7,8,9,2,4,5,3,14},{1,10,12,11,13,6,\ 7,8,9,2,5,3,4,14},{1,10,12,11,13,6,7,8,9,2,5,4,3,14},{1,10,12,11,13,6,7,9,8,2,\ 3,4,5,14},{1,10,12,11,13,6,7,9,8,2,3,5,4,14},{1,10,12,11,13,6,7,9,8,2,4,3,5,\ 14},{1,10,12,11,13,6,7,9,8,2,4,5,3,14},{1,10,12,11,13,6,7,9,8,2,5,3,4,14},{1,\ 10,12,11,13,6,7,9,8,2,5,4,3,14},{1,10,12,11,13,6,8,7,9,2,3,4,5,14},{1,10,12,\ 11,13,6,8,7,9,2,3,5,4,14},{1,10,12,11,13,6,8,7,9,2,4,3,5,14},{1,10,12,11,13,6,\ 8,7,9,2,4,5,3,14},{1,10,12,11,13,6,8,7,9,2,5,3,4,14},{1,10,12,11,13,6,8,7,9,2,\ 5,4,3,14},{1,10,12,11,13,6,8,9,7,2,3,4,5,14},{1,10,12,11,13,6,8,9,7,2,3,5,4,\ 14},{1,10,12,11,13,6,8,9,7,2,4,3,5,14},{1,10,12,11,13,6,8,9,7,2,4,5,3,14},{1,\ 10,12,11,13,6,8,9,7,2,5,3,4,14},{1,10,12,11,13,6,8,9,7,2,5,4,3,14},{1,10,12,\ 11,13,6,9,7,8,2,3,4,5,14},{1,10,12,11,13,6,9,7,8,2,3,5,4,14},{1,10,12,11,13,6,\ 9,7,8,2,4,3,5,14},{1,10,12,11,13,6,9,7,8,2,4,5,3,14},{1,10,12,11,13,6,9,7,8,2,\ 5,3,4,14},{1,10,12,11,13,6,9,7,8,2,5,4,3,14},{1,10,12,11,13,6,9,8,7,2,3,4,5,\ 14},{1,10,12,11,13,6,9,8,7,2,3,5,4,14},{1,10,12,11,13,6,9,8,7,2,4,3,5,14},{1,\ 10,12,11,13,6,9,8,7,2,4,5,3,14},{1,10,12,11,13,6,9,8,7,2,5,3,4,14},{1,10,12,\ 11,13,6,9,8,7,2,5,4,3,14},{1,10,12,13,11,2,3,4,5,6,7,8,9,14},{1,10,12,13,11,2,\ 3,4,5,6,7,9,8,14},{1,10,12,13,11,2,3,4,5,6,8,7,9,14},{1,10,12,13,11,2,3,4,5,6,\ 8,9,7,14},{1,10,12,13,11,2,3,4,5,6,9,7,8,14},{1,10,12,13,11,2,3,4,5,6,9,8,7,\ 14},{1,10,12,13,11,2,3,5,4,6,7,8,9,14},{1,10,12,13,11,2,3,5,4,6,7,9,8,14},{1,\ 10,12,13,11,2,3,5,4,6,8,7,9,14},{1,10,12,13,11,2,3,5,4,6,8,9,7,14},{1,10,12,\ 13,11,2,3,5,4,6,9,7,8,14},{1,10,12,13,11,2,3,5,4,6,9,8,7,14},{1,10,12,13,11,2,\ 4,3,5,6,7,8,9,14},{1,10,12,13,11,2,4,3,5,6,7,9,8,14},{1,10,12,13,11,2,4,3,5,6,\ 8,7,9,14},{1,10,12,13,11,2,4,3,5,6,8,9,7,14},{1,10,12,13,11,2,4,3,5,6,9,7,8,\ 14},{1,10,12,13,11,2,4,3,5,6,9,8,7,14},{1,10,12,13,11,2,4,5,3,6,7,8,9,14},{1,\ 10,12,13,11,2,4,5,3,6,7,9,8,14},{1,10,12,13,11,2,4,5,3,6,8,7,9,14},{1,10,12,\ 13,11,2,4,5,3,6,8,9,7,14},{1,10,12,13,11,2,4,5,3,6,9,7,8,14},{1,10,12,13,11,2,\ 4,5,3,6,9,8,7,14},{1,10,12,13,11,2,5,3,4,6,7,8,9,14},{1,10,12,13,11,2,5,3,4,6,\ 7,9,8,14},{1,10,12,13,11,2,5,3,4,6,8,7,9,14},{1,10,12,13,11,2,5,3,4,6,8,9,7,\ 14},{1,10,12,13,11,2,5,3,4,6,9,7,8,14},{1,10,12,13,11,2,5,3,4,6,9,8,7,14},{1,\ 10,12,13,11,2,5,4,3,6,7,8,9,14},{1,10,12,13,11,2,5,4,3,6,7,9,8,14},{1,10,12,\ 13,11,2,5,4,3,6,8,7,9,14},{1,10,12,13,11,2,5,4,3,6,8,9,7,14},{1,10,12,13,11,2,\ 5,4,3,6,9,7,8,14},{1,10,12,13,11,2,5,4,3,6,9,8,7,14},{1,10,12,13,11,6,7,8,9,2,\ 3,4,5,14},{1,10,12,13,11,6,7,8,9,2,3,5,4,14},{1,10,12,13,11,6,7,8,9,2,4,3,5,\ 14},{1,10,12,13,11,6,7,8,9,2,4,5,3,14},{1,10,12,13,11,6,7,8,9,2,5,3,4,14},{1,\ 10,12,13,11,6,7,8,9,2,5,4,3,14},{1,10,12,13,11,6,7,9,8,2,3,4,5,14},{1,10,12,\ 13,11,6,7,9,8,2,3,5,4,14},{1,10,12,13,11,6,7,9,8,2,4,3,5,14},{1,10,12,13,11,6,\ 7,9,8,2,4,5,3,14},{1,10,12,13,11,6,7,9,8,2,5,3,4,14},{1,10,12,13,11,6,7,9,8,2,\ 5,4,3,14},{1,10,12,13,11,6,8,7,9,2,3,4,5,14},{1,10,12,13,11,6,8,7,9,2,3,5,4,\ 14},{1,10,12,13,11,6,8,7,9,2,4,3,5,14},{1,10,12,13,11,6,8,7,9,2,4,5,3,14},{1,\ 10,12,13,11,6,8,7,9,2,5,3,4,14},{1,10,12,13,11,6,8,7,9,2,5,4,3,14},{1,10,12,\ 13,11,6,8,9,7,2,3,4,5,14},{1,10,12,13,11,6,8,9,7,2,3,5,4,14},{1,10,12,13,11,6,\ 8,9,7,2,4,3,5,14},{1,10,12,13,11,6,8,9,7,2,4,5,3,14},{1,10,12,13,11,6,8,9,7,2,\ 5,3,4,14},{1,10,12,13,11,6,8,9,7,2,5,4,3,14},{1,10,12,13,11,6,9,7,8,2,3,4,5,\ 14},{1,10,12,13,11,6,9,7,8,2,3,5,4,14},{1,10,12,13,11,6,9,7,8,2,4,3,5,14},{1,\ 10,12,13,11,6,9,7,8,2,4,5,3,14},{1,10,12,13,11,6,9,7,8,2,5,3,4,14},{1,10,12,\ 13,11,6,9,7,8,2,5,4,3,14},{1,10,12,13,11,6,9,8,7,2,3,4,5,14},{1,10,12,13,11,6,\ 9,8,7,2,3,5,4,14},{1,10,12,13,11,6,9,8,7,2,4,3,5,14},{1,10,12,13,11,6,9,8,7,2,\ 4,5,3,14},{1,10,12,13,11,6,9,8,7,2,5,3,4,14},{1,10,12,13,11,6,9,8,7,2,5,4,3,\ 14},{1,10,13,11,12,2,3,4,5,6,7,8,9,14},{1,10,13,11,12,2,3,4,5,6,7,9,8,14},{1,\ 10,13,11,12,2,3,4,5,6,8,7,9,14},{1,10,13,11,12,2,3,4,5,6,8,9,7,14},{1,10,13,\ 11,12,2,3,4,5,6,9,7,8,14},{1,10,13,11,12,2,3,4,5,6,9,8,7,14},{1,10,13,11,12,2,\ 3,5,4,6,7,8,9,14},{1,10,13,11,12,2,3,5,4,6,7,9,8,14},{1,10,13,11,12,2,3,5,4,6,\ 8,7,9,14},{1,10,13,11,12,2,3,5,4,6,8,9,7,14},{1,10,13,11,12,2,3,5,4,6,9,7,8,\ 14},{1,10,13,11,12,2,3,5,4,6,9,8,7,14},{1,10,13,11,12,2,4,3,5,6,7,8,9,14},{1,\ 10,13,11,12,2,4,3,5,6,7,9,8,14},{1,10,13,11,12,2,4,3,5,6,8,7,9,14},{1,10,13,\ 11,12,2,4,3,5,6,8,9,7,14},{1,10,13,11,12,2,4,3,5,6,9,7,8,14},{1,10,13,11,12,2,\ 4,3,5,6,9,8,7,14},{1,10,13,11,12,2,4,5,3,6,7,8,9,14},{1,10,13,11,12,2,4,5,3,6,\ 7,9,8,14},{1,10,13,11,12,2,4,5,3,6,8,7,9,14},{1,10,13,11,12,2,4,5,3,6,8,9,7,\ 14},{1,10,13,11,12,2,4,5,3,6,9,7,8,14},{1,10,13,11,12,2,4,5,3,6,9,8,7,14},{1,\ 10,13,11,12,2,5,3,4,6,7,8,9,14},{1,10,13,11,12,2,5,3,4,6,7,9,8,14},{1,10,13,\ 11,12,2,5,3,4,6,8,7,9,14},{1,10,13,11,12,2,5,3,4,6,8,9,7,14},{1,10,13,11,12,2,\ 5,3,4,6,9,7,8,14},{1,10,13,11,12,2,5,3,4,6,9,8,7,14},{1,10,13,11,12,2,5,4,3,6,\ 7,8,9,14},{1,10,13,11,12,2,5,4,3,6,7,9,8,14},{1,10,13,11,12,2,5,4,3,6,8,7,9,\ 14},{1,10,13,11,12,2,5,4,3,6,8,9,7,14},{1,10,13,11,12,2,5,4,3,6,9,7,8,14},{1,\ 10,13,11,12,2,5,4,3,6,9,8,7,14},{1,10,13,11,12,6,7,8,9,2,3,4,5,14},{1,10,13,\ 11,12,6,7,8,9,2,3,5,4,14},{1,10,13,11,12,6,7,8,9,2,4,3,5,14},{1,10,13,11,12,6,\ 7,8,9,2,4,5,3,14},{1,10,13,11,12,6,7,8,9,2,5,3,4,14},{1,10,13,11,12,6,7,8,9,2,\ 5,4,3,14},{1,10,13,11,12,6,7,9,8,2,3,4,5,14},{1,10,13,11,12,6,7,9,8,2,3,5,4,\ 14},{1,10,13,11,12,6,7,9,8,2,4,3,5,14},{1,10,13,11,12,6,7,9,8,2,4,5,3,14},{1,\ 10,13,11,12,6,7,9,8,2,5,3,4,14},{1,10,13,11,12,6,7,9,8,2,5,4,3,14},{1,10,13,\ 11,12,6,8,7,9,2,3,4,5,14},{1,10,13,11,12,6,8,7,9,2,3,5,4,14},{1,10,13,11,12,6,\ 8,7,9,2,4,3,5,14},{1,10,13,11,12,6,8,7,9,2,4,5,3,14},{1,10,13,11,12,6,8,7,9,2,\ 5,3,4,14},{1,10,13,11,12,6,8,7,9,2,5,4,3,14},{1,10,13,11,12,6,8,9,7,2,3,4,5,\ 14},{1,10,13,11,12,6,8,9,7,2,3,5,4,14},{1,10,13,11,12,6,8,9,7,2,4,3,5,14},{1,\ 10,13,11,12,6,8,9,7,2,4,5,3,14},{1,10,13,11,12,6,8,9,7,2,5,3,4,14},{1,10,13,\ 11,12,6,8,9,7,2,5,4,3,14},{1,10,13,11,12,6,9,7,8,2,3,4,5,14},{1,10,13,11,12,6,\ 9,7,8,2,3,5,4,14},{1,10,13,11,12,6,9,7,8,2,4,3,5,14},{1,10,13,11,12,6,9,7,8,2,\ 4,5,3,14},{1,10,13,11,12,6,9,7,8,2,5,3,4,14},{1,10,13,11,12,6,9,7,8,2,5,4,3,\ 14},{1,10,13,11,12,6,9,8,7,2,3,4,5,14},{1,10,13,11,12,6,9,8,7,2,3,5,4,14},{1,\ 10,13,11,12,6,9,8,7,2,4,3,5,14},{1,10,13,11,12,6,9,8,7,2,4,5,3,14},{1,10,13,\ 11,12,6,9,8,7,2,5,3,4,14},{1,10,13,11,12,6,9,8,7,2,5,4,3,14},{1,10,13,12,11,2,\ 3,4,5,6,7,8,9,14},{1,10,13,12,11,2,3,4,5,6,7,9,8,14},{1,10,13,12,11,2,3,4,5,6,\ 8,7,9,14},{1,10,13,12,11,2,3,4,5,6,8,9,7,14},{1,10,13,12,11,2,3,4,5,6,9,7,8,\ 14},{1,10,13,12,11,2,3,4,5,6,9,8,7,14},{1,10,13,12,11,2,3,5,4,6,7,8,9,14},{1,\ 10,13,12,11,2,3,5,4,6,7,9,8,14},{1,10,13,12,11,2,3,5,4,6,8,7,9,14},{1,10,13,\ 12,11,2,3,5,4,6,8,9,7,14},{1,10,13,12,11,2,3,5,4,6,9,7,8,14},{1,10,13,12,11,2,\ 3,5,4,6,9,8,7,14},{1,10,13,12,11,2,4,3,5,6,7,8,9,14},{1,10,13,12,11,2,4,3,5,6,\ 7,9,8,14},{1,10,13,12,11,2,4,3,5,6,8,7,9,14},{1,10,13,12,11,2,4,3,5,6,8,9,7,\ 14},{1,10,13,12,11,2,4,3,5,6,9,7,8,14},{1,10,13,12,11,2,4,3,5,6,9,8,7,14},{1,\ 10,13,12,11,2,4,5,3,6,7,8,9,14},{1,10,13,12,11,2,4,5,3,6,7,9,8,14},{1,10,13,\ 12,11,2,4,5,3,6,8,7,9,14},{1,10,13,12,11,2,4,5,3,6,8,9,7,14},{1,10,13,12,11,2,\ 4,5,3,6,9,7,8,14},{1,10,13,12,11,2,4,5,3,6,9,8,7,14},{1,10,13,12,11,2,5,3,4,6,\ 7,8,9,14},{1,10,13,12,11,2,5,3,4,6,7,9,8,14},{1,10,13,12,11,2,5,3,4,6,8,7,9,\ 14},{1,10,13,12,11,2,5,3,4,6,8,9,7,14},{1,10,13,12,11,2,5,3,4,6,9,7,8,14},{1,\ 10,13,12,11,2,5,3,4,6,9,8,7,14},{1,10,13,12,11,2,5,4,3,6,7,8,9,14},{1,10,13,\ 12,11,2,5,4,3,6,7,9,8,14},{1,10,13,12,11,2,5,4,3,6,8,7,9,14},{1,10,13,12,11,2,\ 5,4,3,6,8,9,7,14},{1,10,13,12,11,2,5,4,3,6,9,7,8,14},{1,10,13,12,11,2,5,4,3,6,\ 9,8,7,14},{1,10,13,12,11,6,7,8,9,2,3,4,5,14},{1,10,13,12,11,6,7,8,9,2,3,5,4,\ 14},{1,10,13,12,11,6,7,8,9,2,4,3,5,14},{1,10,13,12,11,6,7,8,9,2,4,5,3,14},{1,\ 10,13,12,11,6,7,8,9,2,5,3,4,14},{1,10,13,12,11,6,7,8,9,2,5,4,3,14},{1,10,13,\ 12,11,6,7,9,8,2,3,4,5,14},{1,10,13,12,11,6,7,9,8,2,3,5,4,14},{1,10,13,12,11,6,\ 7,9,8,2,4,3,5,14},{1,10,13,12,11,6,7,9,8,2,4,5,3,14},{1,10,13,12,11,6,7,9,8,2,\ 5,3,4,14},{1,10,13,12,11,6,7,9,8,2,5,4,3,14},{1,10,13,12,11,6,8,7,9,2,3,4,5,\ 14},{1,10,13,12,11,6,8,7,9,2,3,5,4,14},{1,10,13,12,11,6,8,7,9,2,4,3,5,14},{1,\ 10,13,12,11,6,8,7,9,2,4,5,3,14},{1,10,13,12,11,6,8,7,9,2,5,3,4,14},{1,10,13,\ 12,11,6,8,7,9,2,5,4,3,14},{1,10,13,12,11,6,8,9,7,2,3,4,5,14},{1,10,13,12,11,6,\ 8,9,7,2,3,5,4,14},{1,10,13,12,11,6,8,9,7,2,4,3,5,14},{1,10,13,12,11,6,8,9,7,2,\ 4,5,3,14},{1,10,13,12,11,6,8,9,7,2,5,3,4,14},{1,10,13,12,11,6,8,9,7,2,5,4,3,\ 14},{1,10,13,12,11,6,9,7,8,2,3,4,5,14},{1,10,13,12,11,6,9,7,8,2,3,5,4,14},{1,\ 10,13,12,11,6,9,7,8,2,4,3,5,14},{1,10,13,12,11,6,9,7,8,2,4,5,3,14},{1,10,13,\ 12,11,6,9,7,8,2,5,3,4,14},{1,10,13,12,11,6,9,7,8,2,5,4,3,14},{1,10,13,12,11,6,\ 9,8,7,2,3,4,5,14},{1,10,13,12,11,6,9,8,7,2,3,5,4,14},{1,10,13,12,11,6,9,8,7,2,\ 4,3,5,14},{1,10,13,12,11,6,9,8,7,2,4,5,3,14},{1,10,13,12,11,6,9,8,7,2,5,3,4,\ 14},{1,10,13,12,11,6,9,8,7,2,5,4,3,14}}\\nRawGraphData[\\\"Isobutane\\\",\\\"\ AutomorphismCount\\\"]:=1296\\nRawGraphData[\\\"Isobutane\\\",\\\"\ CharacteristicPolynomial\\\"]:=#1^6(-3+#1^2)^2(3-7#1^2+#1^4)&\\nRawGraphData[\ \\\"Isobutane\\\",\\\"Spectrum\\\"]:={-Sqrt[7/2+Sqrt[37]/2],-Sqrt[3],-Sqrt[3],\ -Sqrt[(7-Sqrt[37])/2],0,0,0,0,0,0,Sqrt[(7-Sqrt[37])/2],Sqrt[3],Sqrt[3],Sqrt[7/\ 2+Sqrt[37]/2]}\\nRawGraphData[\\\"Isobutane\\\",\\\"CospectralGraphNames\\\"]:\ ={}\\nRawGraphData[\\\"Isobutane\\\",\\\"Degrees\\\"]:={4,4,1,1,1,4,1,1,1,4,1,\ 1,1,1}\\nRawGraphData[\\\"Isobutane\\\",\\\"ChromaticNumber\\\"]:=2\\\ nRawGraphData[\\\"Isobutane\\\",\\\"EdgeConnectivity\\\"]:=1\\nRawGraphData[\\\ \"Isobutane\\\",\\\"VertexConnectivity\\\"]:=1\\nRawGraphData[\\\"Isobutane\\\ \",\\\"ChromaticPolynomial\\\"]:=(-1+#1)^13#1&\\nRawGraphData[\\\"Isobutane\\\ \",\\\"EdgeChromaticNumber\\\"]:=4\\nRawGraphData[\\\"Isobutane\\\",\\\"\ IndependenceNumber\\\"]:=10\\nRawGraphData[\\\"Isobutane\\\",\\\"CliqueNumber\ \\\"]:=2\\nRawGraphData[\\\"Isobutane\\\",\\\"CrossingNumber\\\"]:=0\\\ nRawGraphData[\\\"Isobutane\\\",\\\"RectilinearCrossingNumber\\\"]:=0\\\ nRawGraphData[\\\"Isobutane\\\",\\\"ToroidalCrossingNumber\\\"]:=0\\\ nRawGraphData[\\\"Isobutane\\\",\\\"ProjectivePlaneCrossingNumber\\\"]:=0\\\ nRawGraphData[\\\"Isobutane\\\",\\\"ArticulationVertices\\\"]:={1,2,6,10}\\\ nRawGraphData[\\\"Isobutane\\\",\\\"Bridges\\\"]:={{2,3},{2,4},{2,5},{1,2},{6,\ 7},{6,8},{6,9},{1,6},{10,11},{10,12},{10,13},{1,10},{1,14}}\\nRawGraphData[\\\ \"Isobutane\\\",\\\"HamiltonianPaths\\\"]:={}\\nRawGraphData[\\\"Isobutane\\\"\ ,\\\"HamiltonianPathCount\\\"]:=0\\nRawGraphData[\\\"Isobutane\\\",\\\"\ HamiltonianCycles\\\"]:={}\\nRawGraphData[\\\"Isobutane\\\",\\\"\ HamiltonianCycleCount\\\"]:=0\\nRawGraphData[\\\"Isobutane\\\",\\\"Cycles\\\"]\ :={}\\nRawGraphData[\\\"Isobutane\\\",\\\"CycleCount\\\"]:=0\\n\\n\"\>"], \ "Output",ExpressionUUID->"0ad26a54-bd2e-4650-a6df-0fda119308ea"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Pentane", "Subsubsection",ExpressionUUID->"33052e1a-3b63-4cdc-9457-24c371555797"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ShowGraph", "[", RowBox[{ RowBox[{"CentralAlkane", "[", "5", "]"}], ",", RowBox[{"ImageSize", "\[Rule]", "100"}]}], "]"}]], "Input",ExpressionUUID->\ "a5f75d17-4e4d-491c-a8e6-08086a808301"], Cell[BoxData[ GraphicsBox[{{ {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.3125}, {0.1875, 0.4375}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.4375}, {0.1875, 0.5625}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.5625}, {0.1875, 0.6875}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.6875}, {0.1875, 0.8125}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.3125}, {0., 0.3125}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.4375}, {0., 0.4375}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.5625}, {0., 0.5625}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.6875}, {0., 0.6875}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.8125}, {0., 0.8125}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.3125}, {0.375, 0.3125}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.4375}, {0.375, 0.4375}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.5625}, {0.375, 0.5625}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.6875}, {0.375, 0.6875}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.8125}, {0.375, 0.8125}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.8125}, {0.1875, 1.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.1875, 0.3125}, {0.1875, 0.125}}], {GrayLevel[0]}}}, { {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}}}, AlignmentPoint->Center, AspectRatio->Automatic, Axes->False, AxesLabel->None, AxesOrigin->Automatic, AxesStyle->{}, Background->None, BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->Automatic, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->100, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->All, PlotRangeClipping->False, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->Automatic, TicksStyle->{}]], "Output",ExpressionUUID->"0829a467-416b-4756-90d1-\ 45ca3f98ad69"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Hexane", "Subsubsection",ExpressionUUID->"55712be7-b230-481b-8f72-9ced6ccb54b7"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ShowGraph", "[", RowBox[{ RowBox[{"CentralAlkane", "[", "6", "]"}], ",", RowBox[{"ImageSize", "\[Rule]", "100"}]}], "]"}]], "Input",ExpressionUUID->\ "0104c975-fbd4-48dc-bc6e-d7f9c7c3e9e3"], Cell[BoxData[ GraphicsBox[{{ {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.2777777777777778}, { 0.16666666666666666`, 0.38888888888888884`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.38888888888888884`}, { 0.16666666666666666`, 0.5}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.5}, {0.16666666666666666`, 0.611111111111111}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.611111111111111}, { 0.16666666666666666`, 0.7222222222222222}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.7222222222222222}, { 0.16666666666666666`, 0.8333333333333333}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.2777777777777778}, {0., 0.2777777777777778}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.38888888888888884`}, {0., 0.38888888888888884`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.5}, {0., 0.5}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.611111111111111}, {0., 0.611111111111111}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.7222222222222222}, {0., 0.7222222222222222}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.8333333333333333}, {0., 0.8333333333333333}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.2777777777777778}, {0.3333333333333333, 0.2777777777777778}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.38888888888888884`}, { 0.3333333333333333, 0.38888888888888884`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.5}, {0.3333333333333333, 0.5}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.611111111111111}, {0.3333333333333333, 0.611111111111111}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.7222222222222222}, {0.3333333333333333, 0.7222222222222222}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.8333333333333333}, {0.3333333333333333, 0.8333333333333333}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.8333333333333333}, { 0.16666666666666666`, 1.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.16666666666666666`, 0.2777777777777778}, { 0.16666666666666666`, 0.1111111111111111}}], {GrayLevel[0]}}}, { {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}}}, AlignmentPoint->Center, AspectRatio->Automatic, Axes->False, AxesLabel->None, AxesOrigin->Automatic, AxesStyle->{}, Background->None, BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->Automatic, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->100, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->All, PlotRangeClipping->False, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->Automatic, TicksStyle->{}]], "Output",ExpressionUUID->"73fd3bc2-a9d9-402c-b3a8-\ 11495dbca57d"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Heptane", "Subsubsection",ExpressionUUID->"374e4bac-6687-4040-ba21-bf1f54a9715a"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ShowGraph", "[", RowBox[{ RowBox[{"CentralAlkane", "[", "7", "]"}], ",", RowBox[{"ImageSize", "\[Rule]", "100"}]}], "]"}]], "Input",ExpressionUUID->\ "52f774da-530c-416f-92fb-e52a308ec5a5"], Cell[BoxData[ GraphicsBox[{{ {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.25}, {0.15000000000000002`, 0.35000000000000003`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.35000000000000003`}, { 0.15000000000000002`, 0.45}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.45}, {0.15000000000000002`, 0.55}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.55}, {0.15000000000000002`, 0.65}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.65}, {0.15000000000000002`, 0.75}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.75}, {0.15000000000000002`, 0.8500000000000001}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.25}, {0., 0.25}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.35000000000000003`}, {0., 0.35000000000000003`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.45}, {0., 0.45}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.55}, {0., 0.55}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.65}, {0., 0.65}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.75}, {0., 0.75}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.8500000000000001}, {0., 0.8500000000000001}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.25}, {0.30000000000000004`, 0.25}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.35000000000000003`}, { 0.30000000000000004`, 0.35000000000000003`}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.45}, {0.30000000000000004`, 0.45}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.55}, {0.30000000000000004`, 0.55}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.65}, {0.30000000000000004`, 0.65}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.75}, {0.30000000000000004`, 0.75}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.8500000000000001}, { 0.30000000000000004`, 0.8500000000000001}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.8500000000000001}, { 0.15000000000000002`, 1.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.15000000000000002`, 0.25}, {0.15000000000000002`, 0.1}}], {GrayLevel[0]}}}, { {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}}}, AlignmentPoint->Center, AspectRatio->Automatic, Axes->False, AxesLabel->None, AxesOrigin->Automatic, AxesStyle->{}, Background->None, BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->Automatic, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->100, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->All, PlotRangeClipping->False, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->Automatic, TicksStyle->{}]], "Output",ExpressionUUID->"fd9d3c8f-eed2-4fa8-9017-\ a8055677e669"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Octane", "Subsubsection",ExpressionUUID->"b78df88c-446e-41b4-85a8-68a54503131c"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ShowGraph", "[", RowBox[{ RowBox[{"CentralAlkane", "[", "8", "]"}], ",", RowBox[{"ImageSize", "\[Rule]", "100"}]}], "]"}]], "Input",ExpressionUUID->\ "0bc6c6e1-bb43-409a-8fd1-6862e0c987db"], Cell[BoxData[ GraphicsBox[{{ {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.2272727272727273}, { 0.13636363636363635`, 0.3181818181818182}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.3181818181818182}, { 0.13636363636363635`, 0.4090909090909091}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.4090909090909091}, { 0.13636363636363635`, 0.5}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.5}, {0.13636363636363635`, 0.5909090909090909}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.5909090909090909}, { 0.13636363636363635`, 0.6818181818181819}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.6818181818181819}, { 0.13636363636363635`, 0.7727272727272727}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.7727272727272727}, { 0.13636363636363635`, 0.8636363636363636}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.2272727272727273}, {0., 0.2272727272727273}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.3181818181818182}, {0., 0.3181818181818182}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.4090909090909091}, {0., 0.4090909090909091}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.5}, {0., 0.5}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.5909090909090909}, {0., 0.5909090909090909}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.6818181818181819}, {0., 0.6818181818181819}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.7727272727272727}, {0., 0.7727272727272727}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.8636363636363636}, {0., 0.8636363636363636}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.2272727272727273}, {0.2727272727272727, 0.2272727272727273}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.3181818181818182}, {0.2727272727272727, 0.3181818181818182}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.4090909090909091}, {0.2727272727272727, 0.4090909090909091}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.5}, {0.2727272727272727, 0.5}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.5909090909090909}, {0.2727272727272727, 0.5909090909090909}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.6818181818181819}, {0.2727272727272727, 0.6818181818181819}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.7727272727272727}, {0.2727272727272727, 0.7727272727272727}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.8636363636363636}, {0.2727272727272727, 0.8636363636363636}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.8636363636363636}, { 0.13636363636363635`, 1.}}], {GrayLevel[0]}}, {GrayLevel[0], Thickness[0.005], LineBox[{{0.13636363636363635`, 0.2272727272727273}, { 0.13636363636363635`, 0.09090909090909091}}], {GrayLevel[0]}}}, { {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}, {RGBColor[1, 0, 0], {PointSize[0.05], PointBox[{}]}, {GrayLevel[0]}, {GrayLevel[0]}}}}, AlignmentPoint->Center, AspectRatio->Automatic, Axes->False, AxesLabel->None, AxesOrigin->Automatic, AxesStyle->{}, Background->None, BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->Automatic, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->100, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->All, PlotRangeClipping->False, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->Automatic, TicksStyle->{}]], "Output",ExpressionUUID->"4d90e0c2-750f-4f90-af00-\ b7fa8e5ecbee"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Nonane", "Subsubsection",ExpressionUUID->"94f9bd08-29cf-46bb-aa17-925e0efd9178"], Cell[BoxData[ RowBox[{"ShowGraph", "[", RowBox[{ RowBox[{"CentralAlkane", "[", "9", "]"}], ",", RowBox[{"ImageSize", "\[Rule]", "100"}]}], "]"}]], "Input",ExpressionUUID->\ "d1710ffa-bb36-4c88-b4c3-1a78bd9ef5cc"] }, Open ]], Cell[CellGroupData[{ Cell["Decane", "Subsubsection",ExpressionUUID->"3cdda472-9df1-48a9-beb3-ab07c8a6d42c"], Cell[BoxData[ RowBox[{"ShowGraph", "[", RowBox[{ RowBox[{"CentralAlkane", "[", "10", "]"}], ",", RowBox[{"ImageSize", "\[Rule]", "100"}]}], "]"}]], "Input",ExpressionUUID->\ "487bf1f0-c86f-4fac-aa89-1670c0ba6871"] }, Open ]] }, Open ]] }, Open ]] }, Open ]] }, WindowSize->{1106, 836}, WindowMargins->{{Automatic, 148}, {30, Automatic}}, ShowSelection->True, FrontEndVersion->"14.3 for Mac OS X ARM (64-bit) (December 29, 2024)", StyleDefinitions->"Default.nb", ExpressionUUID->"46e9c45b-4775-444e-8f62-4f39f96b5109" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[580, 22, 76, 0, 96, "Title",ExpressionUUID->"e1a96d90-ee3a-429a-b8f0-e3c0d4a9c0e4"], Cell[CellGroupData[{ Cell[681, 26, 83, 0, 53, "Subsection",ExpressionUUID->"68779bad-1ca1-4538-96b6-b843dd7b3f79"], Cell[767, 28, 113, 3, 55, "Text",ExpressionUUID->"8e99c188-e41c-47c2-8f71-f7a2253f452c"], Cell[883, 33, 321, 8, 33, "Text",ExpressionUUID->"9c2f90d4-add9-4dd5-ba4e-e30ea83dd77d"], Cell[1207, 43, 338, 10, 33, "Text",ExpressionUUID->"d61563ff-8b9d-4263-99e2-36fdf4451fc8"], Cell[1548, 55, 154, 2, 33, "Text",ExpressionUUID->"95f57cd5-8a6d-4334-b171-43ab87ed0b51"] }, Open ]], Cell[CellGroupData[{ Cell[1739, 62, 80, 0, 66, "Section",ExpressionUUID->"1a2d7070-4c96-489b-abe4-70ebc55bd44f"], Cell[1822, 64, 216, 4, 33, "Text",ExpressionUUID->"ce32ca8d-bcc2-4f96-afdd-4bbd07e53f29"], Cell[2041, 70, 141, 1, 33, "Text",ExpressionUUID->"2cd1c172-6ddf-48e5-977b-05b30f8f2b02"], Cell[2185, 73, 139, 2, 29, "Input",ExpressionUUID->"17a9e874-4e64-47b8-bb6f-7507dc170873"], Cell[CellGroupData[{ Cell[2349, 79, 342, 9, 29, "Input",ExpressionUUID->"795fd292-732f-4c2c-87e1-3d178b8ec8bb"], Cell[2694, 90, 374, 8, 33, "Output",ExpressionUUID->"51b823b3-de3e-447d-98f4-196edc0deca4"] }, Open ]], Cell[CellGroupData[{ Cell[3105, 103, 1314, 23, 29, "Input",ExpressionUUID->"73b3dccc-0b23-4b15-922f-5dab58842607"], Cell[4422, 128, 350, 8, 33, "Output",ExpressionUUID->"8581491b-0cc8-42d9-88d2-5feb13b57275"] }, Open ]], Cell[CellGroupData[{ Cell[4809, 141, 461, 13, 29, "Input",ExpressionUUID->"98174bb3-7098-4c24-85ae-691511b218bf"], Cell[5273, 156, 354, 9, 33, "Output",ExpressionUUID->"5deb8dd1-e288-4659-8af4-d7122a1eb70f"] }, Open ]], Cell[CellGroupData[{ Cell[5664, 170, 434, 12, 29, "Input",ExpressionUUID->"44e53424-86ed-4de4-8920-61e400f078e9"], Cell[6101, 184, 399, 10, 33, "Output",ExpressionUUID->"445ec921-eada-47f3-b380-8b84de4105da"] }, Open ]], Cell[CellGroupData[{ Cell[6537, 199, 313, 8, 29, "Input",ExpressionUUID->"a2a1a7fa-838a-44a6-9723-c0979e54d939"], Cell[6853, 209, 267, 5, 33, "Output",ExpressionUUID->"526beefb-9e09-46a0-abba-272f35aa4867"] }, Open ]], Cell[CellGroupData[{ Cell[7157, 219, 109, 0, 53, "Subsection",ExpressionUUID->"edc1c3d9-eb4c-411f-afad-3a93bc0d8900"], Cell[CellGroupData[{ Cell[7291, 223, 532, 16, 29, "Input",ExpressionUUID->"178867e0-2dc1-4ac3-85d5-f16b7dd09dbe"], Cell[7826, 241, 302, 8, 33, "Output",ExpressionUUID->"a343030b-4243-4ad2-b9dd-63d381ed6b81"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[8177, 255, 388, 11, 53, "Subsection",ExpressionUUID->"d952abee-fae4-4009-91b3-b8a137d9cc4d"], Cell[CellGroupData[{ Cell[8590, 270, 583, 18, 29, "Input",ExpressionUUID->"08b302e7-c7ca-42a9-876a-a935fe1f6a61"], Cell[9176, 290, 302, 8, 33, "Output",ExpressionUUID->"11c6c379-f3ab-4660-846d-48ac26872d11"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[9539, 305, 82, 0, 66, "Section",ExpressionUUID->"fb78f0d7-831d-4187-af26-b6221ae0cda1"], Cell[CellGroupData[{ Cell[9646, 309, 924, 24, 111, "Input",ExpressionUUID->"95a6a572-2492-441e-97ab-a786b87f7f80"], Cell[10573, 335, 36048, 708, 376, "Output",ExpressionUUID->"fa0afe84-436d-44d3-8943-bf3ad01eb0cb"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[46670, 1049, 83, 0, 66, "Section",ExpressionUUID->"84da4061-511a-4602-987a-929ceaf4598b"], Cell[CellGroupData[{ Cell[46778, 1053, 86, 0, 53, "Subsection",ExpressionUUID->"0f1ebe28-d637-48a0-b929-48180a2e2670"], Cell[46867, 1055, 119, 0, 33, "Text",ExpressionUUID->"e5038ec4-43a8-4d2e-bd7f-b371f69e16e1"] }, Open ]], Cell[CellGroupData[{ Cell[47023, 1060, 113, 0, 53, "Subsection",ExpressionUUID->"4751708f-f5f1-4bbf-9eae-617d14412ce7"], Cell[47139, 1062, 121, 0, 33, "Text",ExpressionUUID->"2c9f3a3d-7488-45f1-85cf-2a3f594b039c"], Cell[47263, 1064, 352, 6, 55, "Text",ExpressionUUID->"64129d70-9237-44d2-850c-cb10f7d495e9"], Cell[47618, 1072, 154, 3, 29, "Input",ExpressionUUID->"cc47ccb2-6bf2-4860-8078-456dd6b6d4f4"], Cell[47775, 1077, 641, 17, 90, "Input",ExpressionUUID->"d0b1f785-094c-480a-9e9b-e05cb0f25ae0"], Cell[48419, 1096, 1154, 30, 131, "Input",ExpressionUUID->"64e7b2f1-6d9f-47e7-9107-59203864ba41"], Cell[CellGroupData[{ Cell[49598, 1130, 400, 11, 49, "Input",ExpressionUUID->"3f2e6082-5071-42e1-a8b3-0f921b172e18"], Cell[50001, 1143, 119, 2, 33, "Output",ExpressionUUID->"99c8fad3-2065-499e-b566-ec715be315f6"] }, Open ]], Cell[CellGroupData[{ Cell[50157, 1150, 81, 0, 43, "Subsubsection",ExpressionUUID->"e69f18ed-b035-4bd6-a499-c920e35e82ef"], Cell[CellGroupData[{ Cell[50263, 1154, 667, 19, 29, "Input",ExpressionUUID->"9c39ae16-8000-4a40-8ba1-40dcef2be3bf"], Cell[50933, 1175, 922, 28, 75, "Output",ExpressionUUID->"73b968af-2c73-41da-9b05-509e2ffcc6d1"] }, Open ]], Cell[CellGroupData[{ Cell[51892, 1208, 252, 5, 29, "Input",ExpressionUUID->"1114f1d9-2154-47ce-887f-fc6c8faac900"], Cell[52147, 1215, 2530, 51, 196, "Output",ExpressionUUID->"385c3368-63e4-4435-a3dc-57794897759d"] }, Open ]], Cell[CellGroupData[{ Cell[54714, 1271, 629, 19, 70, "Input",ExpressionUUID->"9642b6a3-445c-471e-b54d-07535e89fb75"], Cell[55346, 1292, 783, 18, 80, "Output",ExpressionUUID->"3da98cb5-1738-45c3-b804-ee6b0e874f23"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[56178, 1316, 81, 0, 43, "Subsubsection",ExpressionUUID->"6e82eda8-ce54-4467-b5d1-94ab1faef00d"], Cell[CellGroupData[{ Cell[56284, 1320, 667, 19, 29, "Input",ExpressionUUID->"d099ffa9-d0a1-4ae0-85d3-b41f0a7956ef"], Cell[56954, 1341, 1599, 49, 135, "Output",ExpressionUUID->"d10a3798-c23f-4e1f-95c3-9a94404b8172"] }, Open ]], Cell[CellGroupData[{ Cell[58590, 1395, 629, 19, 70, "Input",ExpressionUUID->"1307b1c4-d1fc-4431-ae1c-bb18fbfbd4ae"], Cell[59222, 1416, 1109, 27, 100, "Output",ExpressionUUID->"13017ad6-d3e0-4eac-8340-7342d7fc6bc2"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[60380, 1449, 81, 0, 43, "Subsubsection",ExpressionUUID->"767e6b51-ea90-4a4d-bd15-fe8d949117d6"], Cell[CellGroupData[{ Cell[60486, 1453, 667, 19, 29, "Input",ExpressionUUID->"7e32617c-205c-4965-aa02-d25c721cb1fe"], Cell[61156, 1474, 3043, 103, 220, "Output",ExpressionUUID->"c75b45ce-b873-46cc-8f6b-94b3ef571163"] }, Open ]], Cell[CellGroupData[{ Cell[64236, 1582, 629, 19, 70, "Input",ExpressionUUID->"57d266a8-78f7-470c-8fa0-e9fcefda2814"], Cell[64868, 1603, 2266, 61, 121, "Output",ExpressionUUID->"bea9c194-ba0a-4cbb-8dbd-759d715c35d0"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[67195, 1671, 89, 0, 53, "Subsection",ExpressionUUID->"4d0416ec-ae8a-480f-b2a5-55d2551d9f62"], Cell[67287, 1673, 286, 4, 55, "Text",ExpressionUUID->"b3941857-02f2-40cf-aded-3c2310273277"], Cell[CellGroupData[{ Cell[67598, 1681, 234, 5, 29, "Input",ExpressionUUID->"05673abd-651f-44fa-bc6d-f725222dfb93"], Cell[67835, 1688, 194, 3, 33, "Output",ExpressionUUID->"4b4df3c8-9360-4da7-82d9-5185597a67d2"] }, Open ]], Cell[CellGroupData[{ Cell[68066, 1696, 81, 0, 43, "Subsubsection",ExpressionUUID->"4dbcf645-5e55-410b-aa39-f17d5aa709c7"], Cell[CellGroupData[{ Cell[68172, 1700, 667, 19, 29, "Input",ExpressionUUID->"9bdb5ccb-f52e-4aa4-a21d-b6b913516838"], Cell[68842, 1721, 922, 28, 75, "Output",ExpressionUUID->"534a7d59-d487-46f1-b737-998e01b33962"] }, Open ]], Cell[CellGroupData[{ Cell[69801, 1754, 191, 4, 29, "Input",ExpressionUUID->"0f31244d-3fef-4268-a80d-cbfec5a5278e"], Cell[69995, 1760, 306, 9, 33, "Output",ExpressionUUID->"ad004e79-d318-4a1f-a1bb-de30a82a9e14"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[70350, 1775, 81, 0, 43, "Subsubsection",ExpressionUUID->"c45f3fe6-69f2-4df8-997c-a919d95570f7"], Cell[CellGroupData[{ Cell[70456, 1779, 667, 19, 29, "Input",ExpressionUUID->"864ad4d9-9f9c-4297-a4c8-7dc286a969f1"], Cell[71126, 1800, 1599, 49, 135, "Output",ExpressionUUID->"ebbb698d-555b-49f0-8800-1608d6c1376a"] }, Open ]], Cell[CellGroupData[{ Cell[72762, 1854, 191, 4, 29, "Input",ExpressionUUID->"e1902a8a-73b0-498e-8a87-018f97466f53"], Cell[72956, 1860, 476, 13, 33, "Output",ExpressionUUID->"05a6de03-5d36-415c-8a91-931a88c8738f"] }, Open ]], Cell[CellGroupData[{ Cell[73469, 1878, 187, 4, 29, "Input",ExpressionUUID->"a6d921c9-115c-475d-b5d6-1d015b06dd97"], Cell[73659, 1884, 476, 13, 33, "Output",ExpressionUUID->"b15ecd43-1f86-445f-ba28-50d1f5862fe9"] }, Open ]], Cell[CellGroupData[{ Cell[74172, 1902, 333, 9, 29, "Input",ExpressionUUID->"5fdbfa0b-ef51-4ad8-836b-16fe7ca0fb9e"], Cell[74508, 1913, 476, 13, 33, "Output",ExpressionUUID->"aaa698b4-5a56-4338-b29f-1d391f86f9d7"] }, Open ]], Cell[74999, 1929, 99, 0, 33, "Text",ExpressionUUID->"16564f86-dca8-42d4-a6dc-b20b81ad38ec"], Cell[CellGroupData[{ Cell[75123, 1933, 268, 6, 49, "Input",ExpressionUUID->"d82dc806-ebe6-48bf-8909-222fcfb30b74"], Cell[75394, 1941, 476, 13, 33, "Output",ExpressionUUID->"81e51410-0b38-40a6-b6b5-759db19fe5f5"] }, Open ]], Cell[75885, 1957, 104, 0, 33, "Text",ExpressionUUID->"03f56e29-993d-4090-b155-dbbe71213bb3"], Cell[CellGroupData[{ Cell[76014, 1961, 295, 7, 49, "Input",ExpressionUUID->"cb851667-0fe4-47c3-8718-36a09ef9dbd4"], Cell[76312, 1970, 476, 13, 33, "Output",ExpressionUUID->"a84d698f-3805-47e1-8717-30386bee8e66"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[76837, 1989, 81, 0, 43, "Subsubsection",ExpressionUUID->"00d7151b-8318-4803-846d-9639c16bfebf"], Cell[CellGroupData[{ Cell[76943, 1993, 667, 19, 29, "Input",ExpressionUUID->"e89d24c8-40d9-4ce6-a594-4c53a02e6128"], Cell[77613, 2014, 3043, 103, 220, "Output",ExpressionUUID->"04e4499c-d63d-4802-a3a5-8d128ca264b6"] }, Open ]], Cell[CellGroupData[{ Cell[80693, 2122, 191, 4, 29, "Input",ExpressionUUID->"d29dbaea-b107-4562-8bcd-b96d6745ae15"], Cell[80887, 2128, 1392, 44, 53, "Output",ExpressionUUID->"85bb87dd-49ec-4569-add5-3deb342fc92b"] }, Open ]], Cell[82294, 2175, 161, 3, 29, "Input",ExpressionUUID->"1dcd7d42-12a3-49ca-951a-cfa4b10a4a3f"] }, Open ]], Cell[CellGroupData[{ Cell[82492, 2183, 81, 0, 43, "Subsubsection",ExpressionUUID->"87932227-fcd1-478b-ae76-9c8d9397c25e"], Cell[CellGroupData[{ Cell[82598, 2187, 667, 19, 29, "Input",ExpressionUUID->"ee3ea325-3d70-4ea9-946f-6f61742c4b30"], Cell[83268, 2208, 6052, 207, 441, "Output",ExpressionUUID->"150e01f1-b0be-452f-811a-944f82e8773e"] }, Open ]], Cell[CellGroupData[{ Cell[89357, 2420, 191, 4, 29, "Input",ExpressionUUID->"9b7d47a8-0504-4d21-b8ec-84bfcbb36ad3"], Cell[89551, 2426, 2777, 88, 74, "Output",ExpressionUUID->"ca05c370-bcab-4049-9a8e-a457720d6ee8"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[92389, 2521, 82, 0, 53, "Subsection",ExpressionUUID->"2e521e35-4fa7-4d95-a4d9-7046f1e24ef5"], Cell[CellGroupData[{ Cell[92496, 2525, 234, 5, 29, "Input",ExpressionUUID->"2f12b329-d358-43af-b6cc-40a43b09a7e5"], Cell[92733, 2532, 194, 3, 33, "Output",ExpressionUUID->"b9b924d3-5087-4b2c-9074-89781329d056"] }, Open ]], Cell[CellGroupData[{ Cell[92964, 2540, 668, 19, 29, "Input",ExpressionUUID->"7a182edf-d269-40a5-8de6-ede8e86ff684"], Cell[93635, 2561, 27913, 956, 1968, "Output",ExpressionUUID->"44b65dec-0b32-4a5c-ac8f-1937c705048a"] }, Open ]], Cell[CellGroupData[{ Cell[121585, 3522, 258, 7, 29, "Input",ExpressionUUID->"2ffed44c-aecc-44ed-a7fd-71776376ed42"], Cell[121846, 3531, 1341, 42, 53, "Output",ExpressionUUID->"0d6ad9b2-b536-4702-a0ef-0a21eb497ebb"] }, Open ]], Cell[CellGroupData[{ Cell[123224, 3578, 258, 7, 29, "Input",ExpressionUUID->"583fe0f5-86b9-4064-98c5-3295074e0f81"], Cell[123485, 3587, 1330, 42, 53, "Output",ExpressionUUID->"3bdcba1e-b224-4bde-bd47-47b592f15d25"] }, Open ]], Cell[CellGroupData[{ Cell[124852, 3634, 258, 7, 29, "Input",ExpressionUUID->"d8b615c8-a239-4973-9ebc-96ae7c6eed39"], Cell[125113, 3643, 468, 15, 33, "Output",ExpressionUUID->"b4a9f015-220e-45f6-ac36-d2c3eb42f578"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[125642, 3665, 84, 0, 66, "Section",ExpressionUUID->"dae1fc54-01e7-4442-b0c4-c97f9d6b8102"], Cell[CellGroupData[{ Cell[125751, 3669, 99, 0, 53, "Subsection",ExpressionUUID->"d4320690-772c-459c-bd94-6db86ab5446c"], Cell[125853, 3671, 225, 5, 33, "Text",ExpressionUUID->"55818e0a-35a4-468c-b69c-c9931754c2af"], Cell[126081, 3678, 882, 28, 70, "Input",ExpressionUUID->"8d737263-2ced-4cca-8cec-4c8c98431e4c"], Cell[CellGroupData[{ Cell[126988, 3710, 162, 3, 29, "Input",ExpressionUUID->"403d25c7-f4ad-45d2-a909-094502887506"], Cell[127153, 3715, 402, 7, 33, "Output",ExpressionUUID->"5f16ce4e-a3df-4ca0-a87d-a0fa5eca7a31"] }, Open ]], Cell[127570, 3725, 365, 10, 29, "Input",ExpressionUUID->"e57b7199-ede7-4682-a2e2-730fee8aa175"], Cell[127938, 3737, 372, 11, 29, "Input",ExpressionUUID->"83d6ddf8-c6c9-451a-b32a-2c7274e38967"] }, Open ]], Cell[CellGroupData[{ Cell[128347, 3753, 101, 0, 53, "Subsection",ExpressionUUID->"444d3539-8049-4bb6-be6b-5859bad6d076"], Cell[128451, 3755, 225, 5, 33, "Text",ExpressionUUID->"d09c929b-5a7d-47ae-98b9-068bcc60c2c0"], Cell[128679, 3762, 710, 22, 29, "Input",ExpressionUUID->"055b4eb6-d7fd-46c1-89aa-253a768a6d3b"], Cell[CellGroupData[{ Cell[129414, 3788, 157, 3, 29, "Input",ExpressionUUID->"b5597005-3e73-4e3d-8363-bf1756815d23"], Cell[129574, 3793, 1225, 38, 53, "Output",ExpressionUUID->"d4aa1be7-73e1-4231-9945-83b61f7eac4c"] }, Open ]], Cell[CellGroupData[{ Cell[130836, 3836, 225, 5, 29, "Input",ExpressionUUID->"e84fe0e0-474e-4d43-ad1d-9d767c2af6f2"], Cell[131064, 3843, 398, 7, 33, "Output",ExpressionUUID->"21c3bab7-7eb2-4898-be04-11bcd28618ae"] }, Open ]], Cell[131477, 3853, 320, 8, 29, "Input",ExpressionUUID->"02379ca5-b009-4412-8b59-5fb87b5c3e1d"], Cell[CellGroupData[{ Cell[131822, 3865, 251, 6, 29, "Input",ExpressionUUID->"5f2908df-a5d4-4008-b41b-6bf92e5a9bcf"], Cell[132076, 3873, 268, 5, 33, "Output",ExpressionUUID->"f9119fef-18ec-4040-815b-df28ae2381eb"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[132405, 3885, 83, 0, 66, "Section",ExpressionUUID->"56d5c3d4-5161-4467-b0d9-e0cc56bd6774"], Cell[CellGroupData[{ Cell[132513, 3889, 85, 0, 70, "Subsection",ExpressionUUID->"2862e070-9225-4eb1-b2b7-226107ee6e55"], Cell[CellGroupData[{ Cell[132623, 3893, 651, 19, 70, "Input",ExpressionUUID->"3af395db-b4bc-4c22-b9e5-c23505ce9e03"], Cell[133277, 3914, 223, 5, 70, "Output",ExpressionUUID->"bcf313e8-7022-442c-ad7b-da77db7f20b8"] }, Open ]], Cell[CellGroupData[{ Cell[133537, 3924, 647, 18, 70, "Input",ExpressionUUID->"a1080ed5-c58c-44d3-8eac-270a47d3fed5"], Cell[134187, 3944, 239, 5, 70, "Output",ExpressionUUID->"16815d71-1ed5-4629-959b-a25e232ddcd5"] }, Open ]], Cell[134441, 3952, 117, 0, 70, "Text",ExpressionUUID->"686e3782-1801-4edc-9074-3849914aefd2"], Cell[CellGroupData[{ Cell[134583, 3956, 223, 6, 70, "Input",ExpressionUUID->"0bf02975-fd7e-4dd3-9fad-f68deba53856"], Cell[134809, 3964, 126, 0, 70, "Output",ExpressionUUID->"9fecf28e-09ad-4155-afad-6787e33f1b5e"] }, Open ]], Cell[134950, 3967, 239, 6, 70, "Input",ExpressionUUID->"bea94f1f-d959-465b-a997-cd55b073c38b"] }, Open ]], Cell[CellGroupData[{ Cell[135226, 3978, 84, 0, 70, "Subsection",ExpressionUUID->"893bb4a7-7501-4d91-a3e2-b500fa35c8bb"], Cell[CellGroupData[{ Cell[135335, 3982, 446, 14, 70, "Input",ExpressionUUID->"944192c6-51a7-41d8-8228-41c82e256a75"], Cell[135784, 3998, 126, 0, 70, "Output",ExpressionUUID->"cbfe5655-f103-46ca-a215-30951afaaff5"] }, Open ]], Cell[CellGroupData[{ Cell[135947, 4003, 674, 21, 70, "Input",ExpressionUUID->"8a7ffed6-5640-4e87-b8e5-7f6cf5caec46"], Cell[136624, 4026, 223, 3, 70, "Output",ExpressionUUID->"eb533117-b09a-44da-aad7-644892e4dcf7"] }, Open ]], Cell[CellGroupData[{ Cell[136884, 4034, 708, 22, 70, "Input",ExpressionUUID->"c42a0436-96a7-4968-b7d7-5d59be668367"], Cell[137595, 4058, 223, 3, 70, "Output",ExpressionUUID->"2db50690-3b18-41ae-9387-0333dbd98e91"] }, Open ]], Cell[CellGroupData[{ Cell[137855, 4066, 708, 22, 70, "Input",ExpressionUUID->"8f2b1c88-04d7-4663-976e-070889dd5c43"], Cell[138566, 4090, 223, 3, 70, "Output",ExpressionUUID->"c219c716-cca9-4ca3-91e9-15b1084ed2a7"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[138850, 4100, 85, 0, 52, "Section",ExpressionUUID->"282487d3-17cd-4590-b036-87ca93b92474"], Cell[CellGroupData[{ Cell[138960, 4104, 326, 8, 70, "Input",ExpressionUUID->"da648127-86e8-4538-bfc3-b83e4e35d9c1"], Cell[139289, 4114, 2554, 103, 70, 1107, 78, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"ea599d54-4f62-48c1-8195-dd76b40e4343"], Cell[141846, 4219, 191, 5, 70, "Output",ExpressionUUID->"c894f9de-213c-4452-a190-51bae1109e1b"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[142086, 4230, 82, 0, 52, "Section",ExpressionUUID->"100dd69a-1682-4562-9be8-70e4f7dc1a67"], Cell[CellGroupData[{ Cell[142193, 4234, 556, 15, 70, "Input",ExpressionUUID->"8930cb4f-255f-4323-82c9-ea555900bf08"], Cell[142752, 4251, 23540, 1379, 70, 18650, 1301, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"89fadf91-1055-4045-9b86-3c6f7fcfe427"], Cell[166295, 5632, 196, 5, 70, "Output",ExpressionUUID->"14128ff4-d373-41ff-bc5e-8b9014abbf05"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[166540, 5643, 93, 0, 52, "Section",ExpressionUUID->"86126632-c984-4ad9-9ba7-9450d8f98dba"], Cell[CellGroupData[{ Cell[166658, 5647, 153, 3, 29, "Input",ExpressionUUID->"b6e015e0-aa73-4628-a99d-ca2a3841f25d"], Cell[166814, 5652, 87, 0, 33, "Output",ExpressionUUID->"51152dfe-4b8a-40b8-a995-2999126784ed"] }, Open ]], Cell[166916, 5655, 765, 19, 90, "Input",ExpressionUUID->"d09d4de5-0f27-4066-8017-5a2cad05ba8b"], Cell[CellGroupData[{ Cell[167706, 5678, 316, 9, 29, "Input",ExpressionUUID->"17646788-1e28-45d1-a309-e506f0425649"], Cell[168025, 5689, 2401, 65, 115, "Output",ExpressionUUID->"6e58e538-ba0b-46d1-96e3-1c335ad6dbdc"] }, Open ]], Cell[CellGroupData[{ Cell[170463, 5759, 328, 10, 29, "Input",ExpressionUUID->"faa44b13-efde-486a-807d-ca4602c094b1"], Cell[170794, 5771, 2487, 67, 115, "Output",ExpressionUUID->"d076aa0c-1053-4441-9eb6-9f1853bdbe90"] }, Open ]], Cell[CellGroupData[{ Cell[173318, 5843, 84, 0, 53, "Subsection",ExpressionUUID->"6af9e340-a659-4e34-be15-630a5ee78a9c"], Cell[CellGroupData[{ Cell[173427, 5847, 411, 12, 29, "Input",ExpressionUUID->"caada561-3658-4b78-b680-a4f3580eb1f4"], Cell[173841, 5861, 373, 11, 33, "Output",ExpressionUUID->"751db27a-5c87-455a-9c2d-c7172d9bda26"] }, Open ]], Cell[174229, 5875, 2153, 65, 111, "Input",ExpressionUUID->"0400fbe1-8029-4870-b04a-e5270fa65252"], Cell[CellGroupData[{ Cell[176407, 5944, 86, 0, 43, "Subsubsection",ExpressionUUID->"501de846-ea13-4082-89ad-3802aa42b9b7"], Cell[CellGroupData[{ Cell[176518, 5948, 223, 5, 70, "Input",ExpressionUUID->"8df9843d-d249-403c-9c99-43686dbeabe3"], Cell[176744, 5955, 2808, 95, 70, "Output",ExpressionUUID->"9d0df815-d3ed-4b4b-a18f-fef877a8e9b2"] }, Open ]], Cell[CellGroupData[{ Cell[179589, 6055, 295, 7, 70, "Input",ExpressionUUID->"7260a402-56da-4dcc-b153-cd8c10f28a97"], Cell[179887, 6064, 129, 2, 70, "Output",ExpressionUUID->"328a11ca-a9b9-4acd-a989-2175e63ca693"] }, Open ]], Cell[CellGroupData[{ Cell[180053, 6071, 201, 5, 70, "Input",ExpressionUUID->"9451ea68-2a0c-4ad3-bbeb-68535636acc0"], Cell[180257, 6078, 2633, 91, 70, "Output",ExpressionUUID->"3cba153c-2d7f-4a9c-9eb2-f56e5ef3ee26"] }, Open ]], Cell[CellGroupData[{ Cell[182927, 6174, 274, 6, 70, "Input",ExpressionUUID->"e70b5bc8-61ee-40a6-a679-3f73cca14cfd"], Cell[183204, 6182, 2955, 99, 70, "Output",ExpressionUUID->"714fe8e7-1e5d-44f7-bf03-fbdef7da8214"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[186208, 6287, 87, 0, 35, "Subsubsection",ExpressionUUID->"2d495978-4f88-480a-9f79-b6f14bf010e7"], Cell[CellGroupData[{ Cell[186320, 6291, 223, 5, 70, "Input",ExpressionUUID->"ac7f5314-360c-4b1e-9f56-54e7b58043e8"], Cell[186546, 6298, 3333, 109, 70, "Output",ExpressionUUID->"992990d5-dec9-4160-9317-bf328412c31a"] }, Open ]], Cell[CellGroupData[{ Cell[189916, 6412, 296, 7, 70, "Input",ExpressionUUID->"68523049-6b19-41ec-8a96-5730137c4a8f"], Cell[190215, 6421, 130, 2, 70, "Output",ExpressionUUID->"d1c9e43f-b143-4976-8fca-83b931d600d8"] }, Open ]], Cell[CellGroupData[{ Cell[190382, 6428, 203, 5, 70, "Input",ExpressionUUID->"1fec1bb1-2e81-4703-9e71-3f0ecce0199e"], Cell[190588, 6435, 3792, 122, 70, "Output",ExpressionUUID->"1776d107-0822-4943-a3d2-7e16dfa0eb23"] }, Open ]], Cell[CellGroupData[{ Cell[194417, 6562, 321, 8, 70, "Input",ExpressionUUID->"6990f0dc-8d3e-493b-88b3-95f7c5bf4bdc"], Cell[194741, 6572, 4022, 135, 70, "Output",ExpressionUUID->"a0056831-f9f9-43a6-86a6-6b664fdd44ac"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[198812, 6713, 86, 0, 35, "Subsubsection",ExpressionUUID->"714d6eb3-f833-4564-a06a-ebd4c9e5ff97"], Cell[CellGroupData[{ Cell[198923, 6717, 223, 5, 70, "Input",ExpressionUUID->"df056351-0821-40a7-b136-7f3773bb152d"], Cell[199149, 6724, 4492, 144, 70, "Output",ExpressionUUID->"5a33de46-ca3d-47e8-aa7d-1ad8103a5e39"] }, Open ]], Cell[CellGroupData[{ Cell[203678, 6873, 296, 7, 70, "Input",ExpressionUUID->"5073cb5b-6a34-4c48-a2bf-a22e24b685e4"], Cell[203977, 6882, 129, 2, 70, "Output",ExpressionUUID->"aca5223b-bf2f-4322-96e9-b9087500177d"] }, Open ]], Cell[CellGroupData[{ Cell[204143, 6889, 202, 5, 70, "Input",ExpressionUUID->"a66aa04e-aebb-44ce-ab13-d8f080cbd4af"], Cell[204348, 6896, 4628, 146, 70, "Output",ExpressionUUID->"0c294a9a-eb9d-48d2-9f79-a0e8ecb6172e"] }, Open ]], Cell[CellGroupData[{ Cell[209013, 7047, 833, 18, 70, "Input",ExpressionUUID->"f20f4c61-d358-4aaf-8ae7-150de23d9753"], Cell[209849, 7067, 22249, 284, 70, "Output",ExpressionUUID->"2f5dc092-f0af-47e5-9d1f-5d2350e59375"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[232147, 7357, 89, 0, 35, "Subsubsection",ExpressionUUID->"138c9da9-f6e7-488a-ba98-df22374a8629"], Cell[CellGroupData[{ Cell[232261, 7361, 2461, 70, 70, "Input",ExpressionUUID->"eda0d9b6-221b-4ee5-82fe-0e450c860658"], Cell[234725, 7433, 6151, 187, 70, "Output",ExpressionUUID->"5a76abfa-bb3f-4a59-b88e-d496a04cbcfc"] }, Open ]], Cell[CellGroupData[{ Cell[240913, 7625, 262, 6, 70, "Input",ExpressionUUID->"aab647cd-87d7-4d23-ad48-e3ea0b3b4cd6"], Cell[241178, 7633, 129, 2, 70, "Output",ExpressionUUID->"d746e435-8c25-4a33-953b-ef346ac17dc9"] }, Open ]], Cell[CellGroupData[{ Cell[241344, 7640, 202, 5, 70, "Input",ExpressionUUID->"c7e3f968-f2d0-49cf-a18c-da02efa3e684"], Cell[241549, 7647, 4592, 146, 70, "Output",ExpressionUUID->"1e774ace-4193-460e-b4cf-4708002c819c"] }, Open ]], Cell[CellGroupData[{ Cell[246178, 7798, 806, 17, 70, "Input",ExpressionUUID->"e323743c-56a1-46ec-ae49-62d02dca1111"], Cell[CellGroupData[{ Cell[247009, 7819, 829, 15, 70, "Print",ExpressionUUID->"a20e8294-dfe0-4e0b-91eb-d3398a620ea4"], Cell[247841, 7836, 856, 16, 70, "Print",ExpressionUUID->"8888a450-da65-4d0a-8015-ee8faeec46c6"], Cell[248700, 7854, 860, 17, 70, "Print",ExpressionUUID->"7ea319aa-eda5-47ad-b05c-bd127cd15697"], Cell[249563, 7873, 837, 16, 70, "Print",ExpressionUUID->"7b64be80-cafd-4455-aada-5d26998dc4dd"], Cell[250403, 7891, 858, 17, 70, "Print",ExpressionUUID->"26234a39-68b5-4c32-a3a4-626a0269ec0e"], Cell[251264, 7910, 835, 15, 70, "Print",ExpressionUUID->"b2496fcc-d66a-42dc-9593-1477a6caa451"], Cell[252102, 7927, 837, 16, 70, "Print",ExpressionUUID->"bc9a93a2-85ae-48ce-a053-fecddf281eb8"], Cell[252942, 7945, 837, 16, 70, "Print",ExpressionUUID->"46f7c9ef-34c3-4222-a5f6-863dd2d5b2b4"], Cell[253782, 7963, 854, 16, 70, "Print",ExpressionUUID->"4bb1657f-b019-4134-921c-643b7587b9da"], Cell[254639, 7981, 835, 16, 70, "Print",ExpressionUUID->"ab079839-9857-4cae-b0f2-76189f5f780b"], Cell[255477, 7999, 833, 16, 70, "Print",ExpressionUUID->"bc7916ca-2e7f-42f3-8298-dc45e7ec7159"], Cell[256313, 8017, 837, 16, 70, "Print",ExpressionUUID->"2a1dfe8c-d19d-414e-83d4-fde651097332"], Cell[257153, 8035, 837, 16, 70, "Print",ExpressionUUID->"12e431c6-b6e9-4fba-8e6d-e383bef0ab70"], Cell[257993, 8053, 837, 16, 70, "Print",ExpressionUUID->"4a0abf1b-7a4b-452d-b305-14ce92372541"], Cell[258833, 8071, 837, 16, 70, "Print",ExpressionUUID->"6f36c16f-4521-49d0-91de-325c3f56b3bd"], Cell[259673, 8089, 858, 17, 70, "Print",ExpressionUUID->"1d36c47a-a178-4c26-bfe9-abb53e15d1de"], Cell[260534, 8108, 858, 17, 70, "Print",ExpressionUUID->"d7f2bc5b-5d47-4714-942f-1b129c351914"], Cell[261395, 8127, 841, 16, 70, "Print",ExpressionUUID->"c7725080-2f70-4810-bd5b-a51e999767c3"], Cell[262239, 8145, 837, 16, 70, "Print",ExpressionUUID->"6e58d480-d67f-430d-b965-14618cd7cdca"], Cell[263079, 8163, 839, 16, 70, "Print",ExpressionUUID->"35eece65-268a-4b19-a741-d128bd9a28c8"], Cell[263921, 8181, 858, 17, 70, "Print",ExpressionUUID->"9b4f9bb1-d614-489b-acd2-bc69fc27a82e"], Cell[264782, 8200, 839, 16, 70, "Print",ExpressionUUID->"f5b698e7-6326-41ca-827d-4ee686d387dd"], Cell[265624, 8218, 858, 17, 70, "Print",ExpressionUUID->"e7e6c228-63d0-437b-be83-196702bbe299"], Cell[266485, 8237, 837, 16, 70, "Print",ExpressionUUID->"614d2dff-6657-4e09-9129-0fcecc6dbf15"], Cell[267325, 8255, 837, 16, 70, "Print",ExpressionUUID->"10a5f522-1c87-4a54-a037-e328ae3783bf"], Cell[268165, 8273, 860, 17, 70, "Print",ExpressionUUID->"612104cb-2609-4670-adcc-0bdadd6ec7b4"], Cell[269028, 8292, 858, 17, 70, "Print",ExpressionUUID->"3fc54b0f-732f-4dfc-bc9e-127b448a3f0b"], Cell[269889, 8311, 837, 16, 70, "Print",ExpressionUUID->"4f72c090-e3e0-4d74-aa38-b366c54f7b12"], Cell[270729, 8329, 835, 16, 70, "Print",ExpressionUUID->"74c876fa-aaac-41e0-8551-c6713b61985d"], Cell[271567, 8347, 858, 17, 70, "Print",ExpressionUUID->"00553325-ffbc-4f74-bc7f-936eb378e49f"], Cell[272428, 8366, 837, 16, 70, "Print",ExpressionUUID->"f3418f46-ae09-4128-9b9f-368ba17d5a08"], Cell[273268, 8384, 837, 16, 70, "Print",ExpressionUUID->"6ad82b3d-1759-476b-beeb-9cb844e162f2"], Cell[274108, 8402, 835, 16, 70, "Print",ExpressionUUID->"d93efd96-c1fd-4b82-957a-7eced8d376d9"], Cell[274946, 8420, 856, 16, 70, "Print",ExpressionUUID->"76d80d56-b226-415b-bf26-f6231134f2ed"], Cell[275805, 8438, 860, 17, 70, "Print",ExpressionUUID->"a7ea5c42-ffb0-4260-a0e5-392aed993190"], Cell[276668, 8457, 833, 16, 70, "Print",ExpressionUUID->"9cdef1d3-98fa-4387-9905-1ffea9b2a5c7"], Cell[277504, 8475, 835, 16, 70, "Print",ExpressionUUID->"455bc520-1420-4bb4-ba82-9dc8122822d9"], Cell[278342, 8493, 841, 16, 70, "Print",ExpressionUUID->"92c35e91-225b-4ce9-92d9-d575f165414e"], Cell[279186, 8511, 827, 15, 70, "Print",ExpressionUUID->"60c40b01-1b7d-4165-aa70-4adc2ecc90ac"], Cell[280016, 8528, 835, 16, 70, "Print",ExpressionUUID->"133b1721-fb62-413c-9bb9-9766217e89d9"], Cell[280854, 8546, 837, 16, 70, "Print",ExpressionUUID->"0359bbfb-37f9-493a-a8b0-7f90cba40b4f"], Cell[281694, 8564, 860, 17, 70, "Print",ExpressionUUID->"277c6dfe-30e8-4088-993d-fcd4010eb658"], Cell[282557, 8583, 833, 16, 70, "Print",ExpressionUUID->"11f470d2-24b2-408b-8396-3ac6186ee8d8"], Cell[283393, 8601, 839, 16, 70, "Print",ExpressionUUID->"2e73df5d-dd87-4f30-9b8e-a44d6dba6cd9"], Cell[284235, 8619, 835, 16, 70, "Print",ExpressionUUID->"fc6e9993-38e0-4113-b4e7-1c5fa859cac5"], Cell[285073, 8637, 858, 17, 70, "Print",ExpressionUUID->"60832796-950c-4b58-a931-9d248072ee6b"], Cell[285934, 8656, 827, 15, 70, "Print",ExpressionUUID->"a933d7dd-8fd6-4132-9ea1-ebe515189446"], Cell[286764, 8673, 835, 16, 70, "Print",ExpressionUUID->"a1084a84-61c0-427a-a7d9-cdbc482608de"], Cell[287602, 8691, 839, 16, 70, "Print",ExpressionUUID->"f90b50c1-8a8f-40a9-9071-160e98414d0d"], Cell[288444, 8709, 837, 16, 70, "Print",ExpressionUUID->"44d42ac7-5722-48e2-827c-c0bd4e72ef1c"], Cell[289284, 8727, 841, 16, 70, "Print",ExpressionUUID->"bec4ad51-b979-44b0-9ea4-c8cf21e8ec7a"], Cell[290128, 8745, 862, 17, 70, "Print",ExpressionUUID->"d4942845-68c2-4a33-8da0-7eb2c83c0a81"], Cell[290993, 8764, 858, 17, 70, "Print",ExpressionUUID->"8e0e7515-67a6-47f2-bc9b-f6b17741002e"], Cell[291854, 8783, 860, 17, 70, "Print",ExpressionUUID->"8a6896c3-9d91-4114-808e-cfda094b223e"], Cell[292717, 8802, 837, 16, 70, "Print",ExpressionUUID->"a66faf3f-4bc6-4935-8034-4aeaf72f710d"], Cell[293557, 8820, 839, 16, 70, "Print",ExpressionUUID->"136b11a6-0441-4595-b8d7-187da8d5f4b4"], Cell[294399, 8838, 839, 16, 70, "Print",ExpressionUUID->"9f46cc5e-7809-4704-b6e2-23c62647e2da"], Cell[295241, 8856, 835, 16, 70, "Print",ExpressionUUID->"061f5347-373d-4857-aac0-eacefd10ab18"], Cell[296079, 8874, 837, 16, 70, "Print",ExpressionUUID->"15afdd61-455a-431c-978d-4fe780a333d0"], Cell[296919, 8892, 845, 16, 70, "Print",ExpressionUUID->"cc6d30d5-4edc-45d4-b8f5-f57a9932647b"], Cell[297767, 8910, 860, 17, 70, "Print",ExpressionUUID->"d8bf0204-741d-4f8c-92ca-a24e4cfd47b6"], Cell[298630, 8929, 841, 16, 70, "Print",ExpressionUUID->"54bd13c2-3788-4643-b8e4-2a7b70eec4f6"], Cell[299474, 8947, 839, 16, 70, "Print",ExpressionUUID->"cf798c6a-882a-40ef-bb60-501cd6d39bd8"], Cell[300316, 8965, 843, 16, 70, "Print",ExpressionUUID->"f571e069-92ee-4f71-b213-3d1539ed5c42"], Cell[301162, 8983, 841, 16, 70, "Print",ExpressionUUID->"b6655334-fc8a-4371-9e21-15f8e1ca3723"], Cell[302006, 9001, 841, 16, 70, "Print",ExpressionUUID->"f3cc79a9-4b9a-4b69-a265-b9d51de4e7bc"], Cell[302850, 9019, 841, 16, 70, "Print",ExpressionUUID->"7e81eee6-6478-4370-bba7-44efdd41d4d5"], Cell[303694, 9037, 841, 16, 70, "Print",ExpressionUUID->"029f8628-7d0c-457c-ae03-2f4541b59237"], Cell[304538, 9055, 862, 17, 70, "Print",ExpressionUUID->"6d16b701-d25b-4612-b0a0-61455ee6ff03"] }, Open ]], Cell[305415, 9075, 58762, 747, 70, "Output",ExpressionUUID->"0ad26a54-bd2e-4650-a6df-0fda119308ea"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[364226, 9828, 87, 0, 35, "Subsubsection",ExpressionUUID->"33052e1a-3b63-4cdc-9457-24c371555797"], Cell[CellGroupData[{ Cell[364338, 9832, 223, 5, 29, "Input",ExpressionUUID->"a5f75d17-4e4d-491c-a8e6-08086a808301"], Cell[364564, 9839, 4554, 154, 243, "Output",ExpressionUUID->"0829a467-416b-4756-90d1-45ca3f98ad69"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[369167, 9999, 86, 0, 43, "Subsubsection",ExpressionUUID->"55712be7-b230-481b-8f72-9ced6ccb54b7"], Cell[CellGroupData[{ Cell[369278, 10003, 223, 5, 29, "Input",ExpressionUUID->"0104c975-fbd4-48dc-bc6e-d7f9c7c3e9e3"], Cell[369504, 10010, 6140, 192, 275, "Output",ExpressionUUID->"73fd3bc2-a9d9-402c-b3a8-11495dbca57d"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[375693, 10208, 87, 0, 43, "Subsubsection",ExpressionUUID->"374e4bac-6687-4040-ba21-bf1f54a9715a"], Cell[CellGroupData[{ Cell[375805, 10212, 223, 5, 29, "Input",ExpressionUUID->"52f774da-530c-416f-92fb-e52a308ec5a5"], Cell[376031, 10219, 6557, 204, 306, "Output",ExpressionUUID->"fd9d3c8f-eed2-4fa8-9017-a8055677e669"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[382637, 10429, 86, 0, 43, "Subsubsection",ExpressionUUID->"b78df88c-446e-41b4-85a8-68a54503131c"], Cell[CellGroupData[{ Cell[382748, 10433, 223, 5, 29, "Input",ExpressionUUID->"0bc6c6e1-bb43-409a-8fd1-6862e0c987db"], Cell[382974, 10440, 7787, 240, 338, "Output",ExpressionUUID->"4d90e0c2-750f-4f90-af00-b7fa8e5ecbee"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[390810, 10686, 86, 0, 43, "Subsubsection",ExpressionUUID->"94f9bd08-29cf-46bb-aa17-925e0efd9178"], Cell[390899, 10688, 223, 5, 29, "Input",ExpressionUUID->"d1710ffa-bb36-4c88-b4c3-1a78bd9ef5cc"] }, Open ]], Cell[CellGroupData[{ Cell[391159, 10698, 86, 0, 43, "Subsubsection",ExpressionUUID->"3cdda472-9df1-48a9-beb3-ab07c8a6d42c"], Cell[391248, 10700, 224, 5, 29, "Input",ExpressionUUID->"487bf1f0-c86f-4fac-aa89-1670c0ba6871"] }, Open ]] }, Open ]] }, Open ]] }, Open ]] } ] *)