(* Content-type: application/vnd.wolfram.cdf.text *) (*** Wolfram CDF File ***) (* http://www.wolfram.com/cdf *) (* CreatedBy='Mathematica 9.0' *) (*************************************************************************) (* *) (* The Mathematica License under which this file was created prohibits *) (* restricting third parties in receipt of this file from republishing *) (* or redistributing it by any means, including but not limited to *) (* rights management or terms of use, without the express consent of *) (* Wolfram Research, Inc. For additional information concerning CDF *) (* licensing and redistribution see: *) (* *) (* www.wolfram.com/cdf/adopting-cdf/licensing-options.html *) (* *) (*************************************************************************) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 1063, 20] NotebookDataLength[ 31478, 828] NotebookOptionsPosition[ 32013, 823] NotebookOutlinePosition[ 32366, 839] CellTagsIndexPosition[ 32323, 836] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Graphics3D", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{"Brown", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "3"}], ",", RowBox[{"-", "3"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "3", ",", "18"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Brown", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "13"}], ",", RowBox[{"-", "13"}], ",", "15"}], "}"}], ",", RowBox[{"{", RowBox[{"13", ",", "13", ",", "19"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Brown", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "8"}], ",", RowBox[{"-", "8"}], ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", "8", ",", "1"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Green", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", RowBox[{"-", "12"}], ",", "19"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "12", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Brown", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "13"}], ",", RowBox[{"-", "13"}], ",", "19"}], "}"}], ",", RowBox[{"{", RowBox[{"13", ",", RowBox[{"-", "12"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Brown", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "13"}], ",", "12", ",", "19"}], "}"}], ",", RowBox[{"{", RowBox[{"13", ",", "13", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Brown", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"12", ",", RowBox[{"-", "13"}], ",", "19"}], "}"}], ",", RowBox[{"{", RowBox[{"13", ",", "13", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Brown", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "13"}], ",", RowBox[{"-", "13"}], ",", "19"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", "13", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"6.8", ",", "9.3", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", "10", ",", "21"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"6.8", ",", "9.3", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"7.9", ",", "10", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"6.8", ",", "10", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", "8.7", ",", "21"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"6.8", ",", "10", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"7.9", ",", "8.7", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"6.8", ",", "8.6", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", "8", ",", "21"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"6.8", ",", "8.6", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"7.9", ",", "8", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", "White", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"6.8", ",", "8", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", "7.4", ",", "21"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"6.8", ",", "8", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"7.9", ",", "7.4", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"6.8", ",", "6.8", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", "7.4", ",", "21"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"6.8", ",", "6.8", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"7.9", ",", "7.4", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"6.8", ",", "6.1", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", "7.5", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", "White", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"10", ",", "9", ",", "20.2"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "12", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"10.7", ",", "5", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "5.7", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"10.7", ",", "4.3", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "5", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"10.7", ",", "3.6", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "4.3", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"10.7", ",", "2.9", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "3.6", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"10.7", ",", "2.2", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "2.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"10.7", ",", "1.5", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "2.2", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"10.7", ",", "0.8", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "1.5", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"10.7", ",", "0.1", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "0.8", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"10.7", ",", RowBox[{"-", "0.6"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", "0.1", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"10.7", ",", RowBox[{"-", "1.3"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", RowBox[{"-", "0.6"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"10.7", ",", RowBox[{"-", "2"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", RowBox[{"-", "1.3"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"10.7", ",", RowBox[{"-", "2.7"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", RowBox[{"-", "2"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"10.7", ",", RowBox[{"-", "3.4"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", RowBox[{"-", "2.7"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"10.7", ",", RowBox[{"-", "4.1"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"12", ",", RowBox[{"-", "3.4"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10.8"}], ",", RowBox[{"-", "4.1"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", RowBox[{"-", "3.4"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10.8"}], ",", RowBox[{"-", "3.4"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", RowBox[{"-", "2.7"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10.8"}], ",", RowBox[{"-", "2.7"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", RowBox[{"-", "2"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10.8"}], ",", RowBox[{"-", "2"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", RowBox[{"-", "1.3"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10.8"}], ",", RowBox[{"-", "1.3"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", RowBox[{"-", "0.6"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10.8"}], ",", RowBox[{"-", "0.6"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", "0.1", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10.8"}], ",", "0.1", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", "0.8", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10.8"}], ",", "0.8", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", "1.5", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10.8"}], ",", "1.5", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", "2.2", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10.8"}], ",", "2.2", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", "2.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10.8"}], ",", "2.9", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", "3.6", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10.8"}], ",", "3.6", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", "4.3", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10.8"}], ",", "4.3", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", "5", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10.8"}], ",", "5", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12"}], ",", "5.7", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "12", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7.7"}], ",", "10.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "7.7"}], ",", "12", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "6.3"}], ",", "10.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "6.3"}], ",", "12", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.5"}], ",", "10.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "5.5"}], ",", "12", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "4.7"}], ",", "10.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "4.7"}], ",", "12", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "3.9"}], ",", "10.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "3.9"}], ",", "12", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "3.1"}], ",", "10.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "3.1"}], ",", "12", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "2.3"}], ",", "10.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "2.3"}], ",", "12", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.5"}], ",", "10.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1.5"}], ",", "12", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.7"}], ",", "10.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "0.7"}], ",", "12", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"0.1", ",", "10.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"0.1", ",", "12", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"0.9", ",", "10.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"0.9", ",", "12", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"1.7", ",", "10.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"1.7", ",", "12", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"2.5", ",", "10.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"2.5", ",", "12", ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"3.3", ",", "10.9", ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"2.5", ",", RowBox[{"-", "12"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"3.3", ",", RowBox[{"-", "10.9"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"1.7", ",", RowBox[{"-", "12"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"2.5", ",", RowBox[{"-", "10.9"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"0.9", ",", RowBox[{"-", "12"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"1.7", ",", RowBox[{"-", "10.9"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{"0.1", ",", RowBox[{"-", "12"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"0.9", ",", RowBox[{"-", "10.9"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "0.7"}], ",", RowBox[{"-", "12"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{"0.1", ",", RowBox[{"-", "10.9"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1.5"}], ",", RowBox[{"-", "12"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.7"}], ",", RowBox[{"-", "10.9"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "2.3"}], ",", RowBox[{"-", "12"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.5"}], ",", RowBox[{"-", "10.9"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "3.1"}], ",", RowBox[{"-", "12"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "2.3"}], ",", RowBox[{"-", "10.9"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "3.8"}], ",", RowBox[{"-", "12"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "3.1"}], ",", RowBox[{"-", "10.9"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "4.6"}], ",", RowBox[{"-", "12"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "3.8"}], ",", RowBox[{"-", "10.9"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "5.4"}], ",", RowBox[{"-", "12"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "4.6"}], ",", RowBox[{"-", "10.9"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "6.2"}], ",", RowBox[{"-", "12"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.4"}], ",", RowBox[{"-", "10.9"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "12"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "6.2"}], ",", RowBox[{"-", "10.9"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Yellow", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "7.8"}], ",", RowBox[{"-", "12"}], ",", "20.5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "10.9"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", "White", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "6.8"}], ",", "0.1", ",", "20.7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "6.1"}], ",", RowBox[{"-", "0.6"}], ",", "20"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "White", ",", RowBox[{"Cuboid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", "0.1", ",", "20.7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "4.3"}], ",", RowBox[{"-", "0.6"}], ",", "20"}], "}"}]}], "]"}], ","}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", "}"}], ",", RowBox[{"Boxed", "\[Rule]", " ", "False"}]}], "\[IndentingNewLine]", "]"}]], "Input"], Cell[BoxData[ Graphics3DBox[{ {RGBColor[0.6, 0.4, 0.2], CuboidBox[{-3, -3, 0}, {3, 3, 18}]}, {RGBColor[0.6, 0.4, 0.2], CuboidBox[{-13, -13, 15}, {13, 13, 19}]}, {RGBColor[0.6, 0.4, 0.2], CuboidBox[{-8, -8, -1}, {8, 8, 1}]}, {RGBColor[0, 1, 0], CuboidBox[{-12, -12, 19}, {12, 12, 20}]}, {RGBColor[0.6, 0.4, 0.2], CuboidBox[{-13, -13, 19}, {13, -12, 20}]}, {RGBColor[0.6, 0.4, 0.2], CuboidBox[{-13, 12, 19}, {13, 13, 20}]}, {RGBColor[0.6, 0.4, 0.2], CuboidBox[{12, -13, 19}, {13, 13, 20}]}, {RGBColor[0.6, 0.4, 0.2], CuboidBox[{-13, -13, 19}, {-12, 13, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{6.8, 9.3, 20.5}, {8, 10, 21}]}, {RGBColor[1, 1, 0], CuboidBox[{6.8, 9.3, 20.5}, {7.9, 10, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{6.8, 10, 20.5}, {8, 8.7, 21}]}, {RGBColor[1, 1, 0], CuboidBox[{6.8, 10, 20.5}, {7.9, 8.7, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{6.8, 8.6, 20.5}, {8, 8, 21}]}, {RGBColor[1, 1, 0], CuboidBox[{6.8, 8.6, 20.5}, {7.9, 8, 20}]}, {GrayLevel[1], CuboidBox[{6.8, 8, 20.5}, {8, 7.4, 21}]}, {RGBColor[1, 1, 0], CuboidBox[{6.8, 8, 20.5}, {7.9, 7.4, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{6.8, 6.8, 20.5}, {8, 7.4, 21}]}, {RGBColor[1, 1, 0], CuboidBox[{6.8, 6.8, 20.5}, {7.9, 7.4, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{6.8, 6.1, 20.5}, {8, 7.5, 20}]}, {GrayLevel[1], CuboidBox[{10, 9, 20.2}, {12, 12, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{10.7, 5, 20.5}, {12, 5.7, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{10.7, 4.3, 20.5}, {12, 5, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{10.7, 3.6, 20.5}, {12, 4.3, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{10.7, 2.9, 20.5}, {12, 3.6, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{10.7, 2.2, 20.5}, {12, 2.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{10.7, 1.5, 20.5}, {12, 2.2, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{10.7, 0.8, 20.5}, {12, 1.5, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{10.7, 0.1, 20.5}, {12, 0.8, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{10.7, -0.6, 20.5}, {12, 0.1, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{10.7, -1.3, 20.5}, {12, -0.6, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{10.7, -2, 20.5}, {12, -1.3, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{10.7, -2.7, 20.5}, {12, -2, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{10.7, -3.4, 20.5}, {12, -2.7, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{10.7, -4.1, 20.5}, {12, -3.4, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-10.8, -4.1, 20.5}, {-12, -3.4, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-10.8, -3.4, 20.5}, {-12, -2.7, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-10.8, -2.7, 20.5}, {-12, -2, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-10.8, -2, 20.5}, {-12, -1.3, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-10.8, -1.3, 20.5}, {-12, -0.6, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-10.8, -0.6, 20.5}, {-12, 0.1, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-10.8, 0.1, 20.5}, {-12, 0.8, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-10.8, 0.8, 20.5}, {-12, 1.5, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-10.8, 1.5, 20.5}, {-12, 2.2, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-10.8, 2.2, 20.5}, {-12, 2.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-10.8, 2.9, 20.5}, {-12, 3.6, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-10.8, 3.6, 20.5}, {-12, 4.3, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-10.8, 4.3, 20.5}, {-12, 5, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-10.8, 5, 20.5}, {-12, 5.7, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-7, 12, 20.5}, {-7.7, 10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-7.7, 12, 20.5}, {-6.3, 10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-6.3, 12, 20.5}, {-5.5, 10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-5.5, 12, 20.5}, {-4.7, 10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-4.7, 12, 20.5}, {-3.9, 10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-3.9, 12, 20.5}, {-3.1, 10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-3.1, 12, 20.5}, {-2.3, 10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-2.3, 12, 20.5}, {-1.5, 10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-1.5, 12, 20.5}, {-0.7, 10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-0.7, 12, 20.5}, {0.1, 10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{0.1, 12, 20.5}, {0.9, 10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{0.9, 12, 20.5}, {1.7, 10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{1.7, 12, 20.5}, {2.5, 10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{2.5, 12, 20.5}, {3.3, 10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{2.5, -12, 20.5}, {3.3, -10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{1.7, -12, 20.5}, {2.5, -10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{0.9, -12, 20.5}, {1.7, -10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{0.1, -12, 20.5}, {0.9, -10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-0.7, -12, 20.5}, {0.1, -10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-1.5, -12, 20.5}, {-0.7, -10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-2.3, -12, 20.5}, {-1.5, -10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-3.1, -12, 20.5}, {-2.3, -10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-3.8, -12, 20.5}, {-3.1, -10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-4.6, -12, 20.5}, {-3.8, -10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-5.4, -12, 20.5}, {-4.6, -10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-6.2, -12, 20.5}, {-5.4, -10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-7, -12, 20.5}, {-6.2, -10.9, 20}]}, {RGBColor[1, 1, 0], CuboidBox[{-7.8, -12, 20.5}, {-7, -10.9, 20}]}, {GrayLevel[1], CuboidBox[{-6.8, 0.1, 20.7}, {-6.1, -0.6, 20}]}, {GrayLevel[1], CuboidBox[{-5, 0.1, 20.7}, {-4.3, -0.6, 20}]}}, Boxed->False]], "Output", CellChangeTimes->{3.6225045480845394`*^9}] }, Open ]], Cell[BoxData[{ RowBox[{"3", "A\:ff11\:ff16", "\:3000", "\:7530\:7551", "\:3000", "\:98af"}], "\[IndentingNewLine]", RowBox[{"\:9ebb\:96c0\:5353\:3092\:4f5c\:3063\:3066\:307f\:305f\:3051\:3069", "\:3001", "\:70b9\:68d2\:5fd8\:308c\:305f", "\:3002"}]}], "Input", CellChangeTimes->{{3.622504611982959*^9, 3.6225046624184055`*^9}}] }, WindowSize->{707, 760}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, FrontEndVersion->"9.0 for Microsoft Windows (32-bit) (2013\:5e741\:670828\ \:65e5)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[1485, 35, 24558, 695, 2032, "Input"], Cell[26046, 732, 5611, 81, 382, "Output"] }, Open ]], Cell[31672, 816, 337, 5, 52, "Input"] } ] *) (* End of internal cache information *) (* NotebookSignature 7wDZpCyIFEksaBgFnwtH50wP *)