(* Content-type: application/mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 6.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 145, 7] NotebookDataLength[ 199758, 5431] NotebookOptionsPosition[ 193708, 5232] NotebookOutlinePosition[ 194070, 5248] CellTagsIndexPosition[ 194027, 5245] WindowFrame->Normal ContainsDynamic->False*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ RowBox[{"<<", "Combinatorica`"}]], "Input", CellChangeTimes->{3.441344044953125*^9}], Cell[BoxData[{ RowBox[{"\:6392\:5217\:ff0c\:53ef\:91cd\:8907", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"5", "\:985e\:4e0d\:540c\:7269\:4ef6\:5404\:6709", " ", "3", "\:500b", " ", "\:4ee5\:4e0a\:ff0c\:5f9e\:4e2d\:53d6\:51fa", " ", "3", " ", "\:500b\:6392\:5217\:ff0c"}], "\[IndentingNewLine]", "\:53ef\:6709\:5e7e\ \:7a2e\:4e0d\:540c\:7684\:6392\:5217\:ff1f", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "a", ",", "b"}], "}"}], "\:8207", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a"}], "}"}], "\:8996\:70ba\:4e0d\:540c\:3002"}]}], "Input", CellFrame->{{0, 0}, {0, 2}}, CellChangeTimes->{{3.441103751796875*^9, 3.441103788390625*^9}, { 3.441104563140625*^9, 3.441104565796875*^9}, {3.4411632794505405`*^9, 3.441163350943342*^9}, {3.441163383229768*^9, 3.44116344302575*^9}, { 3.4411641886479025`*^9, 3.4411641921829853`*^9}, {3.4411643203172336`*^9, 3.441164338363182*^9}, {3.441318484203125*^9, 3.441318495875*^9}, { 3.44132313571875*^9, 3.441323181984375*^9}, 3.441344044953125*^9, { 3.44142674515625*^9, 3.4414267629375*^9}}], Cell[BoxData["\:8868\:5217\:5982\:4e0b\:ff1a"], "Input", CellFrame->{{0, 0}, {0, 0.5}}, CellChangeTimes->{3.44134404496875*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Permutations", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "a", ",", "a", ",", "a", ",", "b", ",", "b", ",", "b", ",", "c", ",", "c", ",", "c", ",", "d", ",", "d", ",", "d", ",", "e", ",", "e", ",", "e"}], "}"}], ",", RowBox[{"{", "3", "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.441341513828125*^9, 3.44134158240625*^9}, 3.44134404496875*^9, 3.44140862021875*^9, {3.441408655421875*^9, 3.44140868946875*^9}, 3.441424061078125*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "d", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "e", ",", "e"}], "}"}]}], "}"}]], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{ 3.44134153134375*^9, 3.441341587515625*^9, 3.44134404496875*^9, { 3.441408673984375*^9, 3.4414086924375*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.44134159503125*^9, 3.441341601265625*^9}, 3.44134404496875*^9}], Cell[BoxData["125"], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.441341602375*^9, 3.44134404496875*^9, 3.441408709359375*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Tuples", "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", "3", "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.441103703140625*^9, 3.44110371771875*^9}, 3.441323270109375*^9, {3.44132330103125*^9, 3.441323303984375*^9}, 3.44134404496875*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "d", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "e", ",", "e"}], "}"}]}], "}"}]], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{ 3.441103720359375*^9, {3.44132327159375*^9, 3.44132330534375*^9}, 3.44134404496875*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.441103737421875*^9, 3.441103742421875*^9}, 3.44134404496875*^9}], Cell[BoxData["125"], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.44110374359375*^9, 3.441323283890625*^9, 3.4413233168125*^9, 3.44134404496875*^9}] }, Open ]], Cell[BoxData["\:5982\:4f55\:8a08\:6578\:800c\:4e0d\:5217\:8868\:5462\:ff1f"], \ "Input", CellFrame->{{0, 0}, {0, 0.5}}, CellChangeTimes->{{3.441323344671875*^9, 3.44132335803125*^9}, 3.44134404496875*^9}], Cell[BoxData[ RowBox[{ RowBox[{"5", "\[Times]", "5", "\[Times]", "5"}], "=", RowBox[{ SuperscriptBox["5", "3"], "=", RowBox[{"125", "\:3002\:53ef\:8a18\:70ba", " ", SubsuperscriptBox["\[CapitalPi]", "3", "5"]}]}]}]], "Input", CellChangeTimes->{3.44134404496875*^9}], Cell[BoxData[{ RowBox[{"\:7d44\:5408", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"3", " ", "\:4ef6\:4e0d\:540c\:7684\:6771\:897f\:5206\:7d66", " ", "5", " ", "\:500b\:4eba\:ff0c\:6bcf\:4eba\:53ef\:5f97", " ", "0", " ", "\:81f3", " ", "3", "\:4ef6\:ff0c\:5171\:6709\:5e7e\:7a2e\:5206\:6cd5\:ff1f"}]}], "Input", CellFrame->{{0, 0}, {0, 2}}, CellChangeTimes->{{3.44131864725*^9, 3.441318677203125*^9}, { 3.441318935359375*^9, 3.441318979828125*^9}, {3.44131916453125*^9, 3.4413191719375*^9}, {3.44132340140625*^9, 3.44132340209375*^9}, 3.44134404496875*^9, {3.441430347703125*^9, 3.441430351953125*^9}}], Cell[BoxData[{ RowBox[{"\:672c\:984c\:53ef\:4ee5\:5f9e", "\"\<\:7269\:5206\:7d66\:4eba\>\"", "\:ff0c\:53ca", "\"\<\:4eba\:5206\:5f97\:7269\>\"", "\:5169\:65b9\:5411\:601d\:8003\:3002"}], "\[IndentingNewLine]", "\:56e0\ \:70ba\:7269\:4e00\:5b9a\:8981\:5206\:7d66\:4eba\:ff0c\:800c\:4eba\:4e0d\:4e00\ \:5b9a\:5206\:5f97\:7269\:3002", "\[IndentingNewLine]", RowBox[{"\:6545\:5f9e", "\"\<\:7269\:5206\:7d66\:4eba\>\"", " ", "\:601d\:8003\:6bd4\:8f03\:7c21\:6f54\:3002"}]}], "Input", CellChangeTimes->{{3.44140639553125*^9, 3.441406585421875*^9}, { 3.441426781*^9, 3.44142678553125*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"A", ".", " ", "\:5f9e"}], "\"\<\:7269\:5206\:7d66\:4eba\>\"", "\:4f86\:601d\:8003\:ff1a"}], "\[IndentingNewLine]", RowBox[{"\:5171\:6709", " ", "3", " ", "\:4ef6\:4e0d\:540c\:6771\:897f", RowBox[{"{", RowBox[{"r", ",", "s", ",", "t"}], "}"}], "\:ff0c"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ "\:6bcf", " ", "1", " ", "\:4ef6\:6771\:897f\:53ef\:5206\:7d66", " ", "5", " ", "\:500b\:4e0d\:540c\:7684\:4eba", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ "\:6545\:5206\:6cd5\:6709", " ", "5", "\[Times]", "5", "\[Times]", "5"}], "=", RowBox[{ SuperscriptBox["5", "3"], "=", RowBox[{"125", "\:3002\:53ef\:8a18\:70ba", " ", SubsuperscriptBox["\[CapitalPi]", "5", "3"]}]}]}]}], "Input", CellFrame->{{0, 0}, {0, 0.5}}, CellChangeTimes->{{3.44131913609375*^9, 3.441319152390625*^9}, { 3.441319185046875*^9, 3.4413191949375*^9}, {3.441320520515625*^9, 3.441320642796875*^9}, {3.4413216135*^9, 3.4413216164375*^9}, 3.44134404496875*^9, {3.441406593140625*^9, 3.44140659565625*^9}, { 3.441430261640625*^9, 3.441430287171875*^9}}], Cell[BoxData["\:5c07\:5404\:7a2e\:65b9\:6cd5\:8868\:5217\:51fa\:4f86"], \ "Input", CellChangeTimes->{{3.441322082703125*^9, 3.44132214603125*^9}, 3.44134404496875*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Tuples", "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}], ",", "3"}], "]"}], ".", RowBox[{"{", RowBox[{"r", ",", "s", ",", "t"}], "}"}]}]], "Input", CellChangeTimes->{{3.441320885703125*^9, 3.4413209084375*^9}, { 3.44132142009375*^9, 3.441321426390625*^9}, {3.441321497515625*^9, 3.441321508828125*^9}, 3.44134404496875*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"a", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"b", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"c", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"d", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"a", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"b", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"c", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"d", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"a", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"b", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"c", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"d", " ", "t"}]}], ",", RowBox[{ RowBox[{"e", " ", "r"}], "+", RowBox[{"e", " ", "s"}], "+", RowBox[{"e", " ", "t"}]}]}], "}"}]], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.44132091078125*^9, 3.441321429703125*^9, 3.441321510265625*^9, 3.44134404496875*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.441320922375*^9, 3.4413209279375*^9}, 3.44134404496875*^9}], Cell[BoxData["125"], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.441320928828125*^9, 3.441321441828125*^9, 3.44134404496875*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"B", ".", "\:5f9e"}], "\"\<\:4eba\:5206\:5f97\:7269\>\"", "\:4f86\:601d\:8003\:ff1a"}]], "Input", CellFrame->{{0, 0}, {0, 0.5}}, CellChangeTimes->{{3.44132015825*^9, 3.441320203390625*^9}, { 3.4413202438125*^9, 3.441320398015625*^9}, {3.441320431625*^9, 3.4413204463125*^9}, {3.4413206459375*^9, 3.44132066571875*^9}, { 3.4413215728125*^9, 3.44132157640625*^9}, {3.441321623109375*^9, 3.441321623578125*^9}, 3.44134404496875*^9, {3.441406600625*^9, 3.4414066034375*^9}}], Cell[BoxData[{"\:5982\:4f55\:53ea\:8a08\:6578\:800c\:4e0d\:5217\:8868\:5462\ \:ff1f", "\[IndentingNewLine]", RowBox[{"\:4ee5", " ", "5", "\:500b\:8b8a\:6578", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}], "\:4ee3\:8868", " ", "5", "\:500b\:4eba\:ff1b"}], "\[IndentingNewLine]", RowBox[{"\:4ee5", " ", "3", "\:6b21\:4ee3\:8868", " ", "3", "\:4ef6\:4e0d\:540c\:7684\:6771\:897f\:ff0c\:7528\:591a\:9805\:5f0f\:5c55\ \:958b\:4f86\:89c0\:5bdf\:3002\:5982\:4e0b\:ff1a"}]}], "Input", CellFrame->{{0, 0}, {0, 0.5}}, CellChangeTimes->{{3.441323057640625*^9, 3.4413230736875*^9}, { 3.441324022078125*^9, 3.441324034484375*^9}, 3.44134404496875*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"a", "+", "b", "+", "c", "+", "d", "+", "e"}], ")"}], "3"], "//", "Expand"}]], "Input", CellChangeTimes->{{3.441319722984375*^9, 3.441319745265625*^9}, 3.44134404496875*^9}], Cell[BoxData[ RowBox[{ SuperscriptBox["a", "3"], "+", RowBox[{"3", " ", SuperscriptBox["a", "2"], " ", "b"}], "+", RowBox[{"3", " ", "a", " ", SuperscriptBox["b", "2"]}], "+", SuperscriptBox["b", "3"], "+", RowBox[{"3", " ", SuperscriptBox["a", "2"], " ", "c"}], "+", RowBox[{"6", " ", "a", " ", "b", " ", "c"}], "+", RowBox[{"3", " ", SuperscriptBox["b", "2"], " ", "c"}], "+", RowBox[{"3", " ", "a", " ", SuperscriptBox["c", "2"]}], "+", RowBox[{"3", " ", "b", " ", SuperscriptBox["c", "2"]}], "+", SuperscriptBox["c", "3"], "+", RowBox[{"3", " ", SuperscriptBox["a", "2"], " ", "d"}], "+", RowBox[{"6", " ", "a", " ", "b", " ", "d"}], "+", RowBox[{"3", " ", SuperscriptBox["b", "2"], " ", "d"}], "+", RowBox[{"6", " ", "a", " ", "c", " ", "d"}], "+", RowBox[{"6", " ", "b", " ", "c", " ", "d"}], "+", RowBox[{"3", " ", SuperscriptBox["c", "2"], " ", "d"}], "+", RowBox[{"3", " ", "a", " ", SuperscriptBox["d", "2"]}], "+", RowBox[{"3", " ", "b", " ", SuperscriptBox["d", "2"]}], "+", RowBox[{"3", " ", "c", " ", SuperscriptBox["d", "2"]}], "+", SuperscriptBox["d", "3"], "+", RowBox[{"3", " ", SuperscriptBox["a", "2"], " ", "e"}], "+", RowBox[{"6", " ", "a", " ", "b", " ", "e"}], "+", RowBox[{"3", " ", SuperscriptBox["b", "2"], " ", "e"}], "+", RowBox[{"6", " ", "a", " ", "c", " ", "e"}], "+", RowBox[{"6", " ", "b", " ", "c", " ", "e"}], "+", RowBox[{"3", " ", SuperscriptBox["c", "2"], " ", "e"}], "+", RowBox[{"6", " ", "a", " ", "d", " ", "e"}], "+", RowBox[{"6", " ", "b", " ", "d", " ", "e"}], "+", RowBox[{"6", " ", "c", " ", "d", " ", "e"}], "+", RowBox[{"3", " ", SuperscriptBox["d", "2"], " ", "e"}], "+", RowBox[{"3", " ", "a", " ", SuperscriptBox["e", "2"]}], "+", RowBox[{"3", " ", "b", " ", SuperscriptBox["e", "2"]}], "+", RowBox[{"3", " ", "c", " ", SuperscriptBox["e", "2"]}], "+", RowBox[{"3", " ", "d", " ", SuperscriptBox["e", "2"]}], "+", SuperscriptBox["e", "3"]}]], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{{3.441319738796875*^9, 3.4413197461875*^9}, 3.44134404496875*^9}] }, Open ]], Cell[BoxData[{ RowBox[{"\:4e0a\:5217\:5c55\:958b\:5f0f\:7684\:89e3\:91cb\:ff1a", " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(", "1", ")"}], SuperscriptBox["a", "3"], "\:8868\:793a\:7531", " ", "a", " ", "\:4e00\:4eba\:7372\:5f97", " ", "3", " ", "\:500b\:4e0d\:540c\:7269\:4ef6\:7684\:65b9\:6cd5\:ff0c"}], "\ \[IndentingNewLine]", RowBox[{"\t", RowBox[{ "\:4fc2\:6578", " ", "1", " ", "\:8868\:793a\:53ea\:6709", " ", "1", " ", "\:7a2e\:65b9\:6cd5\:3002"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(", "2", ")"}], "3", " ", SuperscriptBox["a", "2"], " ", "b", " ", "\:8868\:793a\:7531", " ", "a", " ", "b", " ", "\:4e8c\:4eba\:5206\:5f97", " ", "3", "\:500b\:6642", RowBox[{"(", RowBox[{ "\:4e0d\:662f\:4fc2\:6578\:7684", " ", "3", " ", "\:ff0c\:800c\:662f", " ", SuperscriptBox["a", "2"], " ", "b", "\:ff0c\:5171", " ", "3", " ", "\:6b21\:7684", " ", "3"}], ")"}], " ", "\:4e0d\:540c\:7269\:4ef6\:7684\:65b9\:6cd5\:3002"}], "\[IndentingNewLine]", RowBox[{"\t", RowBox[{ "\:5176\:4e2d", " ", "a", " ", "\:6709", " ", "2", " ", "\:6b21", " ", "\:8868\:793a", " ", "a", " ", "\:5206\:5f97", " ", "2", " ", "\:4ef6\:ff1b"}]}], "\[IndentingNewLine]", RowBox[{"\t ", RowBox[{ "b", " ", "\:6709", " ", "1", " ", "\:6b21\:8868\:793a", " ", "b", " ", "\:53ea\:5206\:5f97", " ", "1", " ", "\:4ef6\:3002"}]}], "\[IndentingNewLine]", RowBox[{"\t", RowBox[{ "\:800c\:4fc2\:6578", " ", "3", " ", "\:8868\:793a", " ", "a", " ", "b", " ", "\:53d6\:5f97", " ", "3", "\:500b\:4e0d\:540c\:7269\:4ef6\:7684\:65b9\:6cd5"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"\t ", RowBox[{ RowBox[{ SubsuperscriptBox["C", "2", "3"], "\[Times]", SubsuperscriptBox["C", "1", "1"]}], "=", RowBox[{"3", "\:3002", RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "a", ",", "b"}], "}"}], "\:3001", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a"}], "}"}], "\:3001", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a"}], "}"}]}], ")"}]}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(", "3", ")"}], "6", " ", "a", " ", "b", " ", "c", " ", "\:8868\:793a\:7531", " ", "a", " ", "b", " ", "c", " ", "\:4e09\:4eba\:5206\:5f97", " ", "3", " ", "\:500b\:4e0d\:540c\:7269\:4ef6\:7684\:65b9\:6cd5\:3002"}], "\ \[IndentingNewLine]", RowBox[{"\t", RowBox[{ "\:5176\:4e2d", " ", "a", " ", "\:6709", " ", "1", " ", "\:6b21", " ", "\:8868\:793a", " ", "a", " ", "\:5206\:5f97", " ", "1", " ", "\:4ef6\:ff1b"}]}], "\[IndentingNewLine]", RowBox[{"\t\t", RowBox[{ "b", " ", "\:6709", " ", "1", " ", "\:6b21", " ", "\:8868\:793a", " ", "b", " ", "\:4e5f\:5206\:5f97", " ", "1", " ", "\:4ef6\:ff1b"}], " "}], "\[IndentingNewLine]", RowBox[{"\t\t", RowBox[{ "c", " ", "\:6709", " ", "1", " ", "\:6b21", " ", "\:8868\:793a", " ", "c", " ", "\:4e5f\:5206\:5f97", " ", "1", " ", "\:4ef6\:3002"}]}], "\[IndentingNewLine]", RowBox[{"\t", RowBox[{ "\:800c\:4fc2\:6578", " ", "6", " ", "\:8868\:793a", " ", "a", " ", "b", " ", "c", " ", "\:53d6\:5f97", " ", "3", "\:500b\:4e0d\:540c\:7269\:4ef6\:7684\:65b9\:6cd5"}], "\[IndentingNewLine]", "\t"}], "\[IndentingNewLine]", RowBox[{"\t ", RowBox[{ RowBox[{ SubsuperscriptBox["C", "1", "3"], "\[Times]", SubsuperscriptBox["C", "1", "2"], "\[Times]", SubsuperscriptBox["C", "1", "1"]}], "=", RowBox[{"6", "\:3002"}]}]}], "\[IndentingNewLine]", RowBox[{"\t"}]}], "Input", CellChangeTimes->{{3.441320405921875*^9, 3.44132042221875*^9}, { 3.44132080196875*^9, 3.441320803765625*^9}, {3.441322202296875*^9, 3.44132285928125*^9}, 3.441322994265625*^9, {3.4413240930625*^9, 3.441324134484375*^9}, 3.44134404496875*^9, {3.44140732928125*^9, 3.44140747975*^9}, {3.441423645859375*^9, 3.441423817078125*^9}, { 3.441423861890625*^9, 3.441423968640625*^9}, {3.441424099109375*^9, 3.441424141109375*^9}, {3.441424180140625*^9, 3.4414242035625*^9}, { 3.44142586428125*^9, 3.441425883296875*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"a", "+", "b", "+", "c", "+", "d", "+", "e"}], ")"}], "3"], "/.", RowBox[{"{", RowBox[{ RowBox[{"a", "\[Rule]", "1"}], ",", RowBox[{"b", "\[Rule]", "1"}], ",", RowBox[{"c", "\[Rule]", "1"}], ",", RowBox[{"d", "\[Rule]", " ", "1"}], ",", RowBox[{"e", "\[Rule]", " ", "1"}]}], "}"}]}]], "Input", CellChangeTimes->{3.441320126140625*^9, 3.44134404496875*^9}], Cell[BoxData["125"], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.4413201285*^9, 3.44134404496875*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"\:4e0a\:5f0f\:5c07", " ", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}], "\:5206\:5225\:4ee5", " ", "1", " ", "\:4ee3\:5165\:5f97", " ", SuperscriptBox["5", "3"]}], "=", RowBox[{"125", "\:5373\:65b9\:6cd5\:4e4b\:7e3d\:6578\:3002"}]}], "\[IndentingNewLine]"}]], "Input", CellChangeTimes->{{3.441322898859375*^9, 3.441322984109375*^9}, 3.44134404496875*^9, 3.44142421753125*^9}], Cell[BoxData[{ RowBox[{"\:6392\:5217\:ff0c\:4e0d\:53ef\:91cd\:8907", " ", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"5", "\:985e\:4e0d\:540c\:7269\:4ef6\:5404\:6709", " ", "1", "\:500b\:ff0c"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ "\:5f9e\:4e2d\:53d6\:51fa", " ", "3", " ", "\:500b\:6392\:5217\:ff0c\:53ef\:6709\:5e7e\:7a2e\:4e0d\:540c\:7684\:6392\ \:5217\:ff1f"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"5", "\[Times]", "4", "\[Times]", "3"}], "=", RowBox[{"60", "\:3002"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"5", "\[Times]", "4", "\[Times]", "3"}], "=", RowBox[{ FractionBox[ RowBox[{"5", "!"}], RowBox[{ RowBox[{"(", RowBox[{"5", "-", "2"}], ")"}], "!"}]], "\:53ef\:8a18\:70ba", " ", SubsuperscriptBox["P", "3", "5"], "\:3002"}]}], "\[IndentingNewLine]"}], "Input", CellFrame->{{0, 0}, {0, 2}}, CellChangeTimes->{{3.441102654734375*^9, 3.441102660484375*^9}, { 3.44110270734375*^9, 3.441102710515625*^9}, {3.441103805984375*^9, 3.441103813703125*^9}, {3.44110451275*^9, 3.441104518328125*^9}, { 3.4411627436701264`*^9, 3.4411630195368032`*^9}, {3.4411630519233727`*^9, 3.441163097018216*^9}, {3.4411631322088175`*^9, 3.4411632082381425`*^9}, { 3.4411634986156845`*^9, 3.441163499246592*^9}, 3.441164217229*^9, { 3.4411643442015777`*^9, 3.4411643489884605`*^9}, 3.44134404496875*^9, { 3.44142594875*^9, 3.441425968421875*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Permutations", "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", "3", "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.4411020699375*^9, 3.441102092578125*^9}, 3.44134404496875*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "c"}], "}"}]}], "}"}]], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.441102094765625*^9, 3.4411021771875*^9, 3.44134404496875*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.44110211209375*^9, 3.441102119078125*^9}, 3.44134404496875*^9}], Cell[BoxData["60"], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.44110212025*^9, 3.441102179078125*^9, 3.44134404496875*^9}] }, Open ]], Cell[BoxData[{"\:7d44\:5408\:ff0c\:53ef\:91cd\:8907", "\[IndentingNewLine]", RowBox[{" ", RowBox[{ "5", " ", "\:985e\:4e0d\:540c\:7269\:4ef6\:5404\:6709", " ", "3", " ", "\:500b\:4ee5\:4e0a\:ff0c\:5f9e\:4e2d\:4efb\:53d6", " ", "3", " ", "\:500b\:3002"}]}], "\[IndentingNewLine]", RowBox[{" ", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "a", ",", "b"}], "}"}], "\:8207", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a"}], "}"}], "\:8996\:70ba\:76f8\:540c\:3002\:554f\:ff1a\:5171\:6709\:5e7e\:7a2e\:4e0d\ \:540c\:7684\:53d6\:6cd5\:ff1f"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ SubsuperscriptBox["H", "3", "5"], "=", RowBox[{ SubsuperscriptBox["C", "3", RowBox[{"5", "+", "3", "-", "1"}]], "=", "35"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"\:7528", " ", "5", "\:500b\:4f4d\:7f6e\:8868\:793a", " ", "5", "\:985e\:4e0d\:540c\:7269\:4ef6\:ff0c"}], "\[IndentingNewLine]", "\:6bcf\ \:4e00\:500b\:4f4d\:7f6e\:6240\:5c0d\:61c9\:7684\:6578\:5b57\:8868\:793a\:6bcf\ \:4e00\:985e\:7269\:4ef6\:6240\:53d6\:7684\:6578\:91cf\:3002"}], "Input", CellFrame->{{0, 0}, {0, 2}}, CellChangeTimes->{{3.441102944484375*^9, 3.44110304725*^9}, { 3.441103105015625*^9, 3.441103120296875*^9}, {3.4411037950625*^9, 3.441103802203125*^9}, {3.4411045235625*^9, 3.441104537671875*^9}, { 3.441104942890625*^9, 3.44110499859375*^9}, {3.441105035203125*^9, 3.4411050393125*^9}, {3.441105074578125*^9, 3.4411051525*^9}, { 3.441105246015625*^9, 3.441105343296875*^9}, {3.4411640251928654`*^9, 3.4411640541845536`*^9}, {3.441164099980405*^9, 3.4411641124583473`*^9}, { 3.441164150833528*^9, 3.4411641759396286`*^9}, {3.4411642288056464`*^9, 3.441164286248245*^9}, 3.44116435483687*^9, 3.4411643945439663`*^9, { 3.44116484763548*^9, 3.441164854675603*^9}, 3.441344044984375*^9, { 3.441424003359375*^9, 3.441424030734375*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Compositions", "[", RowBox[{"3", ",", "5"}], "]"}]], "Input", CellChangeTimes->{{3.4411027165*^9, 3.44110273125*^9}, 3.441102799484375*^9, {3.441102915890625*^9, 3.4411029250625*^9}, { 3.44110504875*^9, 3.44110505121875*^9}, 3.441344044984375*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "3", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1", ",", "0", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1", ",", "2", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "2", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "2", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "3", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "0", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "2", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "1", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "1", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "2", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2", ",", "0", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2", ",", "0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2", ",", "1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "3", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0", ",", "0", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0", ",", "2", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "1", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "1", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "2", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "0", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "0", ",", "0", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "0", ",", "0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "0", ",", "1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}]], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{ 3.44110273371875*^9, {3.441102920234375*^9, 3.441102926765625*^9}, 3.44110458365625*^9, 3.441105056875*^9, 3.441344044984375*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.44110458921875*^9, 3.441104595546875*^9}, 3.441344044984375*^9}], Cell[BoxData["35"], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.44110459684375*^9, 3.441105061671875*^9, 3.441344044984375*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"a", "+", "b", "+", "c", "+", "d", "+", "e"}], ")"}], "3"], "//", "Expand"}]], "Input", CellChangeTimes->{{3.44140885909375*^9, 3.441408875875*^9}}], Cell[BoxData[ RowBox[{ SuperscriptBox["a", "3"], "+", RowBox[{"3", " ", SuperscriptBox["a", "2"], " ", "b"}], "+", RowBox[{"3", " ", "a", " ", SuperscriptBox["b", "2"]}], "+", SuperscriptBox["b", "3"], "+", RowBox[{"3", " ", SuperscriptBox["a", "2"], " ", "c"}], "+", RowBox[{"6", " ", "a", " ", "b", " ", "c"}], "+", RowBox[{"3", " ", SuperscriptBox["b", "2"], " ", "c"}], "+", RowBox[{"3", " ", "a", " ", SuperscriptBox["c", "2"]}], "+", RowBox[{"3", " ", "b", " ", SuperscriptBox["c", "2"]}], "+", SuperscriptBox["c", "3"], "+", RowBox[{"3", " ", SuperscriptBox["a", "2"], " ", "d"}], "+", RowBox[{"6", " ", "a", " ", "b", " ", "d"}], "+", RowBox[{"3", " ", SuperscriptBox["b", "2"], " ", "d"}], "+", RowBox[{"6", " ", "a", " ", "c", " ", "d"}], "+", RowBox[{"6", " ", "b", " ", "c", " ", "d"}], "+", RowBox[{"3", " ", SuperscriptBox["c", "2"], " ", "d"}], "+", RowBox[{"3", " ", "a", " ", SuperscriptBox["d", "2"]}], "+", RowBox[{"3", " ", "b", " ", SuperscriptBox["d", "2"]}], "+", RowBox[{"3", " ", "c", " ", SuperscriptBox["d", "2"]}], "+", SuperscriptBox["d", "3"], "+", RowBox[{"3", " ", SuperscriptBox["a", "2"], " ", "e"}], "+", RowBox[{"6", " ", "a", " ", "b", " ", "e"}], "+", RowBox[{"3", " ", SuperscriptBox["b", "2"], " ", "e"}], "+", RowBox[{"6", " ", "a", " ", "c", " ", "e"}], "+", RowBox[{"6", " ", "b", " ", "c", " ", "e"}], "+", RowBox[{"3", " ", SuperscriptBox["c", "2"], " ", "e"}], "+", RowBox[{"6", " ", "a", " ", "d", " ", "e"}], "+", RowBox[{"6", " ", "b", " ", "d", " ", "e"}], "+", RowBox[{"6", " ", "c", " ", "d", " ", "e"}], "+", RowBox[{"3", " ", SuperscriptBox["d", "2"], " ", "e"}], "+", RowBox[{"3", " ", "a", " ", SuperscriptBox["e", "2"]}], "+", RowBox[{"3", " ", "b", " ", SuperscriptBox["e", "2"]}], "+", RowBox[{"3", " ", "c", " ", SuperscriptBox["e", "2"]}], "+", RowBox[{"3", " ", "d", " ", SuperscriptBox["e", "2"]}], "+", SuperscriptBox["e", "3"]}]], "Output", CellChangeTimes->{3.441408880015625*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.4414088861875*^9, 3.44140889196875*^9}}], Cell[BoxData["35"], "Output", CellChangeTimes->{3.441408893*^9}] }, Open ]], Cell[BoxData[ RowBox[{"\:9644\:8a3b", " ", "Composition", " ", "\:662f\:51fd\:6578\:7684\:5408\:6210\:ff1b", " ", "Compositions", " ", "\:624d\:662f\:7d44\:5408"}]], "Input", CellChangeTimes->{{3.441102821796875*^9, 3.44110283378125*^9}, { 3.44110319159375*^9, 3.441103193265625*^9}, {3.4411646425405684`*^9, 3.441164726561384*^9}, 3.441344044984375*^9}], Cell[BoxData[ RowBox[{ RowBox[{"DistinctPermutations", "[", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}], "]"}], "\:548c", " ", RowBox[{"Permutations", "[", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}], "]"}], "\:4e00\:6a23\:90fd\:662f", " ", "5", " ", "\:4e2d\:53d6", " ", "5", " ", "\:7684\:4e0d\:91cd\:8907\:6392\:5217", " ", SubsuperscriptBox["P", "5", "5"]}]], "Input", CellFrame->{{0, 0}, {0, 2}}, CellChangeTimes->{{3.44110417*^9, 3.44110422275*^9}, {3.441104615921875*^9, 3.441104629203125*^9}, 3.441165571556427*^9, 3.441344044984375*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"DistinctPermutations", "[", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}], "]"}]], "Input", CellChangeTimes->{{3.441104029796875*^9, 3.441104075859375*^9}, 3.441165571556427*^9, 3.441344044984375*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "d", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "d", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "e", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "e", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "d", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "d", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "e", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "e", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "b", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "b", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "c", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "c", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "e", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "e", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "b", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "b", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "c", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "c", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "d", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e", ",", "d", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "d", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "d", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "e", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "e", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "d", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "d", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "e", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "e", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "a", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "a", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "c", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "c", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "e", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "e", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "a", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "a", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "c", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "c", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "d", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e", ",", "d", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "d", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "d", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "e", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "e", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "e", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "d", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "d", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "e", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "e", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "a", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "a", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "b", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "b", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "e", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "e", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "a", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "a", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "b", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "b", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "d", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e", ",", "d", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "b", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "b", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "c", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "c", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "e", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "a", ",", "e", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "a", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "a", ",", "e", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "c", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "c", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "e", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "b", ",", "e", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "a", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "a", ",", "e", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "b", ",", "a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "b", ",", "e", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "e", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "c", ",", "e", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "b", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "b", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "c", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "c", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "d", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "a", ",", "d", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "a", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "a", ",", "d", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "c", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "c", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "d", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "b", ",", "d", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "a", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "a", ",", "d", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "b", ",", "a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "b", ",", "d", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "d", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "c", ",", "d", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "d", ",", "c", ",", "b", ",", "a"}], "}"}]}], "}"}]], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.44110407775*^9, 3.4411655715664415`*^9, 3.441344044984375*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.441104086640625*^9, 3.441104091078125*^9}, 3.441344044984375*^9}], Cell[BoxData["120"], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.44110409215625*^9, 3.441344044984375*^9}] }, Open ]], Cell[BoxData[{ RowBox[{"\:7d44\:5408\:ff0c\:4e0d\:53ef\:91cd\:8907", " ", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"5", "\:985e\:4e0d\:540c\:7269\:4ef6\:5404\:6709", " ", "1", "\:500b\:ff0c\:5f9e\:4e2d\:4efb\:610f\:53d6\:51fa", " ", "3", " ", "\:500b\:3002"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b", ",", "c"}], "}"}], "\:8207", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b"}], "}"}], "\:8996\:70ba\:76f8\:540c\:3002\:554f\:ff1a\:5171\:6709\:5e7e\:7a2e\:4e0d\ \:540c\:7684\:53d6\:6cd5\:ff1f"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ SubsuperscriptBox["C", "3", "5"], "=", "10"}], "\[IndentingNewLine]"}], "Input", CellFrame->{{0, 0}, {0, 2}}, CellChangeTimes->{{3.441102635703125*^9, 3.44110264178125*^9}, { 3.4411026895625*^9, 3.441102696046875*^9}, {3.44110382525*^9, 3.441103832859375*^9}, {3.44110447965625*^9, 3.44110450090625*^9}, { 3.4411053673125*^9, 3.4411053683125*^9}, {3.4411625988819313`*^9, 3.441162675712408*^9}, {3.4411643787712865`*^9, 3.4411643916798477`*^9}, { 3.4411644434242525`*^9, 3.441164492825288*^9}, 3.441344044984375*^9, { 3.441409160375*^9, 3.441409165328125*^9}, {3.441426062109375*^9, 3.44142607725*^9}, 3.441430199859375*^9}], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"KSubsets", "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}], ",", "3"}], "]"}], "\:548c"}], " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Subsets", "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", "3", "}"}]}], "]"}], "\:4e00\:6a23"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.441105380625*^9, 3.441105435578125*^9}, 3.441344044984375*^9, {3.441430190796875*^9, 3.44143020609375*^9}}], Cell[BoxData[ RowBox[{"KSubsets", "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}], ",", "3"}], "]"}]], "Input", CellChangeTimes->{{3.441101921765625*^9, 3.441101943*^9}, 3.441344044984375*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "e"}], "}"}]}], "}"}]], "Input", CellChangeTimes->{3.44110194484375*^9, 3.441344044984375*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.441102131125*^9, 3.441102135453125*^9}, 3.441344044984375*^9}], Cell[BoxData["10"], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.441102154265625*^9, 3.441344044984375*^9}] }, Open ]], Cell[BoxData[{ RowBox[{"\:7d44\:5408\:ff0c\:53ef\:91cd\:8907", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ "\:628a", " ", "5", " ", "\:5206\:70ba", " ", "3", " ", "\:500b\:5927\:65bc\:6216\:7b49\:65bc\:96f6\:7684\:6574\:6578"}], " ", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{" ", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", "\:5217\:8868", ")"}], SubsuperscriptBox["H", "5", "3"]}], "==", SubsuperscriptBox["C", "5", RowBox[{"3", "+", "5", "-", "1"}]]}], "=", "21"}]}]}], "Input", CellFrame->{{0, 0}, {0, 2}}, CellChangeTimes->{{3.441102944484375*^9, 3.44110304725*^9}, { 3.441103105015625*^9, 3.441103120296875*^9}, {3.4411037950625*^9, 3.441103802203125*^9}, {3.4411045235625*^9, 3.441104537671875*^9}, { 3.441104942890625*^9, 3.44110499859375*^9}, {3.441105469296875*^9, 3.441105531390625*^9}, {3.4411645402334576`*^9, 3.441164591947819*^9}, 3.441344044984375*^9, 3.44140935025*^9, {3.44142608384375*^9, 3.44142608553125*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Compositions", "[", RowBox[{"5", ",", "3"}], "]"}]], "Input", CellChangeTimes->{{3.4411027165*^9, 3.44110273125*^9}, 3.441102799484375*^9, {3.441102915890625*^9, 3.4411029250625*^9}, 3.441344044984375*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "3", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "4", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "5", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "3", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "4", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "0", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "3", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "0", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "2", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "0", ",", "0"}], "}"}]}], "}"}]], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{ 3.44110273371875*^9, {3.441102920234375*^9, 3.441102926765625*^9}, 3.44110458365625*^9, 3.441344044984375*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.44110458921875*^9, 3.441104595546875*^9}, 3.441344044984375*^9}], Cell[BoxData["21"], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.44110459684375*^9, 3.441344044984375*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"a", "+", "b", "+", "c"}], ")"}], "5"], "//", "Expand"}]], "Input",\ CellChangeTimes->{{3.441409463625*^9, 3.44140947696875*^9}}], Cell[BoxData[ RowBox[{ SuperscriptBox["a", "5"], "+", RowBox[{"5", " ", SuperscriptBox["a", "4"], " ", "b"}], "+", RowBox[{"10", " ", SuperscriptBox["a", "3"], " ", SuperscriptBox["b", "2"]}], "+", RowBox[{"10", " ", SuperscriptBox["a", "2"], " ", SuperscriptBox["b", "3"]}], "+", RowBox[{"5", " ", "a", " ", SuperscriptBox["b", "4"]}], "+", SuperscriptBox["b", "5"], "+", RowBox[{"5", " ", SuperscriptBox["a", "4"], " ", "c"}], "+", RowBox[{"20", " ", SuperscriptBox["a", "3"], " ", "b", " ", "c"}], "+", RowBox[{"30", " ", SuperscriptBox["a", "2"], " ", SuperscriptBox["b", "2"], " ", "c"}], "+", RowBox[{"20", " ", "a", " ", SuperscriptBox["b", "3"], " ", "c"}], "+", RowBox[{"5", " ", SuperscriptBox["b", "4"], " ", "c"}], "+", RowBox[{"10", " ", SuperscriptBox["a", "3"], " ", SuperscriptBox["c", "2"]}], "+", RowBox[{"30", " ", SuperscriptBox["a", "2"], " ", "b", " ", SuperscriptBox["c", "2"]}], "+", RowBox[{"30", " ", "a", " ", SuperscriptBox["b", "2"], " ", SuperscriptBox["c", "2"]}], "+", RowBox[{"10", " ", SuperscriptBox["b", "3"], " ", SuperscriptBox["c", "2"]}], "+", RowBox[{"10", " ", SuperscriptBox["a", "2"], " ", SuperscriptBox["c", "3"]}], "+", RowBox[{"20", " ", "a", " ", "b", " ", SuperscriptBox["c", "3"]}], "+", RowBox[{"10", " ", SuperscriptBox["b", "2"], " ", SuperscriptBox["c", "3"]}], "+", RowBox[{"5", " ", "a", " ", SuperscriptBox["c", "4"]}], "+", RowBox[{"5", " ", "b", " ", SuperscriptBox["c", "4"]}], "+", SuperscriptBox["c", "5"]}]], "Output", CellChangeTimes->{3.441409478265625*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.441409505625*^9, 3.44140950975*^9}}], Cell[BoxData["21"], "Output", CellChangeTimes->{3.44140951059375*^9}] }, Open ]], Cell[BoxData[{ RowBox[{"\:7d44\:5408\:ff0c\:4e0d\:91cd\:8907", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{" ", RowBox[{ "5", "\:985e\:4e0d\:540c\:7269\:4ef6\:5404\:6709", " ", "1", "\:500b\:4e2d\:ff0c\:4efb\:53d6\:82e5\:5e72\:500b\:7d44\:5408", " ", "\:3002"}]}], "\[IndentingNewLine]", RowBox[{"\:5168\:53d6\:ff0c\:90fd\:4e0d\:53d6\:4e5f\:5404\:7b97", " ", "1", " ", "\:7a2e\:3002", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c"}], "}"}], "\:8207", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b"}], "}"}], "\:8996\:70ba\:76f8\:540c\:3002"}], "\[IndentingNewLine]", RowBox[{"\:554f\:ff1a\:5171\:6709\:5e7e\:7a2e\:53d6\:6cd5\:ff1f\:8a66\:8868\ \:5217\:4e4b\:3002", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ SuperscriptBox["2", "5"], "=", "32"}]}], "Input", CellFrame->{{0, 0}, {0, 2}}, CellChangeTimes->{ 3.441104372015625*^9, {3.44110440234375*^9, 3.441104462*^9}, { 3.441104636484375*^9, 3.441104665046875*^9}, 3.44110481265625*^9, { 3.441105619984375*^9, 3.44110562284375*^9}, {3.44116252779972*^9, 3.4411625480488367`*^9}, {3.4411649315761805`*^9, 3.4411650468619537`*^9}, {3.441165095912485*^9, 3.4411651363606462`*^9}, { 3.4411651843196077`*^9, 3.4411652582859664`*^9}, {3.4411654652936287`*^9, 3.4411654675368547`*^9}, {3.441165519151072*^9, 3.441165520002296*^9}, 3.441344044984375*^9, {3.441409640796875*^9, 3.4414096470625*^9}, { 3.441426096296875*^9, 3.441426113609375*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Subsets", "[", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}], "]"}]], "Input", CellChangeTimes->{{3.44110435509375*^9, 3.44110435925*^9}, 3.441344044984375*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", "}"}], ",", RowBox[{"{", "a", "}"}], ",", RowBox[{"{", "b", "}"}], ",", RowBox[{"{", "c", "}"}], ",", RowBox[{"{", "d", "}"}], ",", RowBox[{"{", "e", "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}]}], "}"}]], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.441104360921875*^9, 3.441344044984375*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.441104380171875*^9, 3.441104386328125*^9}, 3.441344044984375*^9}], Cell[BoxData["32"], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.441104387359375*^9, 3.441344044984375*^9}] }, Open ]], Cell[BoxData[{"\:7d44\:5408\:ff0c\:4e0d\:91cd\:8907", "\[IndentingNewLine]", RowBox[{" ", RowBox[{ "5", "\:985e\:4e0d\:540c\:7269\:4ef6\:5404\:6709", " ", "1", "\:500b\:4e2d\:ff0c\:4efb\:53d6\:82e5\:5e72\:500b\:7d44\:5408", " ", "\:3002"}]}], "\[IndentingNewLine]", RowBox[{"\:5168\:53d6\:ff0c\:90fd\:4e0d\:53d6\:4e5f\:5404\:7b97", " ", "1", " ", "\:7a2e\:3002", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b"}], "}"}], "\:8207", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a"}], "}"}], "\:8996\:70ba\:76f8\:540c\:3002"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ "\:554f\:ff1a\:5171\:6709\:5e7e\:7a2e\:53d6\:6cd5\:ff1f\:8a66\:4ee5", " ", "0", " ", "\:8207", " ", "1", " ", "\:8868\:793a\:53d6\:6216\:4e0d\:53d6\:3002"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ SuperscriptBox["2", "5"], "=", "32"}]}], "Input", CellFrame->{{0, 0}, {0, 2}}, CellChangeTimes->{{3.441104767640625*^9, 3.44110486775*^9}, 3.441165066299904*^9, {3.441165262952677*^9, 3.441165265836824*^9}, 3.441165375294216*^9, {3.4411654156121902`*^9, 3.441165421580773*^9}, { 3.4411654854826593`*^9, 3.4411655154657726`*^9}, 3.441344044984375*^9, { 3.44142612078125*^9, 3.44142612734375*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"t", "=", RowBox[{"Tuples", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], ",", "5"}], "]"}]}]], "Input", CellChangeTimes->{ 3.441104738578125*^9, 3.441344044984375*^9, {3.4414098188125*^9, 3.4414098200625*^9}, {3.44141022925*^9, 3.441410232484375*^9}, { 3.441410333546875*^9, 3.4414103366875*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "1", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "1", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "1", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "1", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "1", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "1", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "0", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "0", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "1", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "1", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "1", ",", "1", ",", "1"}], "}"}]}], "}"}]], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.44110474028125*^9, 3.441344044984375*^9, 3.44140982121875*^9, 3.44141025703125*^9, 3.4414103379375*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.44110474715625*^9, 3.44110475440625*^9}, 3.441344044984375*^9}], Cell[BoxData["32"], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.441104755546875*^9, 3.441344044984375*^9, 3.441410353703125*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Table", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Pick", "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"t", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "1"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"Length", "[", "t", "]"}]}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.4414097578125*^9, 3.441409761875*^9}, { 3.441409800546875*^9, 3.44140986275*^9}, {3.44140989803125*^9, 3.441409931390625*^9}, 3.44142616003125*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", "}"}], ",", RowBox[{"{", "e", "}"}], ",", RowBox[{"{", "d", "}"}], ",", RowBox[{"{", RowBox[{"d", ",", "e"}], "}"}], ",", RowBox[{"{", "c", "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", "b", "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", "a", "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{{3.441409854625*^9, 3.441409863890625*^9}, 3.44140993665625*^9}] }, Open ]], Cell[BoxData[{ RowBox[{"a", " ", "\:985e\:7269\:4ef6\:6709", " ", "7", " ", "\:500b\:ff0c", " ", "b", " ", "\:985e\:7269\:4ef6\:6709", " ", "5", " ", "\:500b\:ff0cc", " ", "\:985e\:7269\:4ef6\:6709", " ", "3", " ", "\:500b\:ff0c"}], "\[IndentingNewLine]", RowBox[{"\:5f9e\:4e2d\:53d6", " ", "5", " ", "\:500b\:4f86\:6392\:5217\:3002", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b"}], "}"}], "\:8207", " ", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a"}], "}"}], "\:8996\:70ba\:4e0d\:540c\:ff0c"}], "\[IndentingNewLine]", "\:554f\:ff1a\ \:5171\:6709\:5e7e\:7a2e\:6392\:5217\:ff1f"}], "Input", CellFrame->{{0, 0}, {0, 2}}, CellChangeTimes->{{3.441163652547027*^9, 3.441163872353093*^9}, { 3.441163911739728*^9, 3.4411639582165585`*^9}, {3.44134324240625*^9, 3.44134326871875*^9}, 3.441344044984375*^9, {3.441426175953125*^9, 3.44142618140625*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Permutations", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "a", ",", "a", ",", "a", ",", "a", ",", "a", ",", "a", ",", "a", ",", "b", ",", "b", ",", "b", ",", "b", ",", "b", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", "5", "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.44134165609375*^9, 3.441341689328125*^9}, { 3.441341748515625*^9, 3.44134177415625*^9}, {3.44134181503125*^9, 3.441341838421875*^9}, {3.441341880734375*^9, 3.441341882703125*^9}, { 3.441341930546875*^9, 3.441341931703125*^9}, {3.441342413546875*^9, 3.441342439*^9}, 3.4413424956875*^9, 3.441344044984375*^9, 3.441426185390625*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "b", ",", "b"}], "}"}]}], "}"}]], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.44134169225*^9, 3.4413417505*^9, 3.441341801765625*^9, 3.441341841953125*^9, 3.441341934734375*^9, 3.441342445484375*^9, 3.441342498234375*^9, 3.441344045*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.4413424545625*^9, 3.44134246215625*^9}, 3.441344045*^9}], Cell[BoxData["232"], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.44134246421875*^9, 3.441342501421875*^9, 3.441344045*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Permutations", "[", RowBox[{ RowBox[{"{", RowBox[{ "a", ",", "a", ",", "a", ",", "a", ",", "a", ",", "a", ",", "a", ",", "b", ",", "b", ",", "b", ",", "b", ",", "b", ",", "c", ",", "c", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", "5", "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.44134251271875*^9, 3.441342514*^9}, 3.441344045*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "c", ",", "c"}], "}"}]}], "}"}]], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.44134251703125*^9, 3.441344045*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.44134252234375*^9, 3.44134252809375*^9}, 3.441344045*^9} ], Cell[BoxData["243"], "Output", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{3.441342529265625*^9, 3.441344045*^9}] }, Open ]], Cell[BoxData["\:63a1\:586b\:88dc\:3001\:6392\:5217\:3001\:6263\:9664\:6cd5"], \ "Input", CellChangeTimes->{{3.441342907484375*^9, 3.441342927*^9}, 3.441344045*^9, 3.441411008296875*^9}], Cell[BoxData[{ RowBox[{ RowBox[{"(", "1", ")"}], "\:5c07", " ", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c"}], "}"}], "\:586b\:88dc\:70ba", " ", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "c", ",", "c"}], "}"}], "\:3002"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\:7136\:5f8c\:5f9e", " ", RowBox[{"{", RowBox[{ "a", ",", "a", ",", "a", ",", "a", ",", "a", ",", "a", ",", "a", ",", "b", ",", "b", ",", "b", ",", "b", ",", "b", ",", "c", ",", "c", ",", "c", ",", "c", ",", "c"}], "}"}]}], ",", RowBox[{ "\:4e2d\:9078", " ", "5", " ", "\:500b\:4f86\:6392\:5217\:3002"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\:5171\:6709", " ", SuperscriptBox["3", "5"]}], "=", RowBox[{"243", "\:7a2e\:65b9\:6cd5\:3002"}]}]}], "Input", CellChangeTimes->{{3.441342935328125*^9, 3.44134293721875*^9}, { 3.441342971*^9, 3.44134311553125*^9}, 3.441344045*^9, 3.441426255125*^9}], Cell[BoxData[ RowBox[{ RowBox[{"(", "2", ")"}], "c", " ", "\:9078", " ", "5", " ", "\:500b", " ", "\:5171\:6709", " ", "1", " ", "\:7a2e\:65b9\:6cd5\:3002"}]], "Input", CellChangeTimes->{{3.441342556671875*^9, 3.441342610171875*^9}, { 3.44134280459375*^9, 3.441342805234375*^9}, 3.44134294278125*^9, { 3.44134312884375*^9, 3.4413431304375*^9}, 3.441344045*^9}], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"(", "3", ")"}], "c", " ", "\:9078", " ", "4", " ", "\:500b\:5171\:6709\:4e00\:7a2e\:65b9\:6cd5\:3002"}], " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{ "\:5f9e", " ", "a", " ", "b", " ", "\:4e2d\:9078", " ", "1", " ", "\:500b\:ff0c\:6709", " ", SuperscriptBox["2", RowBox[{"1", " "}]]}], "=", RowBox[{"2", "\:7a2e\:65b9\:6cd5\:3002"}]}], "\[IndentingNewLine]", RowBox[{"\:5c07\:5176\:5b89\:63d2\:5728\:5df2\:6392\:5217\:4e4b", " ", "4", " ", "\:500b", " ", "c", " ", "\:7684\:4e2d\:9593\:6216\:5169\:65c1\:ff0c\:6709", " ", "5", " ", "\:7a2e\:65b9\:6cd5\:3002"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ SuperscriptBox["2", RowBox[{"1", " "}]], "\[Times]", "5"}], "=", "10"}]}], "Input", CellChangeTimes->{{3.441342618984375*^9, 3.4413427805625*^9}, { 3.441342810796875*^9, 3.441342842625*^9}, 3.441342947015625*^9, 3.441344045*^9, 3.44142623440625*^9}], Cell[BoxData[{ RowBox[{ RowBox[{"(", "4", ")"}], "\:6263\:9664\:6cd5"}], "\[IndentingNewLine]", RowBox[{"\t", RowBox[{ RowBox[{"243", "-", "1", "-", "10"}], "=", "232"}]}]}], "Input", CellChangeTimes->{{3.441342862625*^9, 3.4413428806875*^9}, 3.441344045*^9, { 3.44142629790625*^9, 3.441426335203125*^9}}], Cell[BoxData[{ RowBox[{"a", " ", "\:985e\:7269\:4ef6\:6709", " ", "7", " ", "\:500b\:ff0c", " ", "b", " ", "\:985e\:7269\:4ef6\:6709", " ", "5", " ", "\:500b\:ff0cc", " ", "\:985e\:7269\:4ef6\:6709", " ", "3", " ", "\:500b\:ff0c"}], "\[IndentingNewLine]", RowBox[{"\:5f9e\:4e2d\:53d6", " ", "5", " ", "\:500b\:3002\:4e0d\:8ad6\:53d6\:51fa\:4e4b\:6b21\:5e8f\:ff0c"}], "\ \[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "a", ",", "b"}], "}"}], "\:8207", " ", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "b", ",", "a"}], "}"}], "\:8996\:70ba\:4e00\:7a2e\:ff0c"}], "\[IndentingNewLine]", "\:554f\:ff1a\ \:5171\:6709\:5e7e\:7a2e\:53d6\:6cd5\:ff1f"}], "Input", CellFrame->{{0, 0}, {0, 2}}, CellChangeTimes->{{3.4413432939375*^9, 3.441343299859375*^9}, 3.441344045*^9, {3.44134448459375*^9, 3.441344492296875*^9}, { 3.441426359390625*^9, 3.441426436375*^9}}], Cell[BoxData[ RowBox[{ SubsuperscriptBox["H", "5", "3"], "=", RowBox[{ SubsuperscriptBox["C", "5", RowBox[{"3", "+", "5", "-", "1"}]], "=", RowBox[{ SubsuperscriptBox["C", "5", "7"], "=", RowBox[{ SubsuperscriptBox["C", "2", "7"], "=", "21"}]}]}]}]], "Input", CellChangeTimes->{{3.441344797078125*^9, 3.441344850015625*^9}}], Cell[BoxData[{ RowBox[{"c", " ", "\:53d6", " ", "5", " ", "\:500b\:6709", " ", "1", "\:7a2e\:65b9\:6cd5"}], "\[IndentingNewLine]", RowBox[{"c", " ", "\:53d6", " ", "4", " ", "\:500b\:6709", " ", "2", " ", "\:7a2e\:65b9\:6cd5"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"21", "-", "1", "-", "2"}], "=", RowBox[{"18", "\:7a2e\:65b9\:6cd5"}]}]}], "Input", CellChangeTimes->{{3.4413448816875*^9, 3.441344969328125*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"a", "+", "b", "+", "c"}], ")"}], "5"], "//", "Expand"}]], "Input",\ CellChangeTimes->{{3.44134466915625*^9, 3.4413446800625*^9}}], Cell[BoxData[ RowBox[{ SuperscriptBox["a", "5"], "+", RowBox[{"5", " ", SuperscriptBox["a", "4"], " ", "b"}], "+", RowBox[{"10", " ", SuperscriptBox["a", "3"], " ", SuperscriptBox["b", "2"]}], "+", RowBox[{"10", " ", SuperscriptBox["a", "2"], " ", SuperscriptBox["b", "3"]}], "+", RowBox[{"5", " ", "a", " ", SuperscriptBox["b", "4"]}], "+", SuperscriptBox["b", "5"], "+", RowBox[{"5", " ", SuperscriptBox["a", "4"], " ", "c"}], "+", RowBox[{"20", " ", SuperscriptBox["a", "3"], " ", "b", " ", "c"}], "+", RowBox[{"30", " ", SuperscriptBox["a", "2"], " ", SuperscriptBox["b", "2"], " ", "c"}], "+", RowBox[{"20", " ", "a", " ", SuperscriptBox["b", "3"], " ", "c"}], "+", RowBox[{"5", " ", SuperscriptBox["b", "4"], " ", "c"}], "+", RowBox[{"10", " ", SuperscriptBox["a", "3"], " ", SuperscriptBox["c", "2"]}], "+", RowBox[{"30", " ", SuperscriptBox["a", "2"], " ", "b", " ", SuperscriptBox["c", "2"]}], "+", RowBox[{"30", " ", "a", " ", SuperscriptBox["b", "2"], " ", SuperscriptBox["c", "2"]}], "+", RowBox[{"10", " ", SuperscriptBox["b", "3"], " ", SuperscriptBox["c", "2"]}], "+", RowBox[{"10", " ", SuperscriptBox["a", "2"], " ", SuperscriptBox["c", "3"]}], "+", RowBox[{"20", " ", "a", " ", "b", " ", SuperscriptBox["c", "3"]}], "+", RowBox[{"10", " ", SuperscriptBox["b", "2"], " ", SuperscriptBox["c", "3"]}], "+", RowBox[{"5", " ", "a", " ", SuperscriptBox["c", "4"]}], "+", RowBox[{"5", " ", "b", " ", SuperscriptBox["c", "4"]}], "+", SuperscriptBox["c", "5"]}]], "Output", CellChangeTimes->{3.4413446811875*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.44134469646875*^9, 3.4413447256875*^9}}], Cell[BoxData["21"], "Output", CellChangeTimes->{3.44134472671875*^9}] }, Open ]], Cell[BoxData["\:9644\:8a3b\:ff1a\:8868\:5217\:5982\:4e0b"], "Input", CellChangeTimes->{{3.44142646884375*^9, 3.441426479765625*^9}, { 3.441426971984375*^9, 3.4414269778125*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p", "=", RowBox[{"Permutations", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "a", ",", "a", ",", "a", ",", "a", ",", "a", ",", "a", ",", "a", ",", "b", ",", "b", ",", "b", ",", "b", ",", "b", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", "5", "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.441343407234375*^9, 3.44134342528125*^9}, { 3.441343465890625*^9, 3.441343471984375*^9}, {3.441343856234375*^9, 3.441343858453125*^9}, 3.441344045015625*^9, {3.4414114159375*^9, 3.441411436796875*^9}, 3.44142648865625*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "a", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "c", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "a", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "b", ",", "c", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "c", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "a", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "a", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "b", ",", "c", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "b", ",", "c", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "a", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "a", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "b", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "c", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "b", ",", "c", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "a", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "b", ",", "a"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "c", ",", "c", ",", "b", ",", "b"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.441411439359375*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "p", "]"}]], "Input", CellChangeTimes->{{3.441344597515625*^9, 3.441344602421875*^9}}], Cell[BoxData["232"], "Output", CellChangeTimes->{3.441344604328125*^9, 3.441411444046875*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"q", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{"p", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"j", ",", "5"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"Length", "[", "p", "]"}]}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.441343710375*^9, 3.44134371575*^9}, {3.4413437603125*^9, 3.441343840359375*^9}, {3.4413438734375*^9, 3.441343884921875*^9}, { 3.441343926046875*^9, 3.44134398615625*^9}, 3.441344045015625*^9, { 3.44134422871875*^9, 3.441344251328125*^9}, {3.44134429521875*^9, 3.44134433934375*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"5", " ", "a"}], ",", RowBox[{ RowBox[{"4", " ", "a"}], "+", "b"}], ",", RowBox[{ RowBox[{"4", " ", "a"}], "+", "c"}], ",", RowBox[{ RowBox[{"4", " ", "a"}], "+", "b"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "b"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"4", " ", "a"}], "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"4", " ", "a"}], "+", "b"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "b"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "b"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "b"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"4", " ", "a"}], "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"4", " ", "a"}], "+", "b"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "b"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "b"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "b"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "b"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "b"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "b"}]}], ",", RowBox[{"a", "+", RowBox[{"4", " ", "b"}]}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"4", " ", "a"}], "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"4", " ", "a"}], "+", "b"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "b"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "b"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "b"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "b"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "b"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "b"}]}], ",", RowBox[{"a", "+", RowBox[{"4", " ", "b"}]}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "b"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "b"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "b"}]}], ",", RowBox[{"a", "+", RowBox[{"4", " ", "b"}]}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "b"}]}], ",", RowBox[{"a", "+", RowBox[{"4", " ", "b"}]}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"4", " ", "b"}]}], ",", RowBox[{"5", " ", "b"}], ",", RowBox[{ RowBox[{"4", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"4", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"4", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "b"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"4", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "b"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "b"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "b"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"4", " ", "a"}], "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"4", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "b"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "b"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "b"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "b"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "b"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "b"}], "+", RowBox[{"3", " ", "c"}]}]}], "}"}]], "Output", CellChangeTimes->{3.441411603546875*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "q", "]"}]], "Input", CellChangeTimes->{{3.4413446244375*^9, 3.44134462825*^9}}], Cell[BoxData["232"], "Output", CellChangeTimes->{3.441344630390625*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"r", "=", RowBox[{"Union", "[", RowBox[{ RowBox[{"{", "}"}], ",", "q"}], "]"}]}]], "Input", CellChangeTimes->{{3.441344380984375*^9, 3.441344400125*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"5", " ", "a"}], ",", RowBox[{"5", " ", "b"}], ",", RowBox[{ RowBox[{"4", " ", "a"}], "+", "b"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "b"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "b"}]}], ",", RowBox[{"a", "+", RowBox[{"4", " ", "b"}]}], ",", RowBox[{ RowBox[{"4", " ", "a"}], "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", "b", "+", "c"}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"2", " ", "b"}], "+", "c"}], ",", RowBox[{"a", "+", RowBox[{"3", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"4", " ", "b"}], "+", "c"}], ",", RowBox[{ RowBox[{"3", " ", "a"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", "b", "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{"a", "+", RowBox[{"2", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"3", " ", "b"}], "+", RowBox[{"2", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "a"}], "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{"a", "+", "b", "+", RowBox[{"3", " ", "c"}]}], ",", RowBox[{ RowBox[{"2", " ", "b"}], "+", RowBox[{"3", " ", "c"}]}]}], "}"}]], "Output", CellChangeTimes->{3.441344402140625*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Length", "[", "r", "]"}]], "Input", CellChangeTimes->{{3.44134441965625*^9, 3.441344428203125*^9}}], Cell[BoxData["18"], "Output", CellChangeTimes->{3.441344429328125*^9}] }, Open ]] }, WindowSize->{795, 666}, WindowMargins->{{Automatic, 0}, {Automatic, 0}}, Magnification->1.5, FrontEndVersion->"6.0 for Microsoft Windows (32-bit) (February 7, 2008)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[568, 21, 100, 2, 43, "Input"], Cell[671, 25, 1113, 20, 167, "Input"], Cell[1787, 47, 129, 2, 56, "Input"], Cell[CellGroupData[{ Cell[1941, 53, 512, 11, 71, "Input"], Cell[2456, 66, 8863, 257, 643, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[11356, 328, 149, 3, 43, "Input"], Cell[11508, 333, 165, 4, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[11710, 342, 346, 8, 43, "Input"], Cell[12059, 352, 8842, 257, 643, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[20938, 614, 150, 3, 43, "Input"], Cell[21091, 619, 187, 4, 42, "Output"] }, Open ]], Cell[21293, 626, 210, 4, 56, "Input"], Cell[21506, 632, 284, 7, 45, "Input"], Cell[21793, 641, 639, 10, 113, "Input"], Cell[22435, 653, 597, 9, 98, "Input"], Cell[23035, 664, 1232, 28, 165, "Input"], Cell[24270, 694, 172, 3, 43, "Input"], Cell[CellGroupData[{ Cell[24467, 701, 432, 11, 43, "Input"], Cell[24902, 714, 15087, 506, 818, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[40026, 1225, 145, 3, 43, "Input"], Cell[40174, 1230, 168, 4, 42, "Output"] }, Open ]], Cell[40357, 1237, 527, 10, 56, "Input"], Cell[40887, 1249, 689, 11, 111, "Input"], Cell[CellGroupData[{ Cell[41601, 1264, 252, 7, 45, "Input"], Cell[41856, 1273, 2229, 60, 127, "Output"] }, Open ]], Cell[44100, 1336, 4166, 99, 559, "Input"], Cell[CellGroupData[{ Cell[48291, 1439, 461, 13, 45, "Input"], Cell[48755, 1454, 138, 3, 42, "Output"] }, Open ]], Cell[48908, 1460, 484, 11, 73, "Input"], Cell[49395, 1473, 1472, 31, 280, "Input"], Cell[CellGroupData[{ Cell[50892, 1508, 280, 7, 43, "Input"], Cell[51175, 1517, 4329, 126, 318, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[55541, 1648, 149, 3, 43, "Input"], Cell[55693, 1653, 163, 4, 42, "Output"] }, Open ]], Cell[55871, 1660, 1939, 37, 248, "Input"], Cell[CellGroupData[{ Cell[57835, 1701, 282, 5, 43, "Input"], Cell[58120, 1708, 3377, 78, 318, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[61534, 1791, 150, 3, 43, "Input"], Cell[61687, 1796, 167, 4, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[61891, 1805, 223, 6, 45, "Input"], Cell[62117, 1813, 2132, 57, 127, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[64286, 1875, 122, 2, 43, "Input"], Cell[64411, 1879, 65, 1, 42, "Output"] }, Open ]], Cell[64491, 1883, 370, 6, 43, "Input"], Cell[64864, 1891, 647, 14, 113, "Input"], Cell[CellGroupData[{ Cell[65536, 1909, 267, 6, 43, "Input"], Cell[65806, 1917, 10873, 247, 1018, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[76716, 2169, 151, 3, 43, "Input"], Cell[76870, 2174, 143, 3, 42, "Output"] }, Open ]], Cell[77028, 2180, 1302, 26, 221, "Input"], Cell[78333, 2208, 599, 16, 98, "Input"], Cell[78935, 2226, 252, 7, 43, "Input"], Cell[79190, 2235, 805, 23, 71, "Input"], Cell[CellGroupData[{ Cell[80020, 2262, 148, 3, 43, "Input"], Cell[80171, 2267, 143, 3, 42, "Output"] }, Open ]], Cell[80329, 2273, 1037, 23, 169, "Input"], Cell[CellGroupData[{ Cell[81391, 2300, 241, 5, 43, "Input"], Cell[81635, 2307, 1689, 49, 143, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[83361, 2361, 150, 3, 43, "Input"], Cell[83514, 2366, 142, 3, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[83693, 2374, 202, 6, 45, "Input"], Cell[83898, 2382, 1695, 50, 100, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[85630, 2437, 118, 2, 43, "Input"], Cell[85751, 2441, 70, 1, 42, "Output"] }, Open ]], Cell[85836, 2445, 1488, 29, 221, "Input"], Cell[CellGroupData[{ Cell[87349, 2478, 227, 6, 43, "Input"], Cell[87579, 2486, 2133, 64, 168, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[89749, 2555, 151, 3, 43, "Input"], Cell[89903, 2560, 143, 3, 42, "Output"] }, Open ]], Cell[90061, 2566, 1244, 26, 194, "Input"], Cell[CellGroupData[{ Cell[91330, 2596, 360, 9, 43, "Input"], Cell[91693, 2607, 3082, 71, 293, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[94812, 2683, 149, 3, 43, "Input"], Cell[94964, 2688, 168, 4, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[95169, 2697, 574, 14, 71, "Input"], Cell[95746, 2713, 2107, 63, 168, "Output"] }, Open ]], Cell[97868, 2779, 888, 17, 113, "Input"], Cell[CellGroupData[{ Cell[98781, 2800, 701, 14, 71, "Input"], Cell[99485, 2816, 20941, 472, 1968, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[120463, 3293, 138, 2, 43, "Input"], Cell[120604, 3297, 159, 3, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[120800, 3305, 403, 9, 71, "Input"], Cell[121206, 3316, 21790, 492, 2043, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[143033, 3813, 142, 3, 43, "Input"], Cell[143178, 3818, 138, 3, 42, "Output"] }, Open ]], Cell[143331, 3824, 190, 3, 43, "Input"], Cell[143524, 3829, 944, 23, 125, "Input"], Cell[144471, 3854, 373, 6, 43, "Input"], Cell[144847, 3862, 963, 23, 125, "Input"], Cell[145813, 3887, 320, 7, 71, "Input"], Cell[146136, 3896, 937, 19, 140, "Input"], Cell[147076, 3917, 357, 10, 45, "Input"], Cell[147436, 3929, 432, 8, 98, "Input"], Cell[CellGroupData[{ Cell[147893, 3941, 203, 6, 45, "Input"], Cell[148099, 3949, 1693, 50, 127, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[149829, 4004, 122, 2, 43, "Input"], Cell[149954, 4008, 70, 1, 42, "Output"] }, Open ]], Cell[150039, 4012, 180, 2, 43, "Input"], Cell[CellGroupData[{ Cell[150244, 4018, 617, 13, 71, "Input"], Cell[150864, 4033, 20746, 468, 1968, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[171647, 4506, 125, 2, 43, "Input"], Cell[171775, 4510, 94, 1, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[171906, 4516, 714, 18, 43, "Input"], Cell[172623, 4536, 18983, 615, 1193, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[191643, 5156, 119, 2, 43, "Input"], Cell[191765, 5160, 72, 1, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[191874, 5166, 188, 5, 43, "Input"], Cell[192065, 5173, 1392, 46, 118, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[193494, 5224, 124, 2, 43, "Input"], Cell[193621, 5228, 71, 1, 42, "Output"] }, Open ]] } ] *) (* End of internal cache information *)