(*********************************************************************** Mathematica-Compatible Notebook This notebook can be used on any computer system with Mathematica 4.0, MathReader 4.0, or any compatible application. The data for the notebook starts with the line containing stars above. To get the notebook into a Mathematica-compatible application, do one of the following: * Save the data starting with the line of stars above into a file with a name ending in .nb, then open the file inside the application; * Copy the data starting with the line of stars above to the clipboard, then use the Paste menu command inside the application. Data for notebooks contains only printable 7-bit ASCII and can be sent directly in email or through ftp in text mode. Newlines can be CR, LF or CRLF (Unix, Macintosh or MS-DOS style). NOTE: If you modify the data for this notebook not in a Mathematica- compatible application, you must delete the line below containing the word CacheID, otherwise Mathematica-compatible applications may try to use invalid cache data. For more information on notebooks and Mathematica-compatible applications, contact Wolfram Research: web: http://www.wolfram.com email: info@wolfram.com phone: +1-217-398-0700 (U.S.) Notebook reader applications are available free of charge from Wolfram Research. ***********************************************************************) (*CacheID: 232*) (*NotebookFileLineBreakTest NotebookFileLineBreakTest*) (*NotebookOptionsPosition[ 5313, 153]*) (*NotebookOutlinePosition[ 5953, 176]*) (* CellTagsIndexPosition[ 5909, 172]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{ Cell["\<\ Math 230, Winter 1999 Mathematica assignment 4\ \>", "Subsubtitle"], Cell[CellGroupData[{ Cell[" Paper Assignment", "Subsubsection"], Cell["\<\ Do problems 1 and 4 on page 179-180 (Problem Set F) of the \ Mathematica supplement. Turn these in by Friday April 14 (the date of the second exam). I'll \ also pass out a PPLANE5 \"workout\" assignment in class. Your group should also turn \ in its collective solutions for that on the 14th.\ \>", "Text"] }, Open ]], Cell[CellGroupData[{ Cell["Group Presentation", "Subsubsection"], Cell["\<\ Your group should also pick one of problems 5 through 15 from \ Problem Set F (not including 6, which is solved in the back of the book), to work out and \ present to the class. I want each group to do a different problem, so I want you to notify \ me of your choice. I'll assign problems to groups on a first come first serve basis. \ Guidelines for presentations are as follows:\ \>", "Text"], Cell["\<\ 1. The overall goal of your presentation is to provide a \ convincing analysis of the system specified in your problem. The analysis should include any conclusions the \ problem asks you to draw, but you are encouraged to go beyond what the book asks for. If \ your system of ODE's models a physical situation, then explain where the system comes \ from. If the system has adjustable parameters, then explore the way in which the \ behavior of solutions changes (or does not change) as the parameters vary. The sky's the \ limit. On the other hand you can omit more routine parts of your problem and \ otherwise diverge from the workbook if it seems to help your presentation. The point \ is to demonstrate amply that you've played around with and thought hard about your problem and to communicate and justify your conclusions as well as possible. Use Mathemtica, PPLANE5, the blackboard---whatever works best. 2. Presentations should be at least 10 minutes but no more than 30 minutes, \ so there is time for questions and comments afterward. I will schedule all \ presentations for the last two weeks of class. Specific times will (like the problems themselves) be \ assigned on a first come, first serve basis. 3. You should give me a hardcopy of your presentation when you finish along \ with some info about who did what. I generally intend to give everyone in a group the same grade, but if I suspect that someone's been carrying way more or less \ than his/her fair share of the burden, I might deviate from that intention. 4. I won't assign grades immediately, because I'll want to see all the \ presentations before I pass judgments. I'll also take into account how well the members of your group \ participate in the presentations of other groups---i.e. do you ask questions, make \ comments, etc. If you're shy or have comments that are more suitable for me than for the \ class (i.e \"this group should get a Nobel prize\" or \"this group should have been drug-tested\" ), \ you can write them down and give them to me. 5. I'd like to meet with you and your group at least once before your \ presentation. You can use the opportunity in any way you like. You can show me what you hope \ to present, and I'll give you my own suggestions. Of course, you're welcome to see me \ more than once. You might arrange a first meeting once you've tried the problem enough \ to figure out where you're confused and a second one once you pretty much have \ your presentation together. \ \>", "Text"] }, Open ]] }, Open ]] }, FrontEndVersion->"4.0 for X", ScreenRectangle->{{0, 1280}, {0, 1024}}, WindowSize->{1272, 947}, WindowMargins->{{0, Automatic}, {Automatic, 23}} ] (*********************************************************************** Cached data follows. If you edit this Notebook file directly, not using Mathematica, you must remove the line containing CacheID at the top of the file. The cache data will then be recreated when you save this file from within Mathematica. ***********************************************************************) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[1739, 51, 77, 3, 71, "Subsubtitle"], Cell[CellGroupData[{ Cell[1841, 58, 42, 0, 42, "Subsubsection"], Cell[1886, 60, 327, 8, 86, "Text"] }, Open ]], Cell[CellGroupData[{ Cell[2250, 73, 43, 0, 42, "Subsubsection"], Cell[2296, 75, 411, 10, 104, "Text"], Cell[2710, 87, 2575, 62, 698, "Text"] }, Open ]] }, Open ]] } ] *) (*********************************************************************** End of Mathematica Notebook file. ***********************************************************************)