(* 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[      2441,         76]
NotebookOptionsPosition[      3034,         73]
NotebookOutlinePosition[      3376,         88]
CellTagsIndexPosition[      3333,         85]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[BoxData[
 RowBox[{"Manipulate", "[",
  RowBox[{"Graphics3D", "[",
   RowBox[{"{",
    RowBox[{"Red", ",",
     RowBox[{"Cuboid", "[", "]"}]}], "}"}], "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.6028729855625*^9, 3.60287299725*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{Typeset`show$$ = True, Typeset`bookmarkList$$ = {},
    Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ =
    1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {},
    Typeset`size$$ = {415., {218., 222.}}, Typeset`update$$ = 0,
    Typeset`initDone$$, Typeset`skipInitDone$$ = True},
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, "Variables" :> {}, "ControllerVariables" :> {},
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$,
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$,
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> Graphics3D[{Red,
         Cuboid[]}], "Specifications" :> {}, "Options" :> {},
      "DefaultOptions" :> {}],
     ImageSizeCache->{464., {248., 253.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{3.602872998171875*^9}]
}, Open  ]]
},
WindowSize->{715, 655},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
FrontEndVersion->"9.0 for Microsoft Windows (32-bit) (January 25, 2013)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[1485, 35, 242, 6, 31, "Input"],
Cell[1730, 43, 1288, 27, 518, "Output"]
}, Open  ]]
}
]
*)

(* End of internal cache information *)

(* NotebookSignature 6v0zLOkqKaYukBgB9L8n4CjM *)