(************** Content-type: application/mathematica ************** CreatedBy='Mathematica 5.0' Mathematica-Compatible Notebook This notebook can be used with any Mathematica-compatible application, such as Mathematica, MathReader or Publicon. The data for the notebook starts with the line containing stars above. To get the notebook into a Mathematica-compatible application, do one of the following: * Save the data starting with the line of stars above into a file with a name ending in .nb, then open the file inside the application; * Copy the data starting with the line of stars above to the clipboard, then use the Paste menu command inside the application. Data for notebooks contains only printable 7-bit ASCII and can be sent directly in email or through ftp in text mode. Newlines can be CR, LF or CRLF (Unix, Macintosh or MS-DOS style). NOTE: If you modify the data for this notebook not in a Mathematica- compatible application, you must delete the line below containing the word CacheID, otherwise Mathematica-compatible applications may try to use invalid cache data. For more information on notebooks and Mathematica-compatible applications, contact Wolfram Research: web: http://www.wolfram.com email: info@wolfram.com phone: +1-217-398-0700 (U.S.) Notebook reader applications are available free of charge from Wolfram Research. *******************************************************************) (*CacheID: 232*) (*NotebookFileLineBreakTest NotebookFileLineBreakTest*) (*NotebookOptionsPosition[ 93893, 2318]*) (*NotebookOutlinePosition[ 94659, 2343]*) (* CellTagsIndexPosition[ 94615, 2339]*) (*WindowFrame->Normal*) Notebook[{ Cell["\<\ This file shows that when you use 5 triples, there is always a solution. \ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[ \(1 + 1\)], "Input"], Cell[BoxData[ \(2\)], "Output"] }, Open ]], Cell["See the other file for comments on the code", "Text"], Cell[BoxData[ RowBox[{ RowBox[{"a1", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ StyleBox[\({0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0}\), FontColor->RGBColor[0, 1, 1]], ",", "\[IndentingNewLine]", StyleBox[\({0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0}\), FontColor->RGBColor[0, 1, 1]], ",", StyleBox["\[IndentingNewLine]", FontColor->RGBColor[0, 1, 1]], StyleBox[\({0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0}\), FontColor->RGBColor[0, 1, 1]], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["1", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["1", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]]}], StyleBox["}", FontColor->RGBColor[0, 1, 1]]}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["1", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["1", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ "1", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["1", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["1", FontColor->RGBColor[0, 1, 1]]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", StyleBox["1", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["1", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["1", FontColor->RGBColor[0, 1, 1]]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ "1", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "1", ",", "0", ",", StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["1", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["1", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], ",", "1", StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], ",", StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], ",", StyleBox["1", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["1", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["1", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]], StyleBox[",", FontColor->RGBColor[0, 1, 1]], StyleBox["0", FontColor->RGBColor[0, 1, 1]]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], ",", StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], ",", StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", \({0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0}\), ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], ",", StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], ",", StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", \({0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0}\), ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], ",", StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], ",", StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], ",", StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ "0", ",", "0", ",", "0", ",", "1", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", StyleBox[",", FontColor->GrayLevel[0]], "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "1", ",", "0", StyleBox[",", FontColor->GrayLevel[0]], "0", ",", "1", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", StyleBox[",", FontColor->GrayLevel[0]], StyleBox["0", FontColor->GrayLevel[0]], StyleBox[",", FontColor->GrayLevel[0]], "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], ",", StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], ",", StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], ",", "0", ",", "0", ",", "0", ",", "1", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", StyleBox[",", FontColor->GrayLevel[0]], "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "1", StyleBox[",", FontColor->GrayLevel[0]], "0", ",", "1", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", StyleBox[",", FontColor->GrayLevel[0]], StyleBox["0", FontColor->GrayLevel[0]], StyleBox[",", FontColor->GrayLevel[0]], "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], ",", "1", StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], ",", StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1"}], "}"}], ",", "\[IndentingNewLine]", \({1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0}\), ",", "\[IndentingNewLine]", \({0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1}\), ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], ",", "1", StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], ",", StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"1", StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], ",", StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], ",", StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], ",", "0", ",", "1", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], ",", StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], ",", StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], ",", "0", ",", "1", ",", "1", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", \({0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0}\), ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], ",", StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], ",", StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], ",", "1", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"1", StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], ",", StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], ",", StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "1"}], "}"}], ",", "\[IndentingNewLine]", \({0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1}\), ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["1", FontColor->RGBColor[1, 0, 0]], StyleBox[",", FontColor->RGBColor[1, 0, 0]], StyleBox["0", FontColor->RGBColor[1, 0, 0]], ",", StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["1", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], StyleBox[",", FontColor->RGBColor[0, 0, 1]], StyleBox["0", FontColor->RGBColor[0, 0, 1]], ",", StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["1", FontColor->RGBColor[1, 0, 1]], StyleBox[",", FontColor->RGBColor[1, 0, 1]], StyleBox["0", FontColor->RGBColor[1, 0, 1]], ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "1", ",", "1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", \({0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0}\)}], "}"}]}], ";"}]], "Input"], Cell[BoxData[ \(cube[n_] := \(cube[n] = a1[\([n]\)]\)\)], "Input"], Cell[BoxData[ \(<< DiscreteMath`Combinatorica`\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[{ \(\(Clear[i, j, badcases, \ counter, \ \ sbset, \ test, \ soln, \ newtest, maxcounter, \ c3, \ c4, \ c5];\)\), "\[IndentingNewLine]", \(\(sbset := {1, 2, 3, 4};\)\), "\[IndentingNewLine]", \(\(j = 1;\)\), "\[IndentingNewLine]", \(\(worst = 27;\)\), "\[IndentingNewLine]", \(\(While[ sbset \[NotEqual] {6, \ 7, \ 8, \ 9}\ , \[IndentingNewLine]badcases = {}; \[IndentingNewLine]almost \ = 0; \[IndentingNewLine]test := Plus @@ Map[cube, sbset]; \[IndentingNewLine]soln = False; \[IndentingNewLine]maxcounter = 0; \[IndentingNewLine]While[ soln == False\ && \ \ j \[LessEqual] 30, \[IndentingNewLine] (*\ This\ while\ loop\ runs\ as\ long\ as\ we\ haven' t\ gone\ through\ all\ cubes\ and\ flag\ is\ false\ *) \ \ \[IndentingNewLine]counter = 0; \ (*\ this\ counts\ the\ number\ of\ misses\ between\ test\ and\ a\ \ cube\ *) \[IndentingNewLine]If[ MemberQ[sbset, j], \[IndentingNewLine]newtest = test - cube[j], \[IndentingNewLine]newtest = test\[IndentingNewLine]]; \ \ \ (*\ This\ is\ the\ condition\ we\ need\ for\ a\ match\ \ *) \[IndentingNewLine]For[i = 1, i \[LessEqual] 40, \(i++\), \[IndentingNewLine]If[ newtest[\([i]\)] < \(cube[ j]\)[\([i]\)], \[IndentingNewLine]counter = counter + 1\ \[IndentingNewLine]]; \ (*\ add\ 1\ to\ the\ deficiencies\ *) \[IndentingNewLine]]; \ (*\ end\ loop\ checking\ the\ jth\ cube\ *) \[IndentingNewLine]If[ counter\ == \ 0\ || \ \ \((\ counter\ < 4\ && \ \ newtest\ \[NotEqual] \ test)\), \[IndentingNewLine]\(soln = True;\)\[IndentingNewLine]]; \ \ (*\ end\ if\ *) \[IndentingNewLine]If[ counter\ > 3\ && \ newtest\ \[NotEqual] \ test, \[IndentingNewLine]\(AppendTo[ badcases, counter];\)\[IndentingNewLine]]; \[IndentingNewLine]j = j + 1; \[IndentingNewLine]counter = 0;\[IndentingNewLine]]; (*\ end\ While, \ checking\ if\ the\ test\ corresponds\ to\ any\ solution\ \ *) \[IndentingNewLine]If[ soln \[Equal] False, \[IndentingNewLine]\(Print[ sbset, \ "\< had the following miss set: \>", badcases];\)\ \[IndentingNewLine]]; \ \[IndentingNewLine]sbset \ = NextKSubset[{1, 2, 3, 4, 5, 6, 7, 8, 9}, sbset]; \ (*\ check\ the\ next\ possibility*) \[IndentingNewLine]j = 1;\[IndentingNewLine]];\)\)}], "Input"], Cell[BoxData[ InterpretationBox[\({1, 2, 3, 5}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 4, 6}\), SequenceForm[ {1, 2, 3, 5}, " had the following miss set: ", {4, 4, 4, 6}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 2, 3, 8}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 4, 6}\), SequenceForm[ {1, 2, 3, 8}, " had the following miss set: ", {4, 4, 4, 6}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 2, 4, 5}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 6, 4, 4}\), SequenceForm[ {1, 2, 4, 5}, " had the following miss set: ", {4, 6, 4, 4}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 2, 4, 6}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 6, 4}\), SequenceForm[ {1, 2, 4, 6}, " had the following miss set: ", {4, 4, 6, 4}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 2, 5, 6}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 6, 4}\), SequenceForm[ {1, 2, 5, 6}, " had the following miss set: ", {4, 4, 6, 4}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 2, 5, 7}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 6, 4, 4}\), SequenceForm[ {1, 2, 5, 7}, " had the following miss set: ", {4, 6, 4, 4}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 2, 5, 8}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 6, 4, 4}\), SequenceForm[ {1, 2, 5, 8}, " had the following miss set: ", {4, 6, 4, 4}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 2, 5, 9}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 6, 4}\), SequenceForm[ {1, 2, 5, 9}, " had the following miss set: ", {4, 4, 6, 4}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 2, 7, 9}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 6, 4}\), SequenceForm[ {1, 2, 7, 9}, " had the following miss set: ", {4, 4, 6, 4}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 3, 4, 6}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 4, 6}\), SequenceForm[ {1, 3, 4, 6}, " had the following miss set: ", {4, 4, 4, 6}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 3, 4, 8}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 4, 6}\), SequenceForm[ {1, 3, 4, 8}, " had the following miss set: ", {4, 4, 4, 6}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 3, 5, 8}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 6, 4, 4}\), SequenceForm[ {1, 3, 5, 8}, " had the following miss set: ", {4, 6, 4, 4}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 3, 6, 8}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 6, 4, 4}\), SequenceForm[ {1, 3, 6, 8}, " had the following miss set: ", {4, 6, 4, 4}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 3, 7, 8}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 4, 6}\), SequenceForm[ {1, 3, 7, 8}, " had the following miss set: ", {4, 4, 4, 6}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 3, 7, 9}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 4, 6}\), SequenceForm[ {1, 3, 7, 9}, " had the following miss set: ", {4, 4, 4, 6}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 3, 8, 9}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 6, 4, 4}\), SequenceForm[ {1, 3, 8, 9}, " had the following miss set: ", {4, 6, 4, 4}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 4, 5, 6}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 4, 6}\), SequenceForm[ {1, 4, 5, 6}, " had the following miss set: ", {4, 4, 4, 6}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 4, 6, 7}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 6, 4, 4}\), SequenceForm[ {1, 4, 6, 7}, " had the following miss set: ", {4, 6, 4, 4}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 4, 6, 8}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 6, 4, 4}\), SequenceForm[ {1, 4, 6, 8}, " had the following miss set: ", {4, 6, 4, 4}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 4, 6, 9}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 6, 4}\), SequenceForm[ {1, 4, 6, 9}, " had the following miss set: ", {4, 4, 6, 4}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 4, 7, 9}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 6, 4}\), SequenceForm[ {1, 4, 7, 9}, " had the following miss set: ", {4, 4, 6, 4}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 5, 7, 9}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 4, 6}\), SequenceForm[ {1, 5, 7, 9}, " had the following miss set: ", {4, 4, 4, 6}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 6, 7, 9}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 4, 6}\), SequenceForm[ {1, 6, 7, 9}, " had the following miss set: ", {4, 4, 4, 6}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({1, 7, 8, 9}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 6, 4, 4}\), SequenceForm[ {1, 7, 8, 9}, " had the following miss set: ", {4, 6, 4, 4}], Editable->False]], "Print"], Cell[BoxData[ InterpretationBox[\({2, 3, 4, 5}\[InvisibleSpace]" had the following miss set: \ "\[InvisibleSpace]{4, 4, 4, 4}\), SequenceForm[ {2, 3, 4, 5}, " had the following miss set: ", {4, 4, 4, 4}], Editable->False]], "Print"] }, Open ]] }, FrontEndVersion->"5.0 for Microsoft Windows", ScreenRectangle->{{0, 1280}, {0, 951}}, WindowSize->{1154, 924}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, PrintingCopies->1, PrintingPageRange->{Automatic, Automatic}, PrintingOptions->{"PrintingMargins"->{{72, 72}, {54, 54}}} ] (******************************************************************* Cached data follows. If you edit this Notebook file directly, not using Mathematica, you must remove the line containing CacheID at the top of the file. The cache data will then be recreated when you save this file from within Mathematica. *******************************************************************) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[1754, 51, 98, 2, 33, "Text"], Cell[CellGroupData[{ Cell[1877, 57, 38, 1, 30, "Input"], Cell[1918, 60, 35, 1, 29, "Output"] }, Open ]], Cell[1968, 64, 59, 0, 33, "Text"], Cell[2030, 66, 82205, 1991, 630, "Input"], Cell[84238, 2059, 70, 1, 30, "Input"], Cell[84311, 2062, 63, 1, 30, "Input"], Cell[CellGroupData[{ Cell[84399, 2067, 2703, 48, 750, "Input"], Cell[87105, 2117, 268, 6, 25, "Print"], Cell[87376, 2125, 268, 6, 25, "Print"], Cell[87647, 2133, 268, 6, 25, "Print"], Cell[87918, 2141, 268, 6, 25, "Print"], Cell[88189, 2149, 268, 6, 25, "Print"], Cell[88460, 2157, 268, 6, 25, "Print"], Cell[88731, 2165, 268, 6, 25, "Print"], Cell[89002, 2173, 268, 6, 25, "Print"], Cell[89273, 2181, 268, 6, 25, "Print"], Cell[89544, 2189, 268, 6, 25, "Print"], Cell[89815, 2197, 268, 6, 25, "Print"], Cell[90086, 2205, 268, 6, 25, "Print"], Cell[90357, 2213, 268, 6, 25, "Print"], Cell[90628, 2221, 268, 6, 25, "Print"], Cell[90899, 2229, 268, 6, 25, "Print"], Cell[91170, 2237, 268, 6, 25, "Print"], Cell[91441, 2245, 268, 6, 25, "Print"], Cell[91712, 2253, 268, 6, 25, "Print"], Cell[91983, 2261, 268, 6, 25, "Print"], Cell[92254, 2269, 268, 6, 25, "Print"], Cell[92525, 2277, 268, 6, 25, "Print"], Cell[92796, 2285, 268, 6, 25, "Print"], Cell[93067, 2293, 268, 6, 25, "Print"], Cell[93338, 2301, 268, 6, 25, "Print"], Cell[93609, 2309, 268, 6, 25, "Print"] }, Open ]] } ] *) (******************************************************************* End of Mathematica Notebook file. *******************************************************************)