2.04.3.GiveItaTry - (* Content-type:...

Info iconThis preview shows pages 1–3. Sign up to view the full content.

View Full Document Right Arrow Icon

Info iconThis preview has intentionally blurred sections. Sign up to view the full version.

View Full DocumentRight Arrow Icon
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: (* 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[ 254977, 7996] NotebookOptionsPosition[ 182834, 6384] NotebookOutlinePosition[ 239733, 7597] CellTagsIndexPosition[ 239350, 7581] WindowFrame->Normal ContainsDynamic->False*) (* Beginning of Notebook Content *) Notebook[{ Cell[GraphicsData["CompressedBitmap", "\<\ eJzzTSzJSM1NLMlMTlRwL0osyMhMLlZwyy8CCjEzMjAwBAKxmAIDiP0fyIQS 3CCK5f//b8/QWEwglhScxQVWzsDADKJBAiDMwA4mUcWYsIiRpo4FWQzElsAu zAFiMI46bNRhVHAYJ4ghAE/vaJrYBof70JTyj7p0WMf5oM0sow4bQIchKmoi dJBTgwsSabYamKSTiSIgIS4yfKhKrQihmkEqYJIVRQdUFxmmKYFIJlxpQoyw eaogClzYYQYlIwCufvyz\ \>"], "Graphics", ShowCellBracket->False, CellMargins->{{25, 24}, {5, 7}}, ImageSize->{81, 22}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}], Cell[TextData[{ "Accumulation\n", StyleBox["Authors: Bill Davis, Horacio Porta and Jerry Uhl ", "Subtitle"], StyleBox["\[Copyright]1996-2007", "Subtitle", FontSize->12], StyleBox["\n", "Subtitle"], StyleBox["Publisher: ", "Subtitle", FontSize->12], StyleBox[ButtonBox["Math Everywhere, Inc.", BaseStyle->"MEIHyperlink", ButtonData:>{ URL["http://www.matheverywhere.com"], None}], FontSize->12], StyleBox["\nVersion 6.0", "Subtitle", FontSize->12] }], "PrefaceTitle", CellMargins->{{Inherited, Inherited}, {Inherited, 0}}, CellChangeTimes->{3.3986953716737003`*^9}], Cell[TextData[{ "2.04 Transforming Integrals\n", StyleBox["GIVE IT A TRY!", FontSize->16, FontSlant->"Italic"] }], "Title"], Cell[CellGroupData[{ Cell[TextData[{ StyleBox["Mathematica ", FontSlant->"Italic"], "6.0 Initializations" }], "Special2", CellMargins->{{19, Inherited}, {Inherited, Inherited}}, CellLabelMargins->{{27, Inherited}, {Inherited, Inherited}}], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"Off", "[", RowBox[{"General", "::", "spell"}], "]"}], ";"}], " "}], "\n", RowBox[{ RowBox[{ RowBox[{"Off", "[", RowBox[{"General", "::", "spell1"}], "]"}], ";"}], " "}], "\n", RowBox[{ RowBox[{ RowBox[{"Needs", "[", "\"\<Units`\>\"", "]"}], ";"}], " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SetOptions", "[", RowBox[{"ListAnimate", ",", " ", RowBox[{"AnimationRepetitions", " ", "\[Rule]", " ", "4"}]}], "]"}], ";"}], " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SetOptions", "[", RowBox[{"Animate", ",", " ", RowBox[{"AnimationRepetitions", " ", "\[Rule]", " ", "4"}]}], "]"}], ";"}], " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"CMView", " ", "=", " ", RowBox[{"{", RowBox[{"2.7", ",", " ", "1.6", ",", " ", "1.2"}], "}"}]}], ";"}], " "}]}], "Input", InitializationCell->True] }, Closed]], Cell["\<\ If you're going on to vector calculus, then experience with the starred \ problems will be especially beneficial....
View Full Document

This note was uploaded on 10/11/2011 for the course MATH 231 taught by Professor Staff during the Spring '08 term at University of Illinois, Urbana Champaign.

Page1 / 126

2.04.3.GiveItaTry - (* Content-type:...

This preview shows document pages 1 - 3. Sign up to view the full document.

View Full Document Right Arrow Icon
Ask a homework question - tutors are online