(************** Content-type: application/mathematica ************** CreatedBy='Mathematica 5.2' Mathematica-Compatible Notebook This notebook can be used with any Mathematica-compatible application, such as Mathematica, MathReader or Publicon. 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[ 83136, 2251]*) (*NotebookOutlinePosition[ 83874, 2277]*) (* CellTagsIndexPosition[ 83830, 2273]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{ Cell["Immersions", "Title"], Cell[CellGroupData[{ Cell["Probl\[EGrave]me \[AGrave] deux dimensions", "Subsubsection", FormatType->TextForm, FontFamily->"Arial"], Cell[TextData[{ "On immerge ", StyleBox["un cylindre", FontSlant->"Italic"], " en position horizontale dans un r\[EAcute]cipient parall\[EAcute]l\ \[EAcute]pip\[EAcute]dique rempli d'eau. Comment varie le niveau du liquide \ lors de l'immersion du cylindre ?" }], "Text", CellMargins->{{0.6875, Inherited}, {Inherited, Inherited}}, FontFamily->"Arial"], Cell[TextData[{ "Le volume immerg\[EAcute] est proportionnel \[AGrave] la surface de la \ section qui est elle-m\[EHat]me immerg\[EAcute]e", StyleBox[".", FontSlant->"Italic"], " Consid\[EAcute]rons la fonction qui d\[EAcute]finit un demi cercle :" }], "Text", CellMargins->{{0.6875, Inherited}, {Inherited, Inherited}}, FontFamily->"Arial"], Cell[CellGroupData[{ Cell[BoxData[ \(\(Plot[Sqrt[1 - x^2], {x, \(-1\), 1}, AspectRatio \[Rule] Automatic];\)\)], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .5 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.5 0.476191 0.0119048 0.476191 [ [.02381 -0.0006 -6 -9 ] [.02381 -0.0006 6 0 ] [.2619 -0.0006 -12 -9 ] [.2619 -0.0006 12 0 ] [.7381 -0.0006 -9 -9 ] [.7381 -0.0006 9 0 ] [.97619 -0.0006 -3 -9 ] [.97619 -0.0006 3 0 ] [.4875 .10714 -18 -4.5 ] [.4875 .10714 0 4.5 ] [.4875 .20238 -18 -4.5 ] [.4875 .20238 0 4.5 ] [.4875 .29762 -18 -4.5 ] [.4875 .29762 0 4.5 ] [.4875 .39286 -18 -4.5 ] [.4875 .39286 0 4.5 ] [.4875 .4881 -6 -4.5 ] [.4875 .4881 0 4.5 ] [ 0 0 0 0 ] [ 1 .5 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .02381 .0119 m .02381 .01815 L s [(-1)] .02381 -0.0006 0 1 Mshowa .2619 .0119 m .2619 .01815 L s [(-0.5)] .2619 -0.0006 0 1 Mshowa .7381 .0119 m .7381 .01815 L s [(0.5)] .7381 -0.0006 0 1 Mshowa .97619 .0119 m .97619 .01815 L s [(1)] .97619 -0.0006 0 1 Mshowa .125 Mabswid .07143 .0119 m .07143 .01565 L s .11905 .0119 m .11905 .01565 L s .16667 .0119 m .16667 .01565 L s .21429 .0119 m .21429 .01565 L s .30952 .0119 m .30952 .01565 L s .35714 .0119 m .35714 .01565 L s .40476 .0119 m .40476 .01565 L s .45238 .0119 m .45238 .01565 L s .54762 .0119 m .54762 .01565 L s .59524 .0119 m .59524 .01565 L s .64286 .0119 m .64286 .01565 L s .69048 .0119 m .69048 .01565 L s .78571 .0119 m .78571 .01565 L s .83333 .0119 m .83333 .01565 L s .88095 .0119 m .88095 .01565 L s .92857 .0119 m .92857 .01565 L s .25 Mabswid 0 .0119 m 1 .0119 L s .5 .10714 m .50625 .10714 L s [(0.2)] .4875 .10714 1 0 Mshowa .5 .20238 m .50625 .20238 L s [(0.4)] .4875 .20238 1 0 Mshowa .5 .29762 m .50625 .29762 L s [(0.6)] .4875 .29762 1 0 Mshowa .5 .39286 m .50625 .39286 L s [(0.8)] .4875 .39286 1 0 Mshowa .5 .4881 m .50625 .4881 L s [(1)] .4875 .4881 1 0 Mshowa .125 Mabswid .5 .03571 m .50375 .03571 L s .5 .05952 m .50375 .05952 L s .5 .08333 m .50375 .08333 L s .5 .13095 m .50375 .13095 L s .5 .15476 m .50375 .15476 L s .5 .17857 m .50375 .17857 L s .5 .22619 m .50375 .22619 L s .5 .25 m .50375 .25 L s .5 .27381 m .50375 .27381 L s .5 .32143 m .50375 .32143 L s .5 .34524 m .50375 .34524 L s .5 .36905 m .50375 .36905 L s .5 .41667 m .50375 .41667 L s .5 .44048 m .50375 .44048 L s .5 .46429 m .50375 .46429 L s .25 Mabswid .5 0 m .5 .5 L s 0 0 m 1 0 L 1 .5 L 0 .5 L closepath clip newpath .5 Mabswid .02381 .0121 m .02499 .04535 L .02605 .05809 L .02846 .07827 L .03279 .10393 L .03784 .12664 L .04262 .14441 L .06244 .1998 L .08265 .2412 L .10458 .27724 L .14545 .32979 L .1848 .36884 L .22263 .39898 L .26292 .42488 L .30169 .44484 L .34292 .46144 L .36351 .46811 L .38262 .4734 L .40229 .47796 L .42082 .48147 L .44134 .48447 L .45995 .48641 L .46971 .48713 L .47505 .48744 L .48003 .48768 L .48428 .48784 L .48883 .48796 L .49143 .48802 L .49271 .48804 L .49389 .48806 L .49494 .48807 L .4961 .48808 L .49726 .48809 L .4985 .48809 L .49971 .4881 L .50085 .48809 L .50209 .48809 L .50278 .48809 L .50341 .48808 L .50469 .48807 L .50608 .48806 L .50859 .48802 L .51093 .48797 L .51341 .48791 L .51785 .48776 L .52298 .48754 L .52778 .48728 L .5387 .48652 L .54911 .48556 L .55899 .48443 L Mistroke .57753 .48174 L .59737 .47803 L .61577 .47381 L .65495 .46218 L .69659 .44562 L .73671 .4251 L .77531 .40044 L .81636 .36781 L .8559 .32828 L .89393 .27945 L .91511 .24523 L .9344 .20697 L .944 .18401 L .95442 .15423 L .9592 .13797 L .96427 .11779 L .9686 .09662 L .97089 .08274 L .97336 .06371 L .97408 .05665 L .97484 .04775 L .97549 .03781 L .97619 .0121 L Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", CellMargins->{{Inherited, 2}, {Inherited, Inherited}}, GeneratedCell->False, CellAutoOverwrite->False, TextAlignment->Center, TextJustification->0, ImageSize->{288, 144}, ImageMargins->{{30, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgKooooo003Vooooo`003_ooool3o`0002cooooo00?o0000ooooooooool00_ooool01?l0003ooooo ooooooooool3o`0005Kooooo00?o0000ooooooooool00_ooool01?l0003oooooooooooooool3o`00 02[ooooo0ol0000>ooooo`002Oooool4o`0000;ooooo00?o0000ooooooooool09Oooool4o`000004 ooooool0003oooooo`0000Wooooo00?o0000ooooooooool0Doooool00ol0003oooooo`000009oooo o`03o`000?oooooooooo02Wooooo00?o0000ooooooooool03Oooool000oooooo00?o0000oooooooo ool0:_ooool00ol0003oooooo`000007ooooo`?o0000EOooool00ol0003oooooo`000007ooooo`?o 0000:oooool00ol0003oooooooooo`0=ooooo`003oooool00ol0003oooooooooo`0Zooooo`03o`00 0?oooooo000000Oooooo00?o0000ooooooooool0EOooool00ol0003oooooo`000007ooooo`03o`00 0?oooooooooo02_ooooo00?o0000ooooooooool03Oooool000kooooo0_l0000]ooooo`03o`000?oo oooooooo00Kooooo0ol0001Fooooo`03o`000?oooooooooo00Kooooo0ol0000Zooooo`;o00003ooo ool007;ooooo00?o0000ooooooooool0LOooool007;ooooo00?o0000ooooooooool0LOooool000So ooooeOl00009ooooo`003Oooool00ol0003oooooooooo`08ooooo`03o`000?oooooooooo00Oooooo 00?o0000ooooooooool01oooool00ol0003oooooooooo`07ooooo`03o`000?oooooooooo00Oooooo 00?o0000ooooooooool01oooool00ol0003oooooooooo`07ooooo`03o`000?oooooooooo00Oooooo 00?o0000ooooooooool01oooool00ol0003oooooooooo`07ooooo`03o`000?oooooooooo00Oooooo 00?o0000ooooooooool01oooool00ol0003oooooooooo`07ooooo`03o`000?oooooooooo00Oooooo 00?o0000ooooooooool02?ooool00ol0003oooooooooo`07ooooo`03o`000?oooooooooo00Oooooo 00?o0000ooooooooool01oooool00ol0003oooooooooo`07ooooo`03o`000?oooooooooo00Oooooo 00?o0000ooooooooool03?ooool000gooooo00?o0000ooooooooool0H_ooool00ol0003ooooooooo o`1Rooooo`03o`000?oooooooooo00cooooo000=ooooo`03o`000?oooooooooo06;ooooo00?o0000 ooooooooool0H_ooool00ol0003oooooooooo`0ooooo`03o`000?oo oooooooo067ooooo00?o0000ooooooooool0H_ooool00ol0003oooooooooo`0ooooo`03o`000?oooooooooo067ooooo0_l0001Rooooo`03o`000?oooooooooo00go oooo000>ooooo`03o`000?oooooooooo067ooooo00?o0000ooooooooool0HOooool00ol0003ooooo ooooo`0=ooooo`003_ooool00ol0003oooooooooo`1Qooooo`03o`000?oooooooooo067ooooo00?o 0000ooooooooool03Oooool000kooooo00?o0000ooooooooool0HOooool00ol0003oooooooooo`1Q ooooo`03o`000?oooooooooo00gooooo000>ooooo`03o`000?oooooooooo067ooooo00?o0000oooo ooooool0HOooool00ol0003oooooooooo`0=ooooo`003_ooool00ol0003oooooooooo`1Qooooo`;o 0000H_ooool00ol0003oooooooooo`0=ooooo`003_ooool00ol0003oooooooooo`1Qooooo`03o`00 0?oooooooooo067ooooo00?o0000ooooooooool03Oooool000kooooo00?o0000ooooooooool0HOoo ool00ol0003oooooooooo`1Pooooo`03o`000?oooooooooo00kooooo000?ooooo`03o`000?oooooo oooo063ooooo00?o0000ooooooooool0H?ooool00ol0003oooooooooo`0>ooooo`003oooool00ol0 003oooooooooo`1Aooooo`03o`000?oooooooooo00;ooooo00Co0000oooooooooooooooo0ol00003 ooooo`03o`000?oooooooooo063ooooo00?o0000ooooooooool03_ooool000oooooo00?o0000oooo ooooool0D?ooool00ol0003oooooo`000008ooooo`03o`000?oooooooooo00;ooooo0ol0001Poooo o`03o`000?oooooooooo00kooooo000?ooooo`03o`000?oooooooooo053ooooo00?o0000ooooool0 00002Oooool01Ol0003ooooooooooooooooo0000067ooooo00?o0000ooooooooool03oooool000oo oooo00?o0000ooooooooool0D?ooool00ol0003oooooo`000009ooooo`05o`000?oooooooooooooo ool00000HOooool00ol0003oooooooooo`0?ooooo`004?ooool00ol0003oooooooooo`1@ooooo`03 o`000?oooooooooo00Kooooo0ol00003ooooo`03o`000?oooooooooo05oooooo00?o0000oooooooo ool03oooool0013ooooo00?o0000ooooooooool0Goooool00ol0003oooooooooo`1Oooooo`03o`00 0?oooooooooo00oooooo000@ooooo`03o`000?oooooooooo05oooooo0_l0001Pooooo`03o`000?oo oooooooo00oooooo000@ooooo`03o`000?oooooooooo05oooooo00?o0000ooooooooool0G_ooool0 0ol0003oooooooooo`0@ooooo`004Oooool00ol0003oooooooooo`1Nooooo`03o`000?oooooooooo 05kooooo00?o0000ooooooooool04?ooool0017ooooo00?o0000ooooooooool0G_ooool00ol0003o ooooooooo`1Nooooo`03o`000?oooooooooo013ooooo000Aooooo`03o`000?oooooooooo05kooooo 00?o0000ooooooooool0GOooool00ol0003oooooooooo`0Aooooo`004_ooool00ol0003ooooooooo o`1Mooooo`;o0000G_ooool00ol0003oooooooooo`0Aooooo`004_ooool00ol0003oooooooooo`1M ooooo`03o`000?oooooooooo05gooooo00?o0000ooooooooool04Oooool001;ooooo00?o0000oooo ooooool0GOooool00ol0003oooooooooo`1Mooooo`03o`000?oooooooooo017ooooo000Cooooo`03 o`000?oooooooooo05cooooo00?o0000ooooooooool0G?ooool00ol0003oooooooooo`0Booooo`00 4oooool00ol0003oooooooooo`1Looooo`03o`000?oooooooooo05cooooo00?o0000ooooooooool0 4_ooool001Cooooo00?o0000ooooooooool0Foooool2o`0005gooooo00?o0000ooooooooool04_oo ool001Cooooo00?o0000ooooooooool0Foooool00ol0003oooooooooo`1Kooooo`03o`000?oooooo oooo01?ooooo000Eooooo`03o`000?oooooooooo05[ooooo00?o0000ooooooooool0Foooool00ol0 003oooooooooo`0Cooooo`005Oooool00ol0003oooooooooo`1Jooooo`03o`000?oooooooooo05_o oooo00?o0000ooooooooool04oooool001Gooooo00?o0000ooooooooool0Boooool00ol0003ooooo ooooo`02ooooo`03o`000?oooooooooo00?ooooo00Go0000ooooooooooooooooo`00001Looooo`03 o`000?oooooooooo01Cooooo000Fooooo`03o`000?oooooooooo04Wooooo00?o0000ooooool00000 1oooool3o`0000?ooooo0ol0001Jooooo`03o`000?oooooooooo01Cooooo000Fooooo`03o`000?oo oooooooo04Wooooo00?o0000ooooool000001oooool00ol0003oooooo`000003ooooo`03o`000?oo oooooooo05Wooooo00?o0000ooooooooool05Oooool001Oooooo00?o0000ooooooooool0B?ooool0 0ol0003oooooo`000008ooooo`;o00000oooool00ol0003oooooooooo`1Iooooo`03o`000?oooooo oooo01Gooooo000Gooooo`03o`000?oooooooooo04Wooooo00?o0000ooooooooool02?ooool01Ol0 003ooooooooooooooooo000005[ooooo00?o0000ooooooooool05_ooool001Sooooo00?o0000oooo ooooool0Eoooool00ol0003oooooooooo`1Hooooo`03o`000?oooooooooo01Kooooo000Hooooo`03 o`000?oooooooooo05Oooooo0_l0001Hooooo`03o`000?oooooooooo01Oooooo000Hooooo`03o`00 0?oooooooooo05Oooooo00?o0000ooooooooool0Eoooool00ol0003oooooooooo`0Gooooo`006Ooo ool00ol0003oooooooooo`1Fooooo`03o`000?oooooooooo05Oooooo00?o0000ooooooooool05ooo ool001Wooooo00?o0000ooooooooool0E_ooool00ol0003oooooooooo`1Fooooo`03o`000?oooooo oooo01Sooooo000Jooooo`03o`000?oooooooooo05Gooooo00?o0000ooooooooool0E_ooool00ol0 003oooooooooo`0Hooooo`006_ooool00ol0003oooooooooo`1Eooooo`03o`000?oooooooooo05Go oooo00?o0000ooooooooool06Oooool001_ooooo00?o0000ooooooooool0E?ooool2o`0005Kooooo 00?o0000ooooooooool06Oooool001cooooo00?o0000ooooooooool0Doooool00ol0003ooooooooo o`1Dooooo`03o`000?oooooooooo01[ooooo000Mooooo`03o`000?oooooooooo05;ooooo00?o0000 ooooooooool0E?ooool00ol0003oooooooooo`0Jooooo`007Oooool00ol0003oooooooooo`1Boooo o`03o`000?oooooooooo05?ooooo00?o0000ooooooooool06oooool001kooooo00?o0000oooooooo ool0DOooool00ol0003oooooooooo`1Booooo`03o`000?oooooooooo01cooooo000Oooooo`03o`00 0?oooooooooo053ooooo0_l0001Cooooo`03o`000?oooooooooo01cooooo000Oooooo`03o`000?oo oooooooo053ooooo00?o0000ooooooooool0DOooool00ol0003oooooooooo`0Mooooo`008?ooool0 0ol0003oooooooooo`1?ooooo`03o`000?oooooooooo057ooooo00?o0000ooooooooool07Oooool0 027ooooo00?o0000ooooooooool0C_ooool00ol0003oooooooooo`1@ooooo`03o`000?oooooooooo 01kooooo000Rooooo`03o`000?oooooooooo03kooooo00?o0000ooooooooool00_ooool00ol0003o ooooooooo`02ooooo`;o00000oooool00ol0003oooooooooo`1?ooooo`03o`000?oooooooooo01oo oooo000Rooooo`03o`000?oooooooooo03gooooo00?o0000ooooool000001oooool00ol0003ooooo o`000003ooooo`?o0000C_ooool00ol0003oooooooooo`0Pooooo`008oooool00ol0003ooooooooo o`0looooo`03o`000?oooooo000000Oooooo0ol00003ooooo`03o`000?oooooooooo04gooooo00?o 0000ooooooooool08Oooool002Cooooo00?o0000ooooooooool0>oooool00ol0003oooooo`000007 ooooo`03o`000?oooooooooo00?ooooo00?o0000ooooooooool0C?ooool00ol0003oooooooooo`0R ooooo`009?ooool00ol0003oooooooooo`0looooo`03o`000?oooooooooo00Oooooo0_l00003oooo o`03o`000?oooooooooo04_ooooo00?o0000ooooooooool08oooool002Gooooo00?o0000oooooooo ool0B_ooool00ol0003oooooooooo`1:ooooo`03o`000?oooooooooo02Cooooo000Vooooo`03o`00 0?oooooooooo04Wooooo0_l0001:ooooo`03o`000?oooooooooo02Gooooo000Wooooo`03o`000?oo oooooooo04Sooooo00?o0000ooooooooool0B?ooool00ol0003oooooooooo`0Vooooo`00:?ooool0 0ol0003oooooooooo`17ooooo`03o`000?oooooooooo04Oooooo00?o0000ooooooooool09oooool0 02Wooooo00?o0000ooooooooool0A_ooool00ol0003oooooooooo`16ooooo`03o`000?oooooooooo 02Sooooo000Zooooo`03o`000?oooooooooo04Gooooo00?o0000ooooooooool0AOooool00ol0003o ooooooooo`0Yooooo`00:oooool00ol0003oooooooooo`14ooooo`;o0000AOooool00ol0003ooooo ooooo`0Zooooo`00;?ooool00ol0003oooooooooo`13ooooo`03o`000?oooooooooo04?ooooo00?o 0000ooooooooool0:oooool002gooooo00?o0000ooooooooool0@_ooool00ol0003oooooooooo`12 ooooo`03o`000?oooooooooo02cooooo000^ooooo`03o`000?oooooooooo047ooooo00?o0000oooo ooooool0@Oooool00ol0003oooooooooo`0]ooooo`00;oooool00ol0003oooooooooo`10ooooo`03 o`000?oooooooooo03oooooo0_l0000`ooooo`00_ooool00ol0 003oooooooooo`0dooooo`00=_ooool00ol0003oooooooooo`0Zooooo`03o`000?oooooooooo00;o oooo00Co0000oooooooooooooooo0ol00003ooooo`03o`000?oooooooooo03Wooooo00?o0000oooo ooooool0=Oooool003Oooooo00?o0000ooooooooool0:?ooool00ol0003oooooo`000007ooooo`03 o`000?oooooo000000?ooooo0ol0000hooooo`03o`000?oooooooooo03Kooooo000hooooo`;o0000 :?ooool00ol0003oooooo`000008ooooo`03o`000?oooooooooo00;ooooo00?o0000ooooooooool0 =_ooool2o`0003Wooooo000jooooo`03o`000?oooooooooo02Gooooo00?o0000ooooool000001ooo ool00ol0003oooooo`000003ooooo`03o`000?oooooooooo03Gooooo00?o0000ooooooooool0>Ooo ool003_ooooo00?o0000ooooooooool09Oooool00ol0003oooooooooo`06ooooo`?o00000oooool0 0ol0003oooooooooo`0dooooo`03o`000?oooooooooo03[ooooo000looooo`;o0000=?ooool00ol0 003oooooooooo`0booooo`;o0000?Oooool003kooooo00?o0000ooooooooool0ooooo`00DOooool2o`00 01oooooo00?o0000ooooooooool07Oooool3o`00057ooooo001Cooooo`;o00007Oooool2o`0001_o oooo0ol0001Dooooo`00EOooool3o`0001[ooooo00?o0000ooooooooool05oooool3o`0005Oooooo 001Hooooo`Go00005Oooool00ol0003oooooooooo`0Dooooo`?o0000F_ooool005gooooo2?l0000= ooooo`03o`000?oooooooooo013ooooo1?l0001Mooooo`00IOooool4o`0000?ooooo0ol00003oooo o`03o`000?oooooooooo00Oooooo2Ol0001Qooooo`00JOoooolCo`0006[ooooo001]ooooo`03o`00 0?oooooooooo00;ooooo00?o0000ooooooooool0LOooool006gooooo00?o0000ooooooooool00_oo ool00ol0003oooooooooo`1aooooo`00K?ooool2o`0007Sooooo0000\ \>"], ImageRangeCache->{{{0, 152.875}, {76.125, 0}} -> {-1.13845, -0.0977362, \ 0.00794122, 0.00794122}}] }, Open ]], Cell[TextData[{ StyleBox["Cherchons la primitive de cette fonction pour obtenir la \ variation de la surface comprise entre ce demi-cercle et l'axe ", FontFamily->"Arial"], StyleBox["Ox", FontFamily->"Arial", FontSlant->"Italic"], StyleBox[" lorsqu'on parcourt ce dernier :", FontFamily->"Arial"] }], "Text", FormatType->TextForm], Cell[CellGroupData[{ Cell[BoxData[ \(f[x_] = Integrate[Sqrt[r^2 - x^2], x]\)], "Input"], Cell[BoxData[ \(1\/2\ \((x\ \@\(r\^2 - x\^2\) + r\^2\ ArcTan[x\/\@\(r\^2 - x\^2\)])\)\)], "Output"] }, Open ]], Cell[TextData[{ "Dessinons, \[AGrave] l'aide de cette primitive l'allure de la variation de \ la surface du cercle donn\[EAcute]e par 2", StyleBox["f", FontSlant->"Italic"], "(", StyleBox["x", FontSlant->"Italic"], ") en fonction de ", StyleBox["x", FontSlant->"Italic"], " pour un rayon ", StyleBox["r ", FontSlant->"Italic"], "=1 :" }], "Text", FontFamily->"Arial"], Cell[CellGroupData[{ Cell[BoxData[{ \(\(r = 1;\)\), "\[IndentingNewLine]", \(\(Plot[2 f[x], {x, \(-r\), r}, PlotRange \[Rule] {{\(-r\), r}, {\(-Pi\)/2, Pi/2}}, \ Ticks \[Rule] None];\)\)}], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.5 0.5 0.309017 0.196726 [ [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash 0 .30902 m 1 .30902 L s .5 0 m .5 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath .5 Mabswid 0 0 m .00123 5e-05 L .00236 .00012 L .00488 .00036 L .00942 .00096 L .01975 .00289 L .03045 .00552 L .04057 .00847 L .08481 .02524 L .12514 .04466 L .16805 .06852 L .20937 .09395 L .2491 .12021 L .2914 .14976 L .33211 .17943 L .3754 .21199 L .41709 .24408 L .45719 .27537 L .49987 .30892 L .54096 .34121 L .58462 .37528 L .62669 .40763 L .66717 .43807 L .71022 .46943 L .75168 .49835 L .79155 .52468 L .834 .55072 L .87485 .57337 L .91828 .59413 L .94001 .6029 L .96012 .60978 L .97946 .61496 L .98922 .61686 L .9919 .61727 L .99478 .61764 L .99611 .61778 L .9975 .6179 L .9987 .61798 L 1 .61803 L s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{30, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgooooo`;o0000H_ooool00ol0003oooooooooo`1aooooo`004?ooool3 o`0005oooooo00?o0000ooooooooool0LOooool001?ooooo0_l0001Mooooo`03o`000?oooooooooo 077ooooo000Eooooo`;o0000Foooool00ol0003oooooooooo`1aooooo`005oooool3o`0005Sooooo 00?o0000ooooooooool0LOooool001[ooooo0_l0001Fooooo`03o`000?oooooooooo077ooooo000L ooooo`;o0000E?ooool00ol0003oooooooooo`1aooooo`007_ooool2o`0005;ooooo00?o0000oooo ooooool0LOooool0023ooooo00?o0000ooooooooool0Coooool00ol0003oooooooooo`1aooooo`00 8Oooool2o`0004oooooo00?o0000ooooooooool0LOooool002?ooooo0_l0001=ooooo`03o`000?oo oooooooo077ooooo000Uooooo`03o`000?oooooooooo04[ooooo00?o0000ooooooooool0LOooool0 02Kooooo0_l0001:ooooo`03o`000?oooooooooo077ooooo000Xooooo`;o0000B?ooool00ol0003o ooooooooo`1aooooo`00:_ooool00ol0003oooooooooo`15ooooo`03o`000?oooooooooo077ooooo 000[ooooo`;o0000AOooool00ol0003oooooooooo`1aooooo`00;Oooool2o`0004?ooooo00?o0000 ooooooooool0LOooool002oooooo00?o0000ooooooooool0@?ooool00ol0003oooooooooo`1aoooo o`00_ooool00ol0003oooooooooo`1aooooo`00=_ooool2o`00 03[ooooo00?o0000ooooooooool0LOooool003Sooooo00?o0000ooooooooool0=oooool00ol0003o ooooooooo`1aooooo`00>Oooool2o`0003Oooooo00?o0000ooooooooool0LOooool003_ooooo00?o 0000ooooooooool0=?ooool00ol0003oooooooooo`1aooooo`00??ooool2o`0003Cooooo00?o0000 ooooooooool0LOooool003kooooo00?o0000ooooooooool0oooool007;o oooo00?o0000ooooooooool0=_ooool00ol0003oooooooooo`0hooooo`00L_ooool00ol0003ooooo ooooo`0gooooo`;o0000>?ooool007;ooooo00?o0000ooooooooool0>Oooool00ol0003ooooooooo o`0eooooo`00L_ooool00ol0003oooooooooo`0jooooo`;o0000=Oooool007;ooooo00?o0000oooo ooooool0??ooool00ol0003oooooooooo`0booooo`00L_ooool00ol0003oooooooooo`0mooooo`;o 0000<_ooool007;ooooo00?o0000ooooooooool0?oooool00ol0003oooooooooo`0_ooooo`00L_oo ool00ol0003oooooooooo`10ooooo`;o0000;oooool007;ooooo00?o0000ooooooooool0@_ooool2 o`0002gooooo001booooo`03o`000?oooooooooo04Cooooo00?o0000ooooooooool0:_ooool007;o oooo00?o0000ooooooooool0AOooool2o`0002[ooooo001booooo`03o`000?oooooooooo04Oooooo 0_l0000Xooooo`00L_ooool00ol0003oooooooooo`19ooooo`03o`000?oooooooooo02Gooooo001b ooooo`03o`000?oooooooooo04[ooooo0_l0000Uooooo`00L_ooool00ol0003oooooooooo`1"], ImageRangeCache->{{{0, 229.375}, {141.312, 0}} -> {-1.00318, -1.57081, \ 0.00699767, 0.0177853}}] }, Open ]], Cell["\<\ Translatons cette fonction pour la faire d\[EAcute]buter \[AGrave] \ l'origine et obtenir l'augmentation de niveau en fonction de la profondeur \ d'immersion :\ \>", "Text", FontFamily->"Arial"], Cell[CellGroupData[{ Cell[BoxData[{ \(\(r = 1;\)\), "\[IndentingNewLine]", \(\(fs = 14;\)\), "\[IndentingNewLine]", \(\(Plot[2 f[x - r] + Pi/2, {x, 0, 2 r}, PlotRange \[Rule] {{0, 2 r}, {0, Pi}}, \ Ticks \[Rule] None, PlotLabel \[Rule] "\", TextStyle \[Rule] {FontFamily -> "\", FontSize \[Rule] fs, FontSlant -> "\"}];\)\)}], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0 0.5 0 0.196726 [ [.5 .63053 -114.094 0 ] [.5 .63053 114.094 18 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash 0 0 m 1 0 L s 0 0 m 0 .61803 L s gsave .5 .63053 -175.094 -4 Mabsadd m 1 1 Mabs scale currentpoint translate 0 26 translate 1 -1 scale /g { setgray} bind def /k { setcmykcolor} bind def /p { gsave} bind def /r { setrgbcolor} bind def /w { setlinewidth} bind def /C { curveto} bind def /F { fill} bind def /L { lineto} bind def /rL { rlineto} bind def /P { grestore} bind def /s { stroke} bind def /S { show} bind def /N {currentpoint 3 -1 roll show moveto} bind def /Msf { findfont exch scalefont [1 0 0 -1 0 0 ] makefont setfont} bind def /m { moveto} bind def /Mr { rmoveto} bind def /Mx {currentpoint exch pop moveto} bind def /My {currentpoint pop exch moveto} bind def /X {0 rmoveto} bind def /Y {0 exch rmoveto} bind def 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 0.000 0.000 rmoveto 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (Niveau) show 110.438 18.000 moveto %%IncludeResource: font Mathematica1 %%IncludeFont: Mathematica1 /Mathematica1 findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (=) show 123.562 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (f) show %%IncludeResource: font Mathematica2 %%IncludeFont: Mathematica2 /Mathematica2 findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 129.250 18.000 moveto (H) show 133.812 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (profondeur) show 206.375 18.000 moveto (d) show 214.812 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (') show 218.500 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (immersion) show %%IncludeResource: font Mathematica2 %%IncludeFont: Mathematica2 /Mathematica2 findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 282.750 18.000 moveto (L) show 287.188 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 0.000 0.000 rmoveto 1.000 setlinewidth grestore 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath .5 Mabswid 0 0 m .00123 5e-05 L .00236 .00012 L .00488 .00036 L .00942 .00096 L .01975 .00289 L .03045 .00552 L .04057 .00847 L .08481 .02524 L .12514 .04466 L .16805 .06852 L .20937 .09395 L .2491 .12021 L .2914 .14976 L .33211 .17943 L .3754 .21199 L .41709 .24408 L .45719 .27537 L .49987 .30892 L .54096 .34121 L .58462 .37528 L .62669 .40763 L .66717 .43807 L .71022 .46943 L .75168 .49835 L .79155 .52468 L .834 .55072 L .87485 .57337 L .91828 .59413 L .94001 .6029 L .96012 .60978 L .97946 .61496 L .98922 .61686 L .9919 .61727 L .99478 .61764 L .99611 .61778 L .9975 .6179 L .9987 .61798 L 1 .61803 L s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{301.562, 186.312}, ImageMargins->{{29.9375, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgooooo`Ko0000gOooool000kooooo00?o0000ooooooooool00oooool4o`000=Wo oooo000>ooooo`03o`000?oooooooooo00Oooooo0ol0003Fooooo`003_ooool00ol0003ooooooooo o`0:ooooo`;o0000e?ooool000kooooo00?o0000ooooooooool03?ooool3o`000=7ooooo000>oooo o`03o`000?oooooooooo00oooooo0_l0003?ooooo`003_ooool00ol0003oooooooooo`0Aooooo`;o 0000cOooool000kooooo00?o0000ooooooooool04oooool2o`000<_ooooo000>ooooo`03o`000?oo oooooooo01Gooooo0_l00039ooooo`003_ooool00ol0003oooooooooo`0Gooooo`;o0000aoooool0 00kooooo00?o0000ooooooooool06Oooool2o`000ooooo`03o`000?oooooooooo01_o oooo0_l00033ooooo`003_ooool00ol0003oooooooooo`0Mooooo`03o`000?oooooooooo0<3ooooo 000>ooooo`03o`000?oooooooooo01kooooo0_l00030ooooo`003_ooool00ol0003oooooooooo`0P ooooo`;o0000__ooool000kooooo00?o0000ooooooooool08_ooool2o`000;cooooo000>ooooo`03 o`000?oooooooooo02Cooooo0_l0002jooooo`003_ooool00ol0003oooooooooo`0Vooooo`03o`00 0?oooooooooo0;Oooooo000>ooooo`03o`000?oooooooooo02Oooooo0_l0002gooooo`003_ooool0 0ol0003oooooooooo`0Yooooo`;o0000]Oooool000kooooo00?o0000ooooooooool0:oooool00ol0 003oooooooooo`2booooo`003_ooool00ol0003oooooooooo`0/ooooo`03o`000?oooooooooo0;7o oooo000>ooooo`03o`000?oooooooooo02gooooo0_l0002aooooo`003_ooool00ol0003ooooooooo o`0_ooooo`03o`000?oooooooooo0:kooooo000>ooooo`03o`000?oooooooooo033ooooo00?o0000 ooooooooool0[Oooool000kooooo00?o0000ooooooooool0ooooo`03 o`000?oooooooooo03?ooooo00?o0000ooooooooool0Z_ooool000kooooo00?o0000ooooooooool0 =?ooool2o`000:[ooooo000>ooooo`03o`000?oooooooooo03Kooooo00?o0000ooooooooool0Yooo ool000kooooo00?o0000ooooooooool0=oooool2o`000:Oooooo000>ooooo`03o`000?oooooooooo 03Wooooo00?o0000ooooooooool0Y?ooool000kooooo00?o0000ooooooooool0>_ooool2o`000:Co oooo000>ooooo`03o`000?oooooooooo03cooooo00?o0000ooooooooool0XOooool000kooooo00?o 0000ooooooooool0?Oooool00ol0003oooooooooo`2Pooooo`003_ooool00ol0003oooooooooo`0n ooooo`;o0000X?ooool000kooooo00?o0000ooooooooool0@?ooool00ol0003oooooooooo`2Moooo o`003_ooool00ol0003oooooooooo`11ooooo`03o`000?oooooooooo09cooooo000>ooooo`03o`00 0?oooooooooo04;ooooo00?o0000ooooooooool0Voooool000kooooo00?o0000ooooooooool0@ooo ool2o`0009_ooooo000>ooooo`03o`000?oooooooooo04Gooooo00?o0000ooooooooool0V?ooool0 00kooooo00?o0000ooooooooool0A_ooool2o`0009Sooooo000>ooooo`03o`000?oooooooooo04So oooo00?o0000ooooooooool0UOooool000kooooo00?o0000ooooooooool0BOooool2o`0009Gooooo 000>ooooo`03o`000?oooooooooo04_ooooo00?o0000ooooooooool0T_ooool000kooooo00?o0000 ooooooooool0C?ooool2o`0009;ooooo000>ooooo`03o`000?oooooooooo04kooooo00?o0000oooo ooooool0Soooool000kooooo00?o0000ooooooooool0Coooool00ol0003oooooooooo`2>ooooo`00 3_ooool00ol0003oooooooooo`1@ooooo`;o0000S_ooool000kooooo00?o0000ooooooooool0D_oo ool00ol0003oooooooooo`2;ooooo`003_ooool00ol0003oooooooooo`1Cooooo`03o`000?oooooo oooo08[ooooo000>ooooo`03o`000?oooooooooo05Cooooo00?o0000ooooooooool0ROooool000ko oooo00?o0000ooooooooool0EOooool2o`0008Wooooo000>ooooo`03o`000?oooooooooo05Oooooo 00?o0000ooooooooool0Q_ooool000kooooo00?o0000ooooooooool0F?ooool00ol0003ooooooooo o`25ooooo`003_ooool00ol0003oooooooooo`1Iooooo`;o0000QOooool000kooooo00?o0000oooo ooooool0Foooool00ol0003oooooooooo`22ooooo`003_ooool00ol0003oooooooooo`1Looooo`03 o`000?oooooooooo087ooooo000>ooooo`03o`000?oooooooooo05gooooo00?o0000ooooooooool0 P?ooool000kooooo00?o0000ooooooooool0G_ooool2o`00083ooooo000>ooooo`03o`000?oooooo oooo063ooooo00?o0000ooooooooool0OOooool000kooooo00?o0000ooooooooool0HOooool00ol0 003oooooooooo`1looooo`003_ooool00ol0003oooooooooo`1Rooooo`;o0000O?ooool000kooooo 00?o0000ooooooooool0I?ooool00ol0003oooooooooo`1iooooo`003_ooool00ol0003ooooooooo o`1Uooooo`03o`000?oooooooooo07Sooooo000>ooooo`03o`000?oooooooooo06Kooooo00?o0000 ooooooooool0Moooool000kooooo00?o0000ooooooooool0Ioooool2o`0007Oooooo000>ooooo`03 o`000?oooooooooo06Wooooo00?o0000ooooooooool0M?ooool000kooooo00?o0000ooooooooool0 J_ooool00ol0003oooooooooo`1cooooo`003_ooool00ol0003oooooooooo`1[ooooo`03o`000?oo oooooooo07;ooooo000>ooooo`03o`000?oooooooooo06cooooo00?o0000ooooooooool0LOooool0 00kooooo00?o0000ooooooooool0KOooool00ol0003oooooooooo`1`ooooo`003_ooool00ol0003o ooooooooo`1^ooooo`03o`000?oooooooooo06oooooo000>ooooo`03o`000?oooooooooo06oooooo 0_l0001_ooooo`003_ooool00ol0003oooooooooo`1aooooo`03o`000?oooooooooo06cooooo000> ooooo`03o`000?oooooooooo07;ooooo0_l0001/ooooo`003_ooool00ol0003oooooooooo`1doooo o`03o`000?oooooooooo06Wooooo000>ooooo`03o`000?oooooooooo07Gooooo00?o0000oooooooo ool0J?ooool000kooooo00?o0000ooooooooool0M_ooool2o`0006Sooooo000>ooooo`03o`000?oo oooooooo07Sooooo00?o0000ooooooooool0IOooool000kooooo00?o0000ooooooooool0NOooool2 o`0006Gooooo000>ooooo`03o`000?oooooooooo07_ooooo00?o0000ooooooooool0H_ooool000ko oooo00?o0000ooooooooool0O?ooool00ol0003oooooooooo`1Qooooo`003_ooool00ol0003ooooo ooooo`1mooooo`03o`000?oooooooooo063ooooo000>ooooo`03o`000?oooooooooo07kooooo00?o 0000ooooooooool0Goooool000kooooo00?o0000ooooooooool0Ooooool00ol0003oooooooooo`1N ooooo`003_ooool00ol0003oooooooooo`20ooooo`03o`000?oooooooooo05gooooo000>ooooo`03 o`000?oooooooooo087ooooo0_l0001Mooooo`003_ooool00ol0003oooooooooo`23ooooo`03o`00 0?oooooooooo05[ooooo000>ooooo`03o`000?oooooooooo08Cooooo0_l0001Jooooo`003_ooool0 0ol0003oooooooooo`26ooooo`03o`000?oooooooooo05Oooooo000>ooooo`03o`000?oooooooooo 08Oooooo0_l0001Gooooo`003_ooool00ol0003oooooooooo`29ooooo`03o`000?oooooooooo05Co oooo000>ooooo`03o`000?oooooooooo08[ooooo0_l0001Dooooo`003_ooool00ol0003ooooooooo o`2ooooo`03o`000?oooooooooo08gooooo00?o0000 ooooooooool0D?ooool000kooooo00?o0000ooooooooool0S_ooool2o`00053ooooo000>ooooo`03 o`000?oooooooooo093ooooo00?o0000ooooooooool0COooool000kooooo00?o0000ooooooooool0 TOooool00ol0003oooooooooo`1ooooo`03o`000?oooooooooo09?ooooo0_l0001;ooooo`003_ooool00ol0 003oooooooooo`2Eooooo`03o`000?oooooooooo04Sooooo000>ooooo`03o`000?oooooooooo09Ko oooo0_l00018ooooo`003_ooool00ol0003oooooooooo`2Hooooo`03o`000?oooooooooo04Gooooo 000>ooooo`03o`000?oooooooooo09Wooooo0_l00015ooooo`003_ooool00ol0003oooooooooo`2K ooooo`03o`000?oooooooooo04;ooooo000>ooooo`03o`000?oooooooooo09cooooo0_l00012oooo o`003_ooool00ol0003oooooooooo`2Nooooo`03o`000?oooooooooo03oooooo000>ooooo`03o`00 0?oooooooooo09oooooo00?o0000ooooooooool0?_ooool000kooooo00?o0000ooooooooool0X?oo ool2o`0003kooooo000>ooooo`03o`000?oooooooooo0:;ooooo00?o0000ooooooooool0>oooool0 00kooooo00?o0000ooooooooool0Xoooool00ol0003oooooooooo`0jooooo`003_ooool00ol0003o ooooooooo`2Tooooo`;o0000>_ooool000kooooo00?o0000ooooooooool0Y_ooool2o`0003Sooooo 000>ooooo`03o`000?oooooooooo0:Sooooo0_l0000fooooo`003_ooool00ol0003oooooooooo`2Z ooooo`03o`000?oooooooooo03?ooooo000>ooooo`03o`000?oooooooooo0:_ooooo0_l0000coooo o`003_ooool00ol0003oooooooooo`2]ooooo`;o0000ooooo`03o`000?oooooooooo0;7ooooo0_l0000]ooooo`003_ooool0 0ol0003oooooooooo`2cooooo`03o`000?oooooooooo02[ooooo000>ooooo`03o`000?oooooooooo 0;Cooooo0_l0000Zooooo`003_ooool00ol0003oooooooooo`2fooooo`;o0000:?ooool000kooooo 00?o0000ooooooooool0^?ooool2o`0002Kooooo000>ooooo`03o`000?oooooooooo0;[ooooo0ol0 000Sooooo`003_ooool00ol0003oooooooooo`2mooooo`;o00008Oooool000kooooo00?o0000oooo ooooool0_oooool2o`0001oooooo000>ooooo`03o`000?oooooooooo0<7ooooo0ol0000Looooo`00 3_ooool00ol0003oooooooooo`34ooooo`;o00006_ooool000kooooo00?o0000ooooooooool0a_oo ool2o`0001Sooooo000>ooooo`03o`000?oooooooooo0"], ImageRangeCache->{{{0, 240.25}, {148, 0}} -> {-0.13388, -1.60257*^-5, \ 0.00755133, 0.0191925}}] }, Open ]], Cell["\<\ Illustrons cette variation de niveau en fonction de la profondeur \ d'immersion \[AGrave] l'aide d'une animation :\ \>", "Text", FontFamily->"Arial"], Cell[BoxData[{ RowBox[{ StyleBox[\(r = 1; \ (*\ rayon\ du\ cylindre\ *) \[IndentingNewLine]\(\[CapitalDelta]x = 0.05;\)\), FontColor->RGBColor[0, 0, 1]], StyleBox[" ", FontColor->RGBColor[0, 0, 1]], StyleBox[\( (*\ pas\ pour\ la\ profondeur\ d' immersion\ x\ *) \), FontColor->RGBColor[0, 0, 1]]}], "\[IndentingNewLine]", \(fs = 14; \ (*\ font\ size\ pour\ les\ labels\ *) \[IndentingNewLine]f[x_] = Integrate[Sqrt[r^2 - x^2], x];\), "\[IndentingNewLine]", \(g1 = Table[Plot[2 f[x - r] + Pi/2, {x, 0, xfin}, PlotRange \[Rule] {{0, 2 r}, {0, Pi}}, AxesLabel \[Rule] {"\", "\"}, PlotStyle \[Rule] Hue[1], TextStyle \[Rule] {FontFamily -> "\", FontSize \[Rule] fs, FontSlant -> "\"}, \ Ticks \[Rule] None, \ DisplayFunction \[Rule] Identity], {xfin, \[CapitalDelta]x, 2 r, \[CapitalDelta]x}];\), "\[IndentingNewLine]", \ \(Needs["\"]\), "\[IndentingNewLine]", \(g2 = Table[FilledPlot[{\(-Sqrt[r^2 - x^2]\), Sqrt[r^2 - x^2]}, {x, \(-r\), xfin}, PlotRange \[Rule] {{\(-r\), r}, {\(-r\), r}}, AspectRatio \[Rule] Automatic, Axes \[Rule] None, \ DisplayFunction \[Rule] Identity], {xfin, \(-r\) + \[CapitalDelta]x, r, \[CapitalDelta]x}];\), "\[IndentingNewLine]", \(Table[ Show[GraphicsArray[{{g2[\([i]\)]}, {g1[\([i]\)]}}], DisplayFunction \[Rule] $DisplayFunction], {i, Length[g1]}];\)}], "Input"], Cell[TextData[StyleBox["On peut envisager la variation du niveau du liquide \ dans le r\[EAcute]cipient parall\[EAcute]l\[EAcute]pip\[EAcute]dique \ lorsqu'on immerge le cylindre en fonction de l'angle d\[EAcute]fini par le \ centre d'une section du cylindre et les deux points du segment \ d\[EAcute]limitant la s\[EAcute]paration air-eau.", FontFamily->"Helvetica", FontSize->10]], "Text", FormatType->TextForm, FontFamily->"Arial", FontSize->9], Cell[CellGroupData[{ Cell[BoxData[{ \(\(r = 1;\)\), "\[IndentingNewLine]", \(\(Plot[ 2 f[x - r] + Pi/2 /. x \[Rule] r \((1 - Cos[theta])\), {theta, 0, Pi}, PlotRange \[Rule] {{0, Pi}, {0, Pi}}, \ PlotLabel \[Rule] "\", TextStyle \[Rule] {FontFamily -> "\", FontSize \[Rule] fs, FontSlant -> "\"}];\)\)}], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -1.14203e-17 0.31831 0 0.196726 [ [.15915 -0.0125 -11.8438 -18 ] [.15915 -0.0125 11.8438 0 ] [.31831 -0.0125 -5.875 -18 ] [.31831 -0.0125 5.875 0 ] [.47746 -0.0125 -11.8438 -18 ] [.47746 -0.0125 11.8438 0 ] [.63662 -0.0125 -5.90625 -18 ] [.63662 -0.0125 5.90625 0 ] [.79577 -0.0125 -11.8438 -18 ] [.79577 -0.0125 11.8438 0 ] [.95493 -0.0125 -5.90625 -18 ] [.95493 -0.0125 5.90625 0 ] [-0.0125 .09836 -23.6875 -9 ] [-0.0125 .09836 0 9 ] [-0.0125 .19673 -11.75 -9 ] [-0.0125 .19673 0 9 ] [-0.0125 .29509 -23.6875 -9 ] [-0.0125 .29509 0 9 ] [-0.0125 .39345 -11.8125 -9 ] [-0.0125 .39345 0 9 ] [-0.0125 .49182 -23.6875 -9 ] [-0.0125 .49182 0 9 ] [-0.0125 .59018 -11.8125 -9 ] [-0.0125 .59018 0 9 ] [.5 .63053 -87.6875 0 ] [.5 .63053 87.6875 18 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .15915 0 m .15915 .00625 L s gsave .15915 -0.0125 -72.8438 -22 Mabsadd m 1 1 Mabs scale currentpoint translate 0 26 translate 1 -1 scale /g { setgray} bind def /k { setcmykcolor} bind def /p { gsave} bind def /r { setrgbcolor} bind def /w { setlinewidth} bind def /C { curveto} bind def /F { fill} bind def /L { lineto} bind def /rL { rlineto} bind def /P { grestore} bind def /s { stroke} bind def /S { show} bind def /N {currentpoint 3 -1 roll show moveto} bind def /Msf { findfont exch scalefont [1 0 0 -1 0 0 ] makefont setfont} bind def /m { moveto} bind def /Mr { rmoveto} bind def /Mx {currentpoint exch pop moveto} bind def /My {currentpoint pop exch moveto} bind def /X {0 rmoveto} bind def /Y {0 exch rmoveto} bind def 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (0.5) show 1.000 setlinewidth grestore .31831 0 m .31831 .00625 L s gsave .31831 -0.0125 -66.875 -22 Mabsadd m 1 1 Mabs scale currentpoint translate 0 26 translate 1 -1 scale /g { setgray} bind def /k { setcmykcolor} bind def /p { gsave} bind def /r { setrgbcolor} bind def /w { setlinewidth} bind def /C { curveto} bind def /F { fill} bind def /L { lineto} bind def /rL { rlineto} bind def /P { grestore} bind def /s { stroke} bind def /S { show} bind def /N {currentpoint 3 -1 roll show moveto} bind def /Msf { findfont exch scalefont [1 0 0 -1 0 0 ] makefont setfont} bind def /m { moveto} bind def /Mr { rmoveto} bind def /Mx {currentpoint exch pop moveto} bind def /My {currentpoint pop exch moveto} bind def /X {0 rmoveto} bind def /Y {0 exch rmoveto} bind def 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (1) show 1.000 setlinewidth grestore .47746 0 m .47746 .00625 L s gsave .47746 -0.0125 -72.8438 -22 Mabsadd m 1 1 Mabs scale currentpoint translate 0 26 translate 1 -1 scale /g { setgray} bind def /k { setcmykcolor} bind def /p { gsave} bind def /r { setrgbcolor} bind def /w { setlinewidth} bind def /C { curveto} bind def /F { fill} bind def /L { lineto} bind def /rL { rlineto} bind def /P { grestore} bind def /s { stroke} bind def /S { show} bind def /N {currentpoint 3 -1 roll show moveto} bind def /Msf { findfont exch scalefont [1 0 0 -1 0 0 ] makefont setfont} bind def /m { moveto} bind def /Mr { rmoveto} bind def /Mx {currentpoint exch pop moveto} bind def /My {currentpoint pop exch moveto} bind def /X {0 rmoveto} bind def /Y {0 exch rmoveto} bind def 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (1.5) show 1.000 setlinewidth grestore .63662 0 m .63662 .00625 L s gsave .63662 -0.0125 -66.9062 -22 Mabsadd m 1 1 Mabs scale currentpoint translate 0 26 translate 1 -1 scale /g { setgray} bind def /k { setcmykcolor} bind def /p { gsave} bind def /r { setrgbcolor} bind def /w { setlinewidth} bind def /C { curveto} bind def /F { fill} bind def /L { lineto} bind def /rL { rlineto} bind def /P { grestore} bind def /s { stroke} bind def /S { show} bind def /N {currentpoint 3 -1 roll show moveto} bind def /Msf { findfont exch scalefont [1 0 0 -1 0 0 ] makefont setfont} bind def /m { moveto} bind def /Mr { rmoveto} bind def /Mx {currentpoint exch pop moveto} bind def /My {currentpoint pop exch moveto} bind def /X {0 rmoveto} bind def /Y {0 exch rmoveto} bind def 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (2) show 1.000 setlinewidth grestore .79577 0 m .79577 .00625 L s gsave .79577 -0.0125 -72.8438 -22 Mabsadd m 1 1 Mabs scale currentpoint translate 0 26 translate 1 -1 scale /g { setgray} bind def /k { setcmykcolor} bind def /p { gsave} bind def /r { setrgbcolor} bind def /w { setlinewidth} bind def /C { curveto} bind def /F { fill} bind def /L { lineto} bind def /rL { rlineto} bind def /P { grestore} bind def /s { stroke} bind def /S { show} bind def /N {currentpoint 3 -1 roll show moveto} bind def /Msf { findfont exch scalefont [1 0 0 -1 0 0 ] makefont setfont} bind def /m { moveto} bind def /Mr { rmoveto} bind def /Mx {currentpoint exch pop moveto} bind def /My {currentpoint pop exch moveto} bind def /X {0 rmoveto} bind def /Y {0 exch rmoveto} bind def 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (2.5) show 1.000 setlinewidth grestore .95493 0 m .95493 .00625 L s gsave .95493 -0.0125 -66.9062 -22 Mabsadd m 1 1 Mabs scale currentpoint translate 0 26 translate 1 -1 scale /g { setgray} bind def /k { setcmykcolor} bind def /p { gsave} bind def /r { setrgbcolor} bind def /w { setlinewidth} bind def /C { curveto} bind def /F { fill} bind def /L { lineto} bind def /rL { rlineto} bind def /P { grestore} bind def /s { stroke} bind def /S { show} bind def /N {currentpoint 3 -1 roll show moveto} bind def /Msf { findfont exch scalefont [1 0 0 -1 0 0 ] makefont setfont} bind def /m { moveto} bind def /Mr { rmoveto} bind def /Mx {currentpoint exch pop moveto} bind def /My {currentpoint pop exch moveto} bind def /X {0 rmoveto} bind def /Y {0 exch rmoveto} bind def 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (3) show 1.000 setlinewidth grestore .125 Mabswid .03183 0 m .03183 .00375 L s .06366 0 m .06366 .00375 L s .09549 0 m .09549 .00375 L s .12732 0 m .12732 .00375 L s .19099 0 m .19099 .00375 L s .22282 0 m .22282 .00375 L s .25465 0 m .25465 .00375 L s .28648 0 m .28648 .00375 L s .35014 0 m .35014 .00375 L s .38197 0 m .38197 .00375 L s .4138 0 m .4138 .00375 L s .44563 0 m .44563 .00375 L s .5093 0 m .5093 .00375 L s .54113 0 m .54113 .00375 L s .57296 0 m .57296 .00375 L s .60479 0 m .60479 .00375 L s .66845 0 m .66845 .00375 L s .70028 0 m .70028 .00375 L s .73211 0 m .73211 .00375 L s .76394 0 m .76394 .00375 L s .82761 0 m .82761 .00375 L s .85944 0 m .85944 .00375 L s .89127 0 m .89127 .00375 L s .9231 0 m .9231 .00375 L s .98676 0 m .98676 .00375 L s .25 Mabswid 0 0 m 1 0 L s 0 .09836 m .00625 .09836 L s gsave -0.0125 .09836 -84.6875 -13 Mabsadd m 1 1 Mabs scale currentpoint translate 0 26 translate 1 -1 scale /g { setgray} bind def /k { setcmykcolor} bind def /p { gsave} bind def /r { setrgbcolor} bind def /w { setlinewidth} bind def /C { curveto} bind def /F { fill} bind def /L { lineto} bind def /rL { rlineto} bind def /P { grestore} bind def /s { stroke} bind def /S { show} bind def /N {currentpoint 3 -1 roll show moveto} bind def /Msf { findfont exch scalefont [1 0 0 -1 0 0 ] makefont setfont} bind def /m { moveto} bind def /Mr { rmoveto} bind def /Mx {currentpoint exch pop moveto} bind def /My {currentpoint pop exch moveto} bind def /X {0 rmoveto} bind def /Y {0 exch rmoveto} bind def 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (0.5) show 1.000 setlinewidth grestore 0 .19673 m .00625 .19673 L s gsave -0.0125 .19673 -72.75 -13 Mabsadd m 1 1 Mabs scale currentpoint translate 0 26 translate 1 -1 scale /g { setgray} bind def /k { setcmykcolor} bind def /p { gsave} bind def /r { setrgbcolor} bind def /w { setlinewidth} bind def /C { curveto} bind def /F { fill} bind def /L { lineto} bind def /rL { rlineto} bind def /P { grestore} bind def /s { stroke} bind def /S { show} bind def /N {currentpoint 3 -1 roll show moveto} bind def /Msf { findfont exch scalefont [1 0 0 -1 0 0 ] makefont setfont} bind def /m { moveto} bind def /Mr { rmoveto} bind def /Mx {currentpoint exch pop moveto} bind def /My {currentpoint pop exch moveto} bind def /X {0 rmoveto} bind def /Y {0 exch rmoveto} bind def 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (1) show 1.000 setlinewidth grestore 0 .29509 m .00625 .29509 L s gsave -0.0125 .29509 -84.6875 -13 Mabsadd m 1 1 Mabs scale currentpoint translate 0 26 translate 1 -1 scale /g { setgray} bind def /k { setcmykcolor} bind def /p { gsave} bind def /r { setrgbcolor} bind def /w { setlinewidth} bind def /C { curveto} bind def /F { fill} bind def /L { lineto} bind def /rL { rlineto} bind def /P { grestore} bind def /s { stroke} bind def /S { show} bind def /N {currentpoint 3 -1 roll show moveto} bind def /Msf { findfont exch scalefont [1 0 0 -1 0 0 ] makefont setfont} bind def /m { moveto} bind def /Mr { rmoveto} bind def /Mx {currentpoint exch pop moveto} bind def /My {currentpoint pop exch moveto} bind def /X {0 rmoveto} bind def /Y {0 exch rmoveto} bind def 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (1.5) show 1.000 setlinewidth grestore 0 .39345 m .00625 .39345 L s gsave -0.0125 .39345 -72.8125 -13 Mabsadd m 1 1 Mabs scale currentpoint translate 0 26 translate 1 -1 scale /g { setgray} bind def /k { setcmykcolor} bind def /p { gsave} bind def /r { setrgbcolor} bind def /w { setlinewidth} bind def /C { curveto} bind def /F { fill} bind def /L { lineto} bind def /rL { rlineto} bind def /P { grestore} bind def /s { stroke} bind def /S { show} bind def /N {currentpoint 3 -1 roll show moveto} bind def /Msf { findfont exch scalefont [1 0 0 -1 0 0 ] makefont setfont} bind def /m { moveto} bind def /Mr { rmoveto} bind def /Mx {currentpoint exch pop moveto} bind def /My {currentpoint pop exch moveto} bind def /X {0 rmoveto} bind def /Y {0 exch rmoveto} bind def 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (2) show 1.000 setlinewidth grestore 0 .49182 m .00625 .49182 L s gsave -0.0125 .49182 -84.6875 -13 Mabsadd m 1 1 Mabs scale currentpoint translate 0 26 translate 1 -1 scale /g { setgray} bind def /k { setcmykcolor} bind def /p { gsave} bind def /r { setrgbcolor} bind def /w { setlinewidth} bind def /C { curveto} bind def /F { fill} bind def /L { lineto} bind def /rL { rlineto} bind def /P { grestore} bind def /s { stroke} bind def /S { show} bind def /N {currentpoint 3 -1 roll show moveto} bind def /Msf { findfont exch scalefont [1 0 0 -1 0 0 ] makefont setfont} bind def /m { moveto} bind def /Mr { rmoveto} bind def /Mx {currentpoint exch pop moveto} bind def /My {currentpoint pop exch moveto} bind def /X {0 rmoveto} bind def /Y {0 exch rmoveto} bind def 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (2.5) show 1.000 setlinewidth grestore 0 .59018 m .00625 .59018 L s gsave -0.0125 .59018 -72.8125 -13 Mabsadd m 1 1 Mabs scale currentpoint translate 0 26 translate 1 -1 scale /g { setgray} bind def /k { setcmykcolor} bind def /p { gsave} bind def /r { setrgbcolor} bind def /w { setlinewidth} bind def /C { curveto} bind def /F { fill} bind def /L { lineto} bind def /rL { rlineto} bind def /P { grestore} bind def /s { stroke} bind def /S { show} bind def /N {currentpoint 3 -1 roll show moveto} bind def /Msf { findfont exch scalefont [1 0 0 -1 0 0 ] makefont setfont} bind def /m { moveto} bind def /Mr { rmoveto} bind def /Mx {currentpoint exch pop moveto} bind def /My {currentpoint pop exch moveto} bind def /X {0 rmoveto} bind def /Y {0 exch rmoveto} bind def 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (3) show 1.000 setlinewidth grestore .125 Mabswid 0 .01967 m .00375 .01967 L s 0 .03935 m .00375 .03935 L s 0 .05902 m .00375 .05902 L s 0 .07869 m .00375 .07869 L s 0 .11804 m .00375 .11804 L s 0 .13771 m .00375 .13771 L s 0 .15738 m .00375 .15738 L s 0 .17705 m .00375 .17705 L s 0 .2164 m .00375 .2164 L s 0 .23607 m .00375 .23607 L s 0 .25574 m .00375 .25574 L s 0 .27542 m .00375 .27542 L s 0 .31476 m .00375 .31476 L s 0 .33443 m .00375 .33443 L s 0 .35411 m .00375 .35411 L s 0 .37378 m .00375 .37378 L s 0 .41313 m .00375 .41313 L s 0 .4328 m .00375 .4328 L s 0 .45247 m .00375 .45247 L s 0 .47214 m .00375 .47214 L s 0 .51149 m .00375 .51149 L s 0 .53116 m .00375 .53116 L s 0 .55083 m .00375 .55083 L s 0 .57051 m .00375 .57051 L s 0 .60985 m .00375 .60985 L s .25 Mabswid 0 0 m 0 .61803 L s gsave .5 .63053 -148.688 -4 Mabsadd m 1 1 Mabs scale currentpoint translate 0 26 translate 1 -1 scale /g { setgray} bind def /k { setcmykcolor} bind def /p { gsave} bind def /r { setrgbcolor} bind def /w { setlinewidth} bind def /C { curveto} bind def /F { fill} bind def /L { lineto} bind def /rL { rlineto} bind def /P { grestore} bind def /s { stroke} bind def /S { show} bind def /N {currentpoint 3 -1 roll show moveto} bind def /Msf { findfont exch scalefont [1 0 0 -1 0 0 ] makefont setfont} bind def /m { moveto} bind def /Mr { rmoveto} bind def /Mx {currentpoint exch pop moveto} bind def /My {currentpoint pop exch moveto} bind def /X {0 rmoveto} bind def /Y {0 exch rmoveto} bind def 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 0.000 0.000 rmoveto 63.000 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (Niveau) show 110.438 18.000 moveto %%IncludeResource: font Mathematica1 %%IncludeFont: Mathematica1 /Mathematica1 findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (=) show 123.562 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (f) show %%IncludeResource: font Mathematica2 %%IncludeFont: Mathematica2 /Mathematica2 findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 129.250 18.000 moveto (H) show 133.688 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (angle) show 171.625 18.000 moveto (au) show 191.188 18.000 moveto (centre) show %%IncludeResource: font Mathematica2 %%IncludeFont: Mathematica2 /Mathematica2 findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 229.938 18.000 moveto (L) show 234.375 18.000 moveto %%IncludeResource: font Helvetica-Italic %%IncludeFont: Helvetica-Italic /Helvetica-Italic findfont 14.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 0.000 0.000 rmoveto 1.000 setlinewidth grestore 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath .5 Mabswid 0 0 m .00123 0 L .00236 0 L .00365 0 L .00488 0 L .00601 0 L .00706 0 L .00821 0 L .00942 0 L .01065 0 L .01196 1e-05 L .01434 1e-05 L .01579 2e-05 L .01716 2e-05 L .01975 3e-05 L .02225 4e-05 L .02491 6e-05 L .0297 .00011 L .0354 .00018 L .04057 .00027 L .04627 .0004 L .05151 .00055 L .06335 .00103 L .07378 .00162 L .08481 .00245 L .09476 .0034 L .10543 .00466 L .12468 .00764 L .14698 .01237 L .16811 .01827 L .20835 .03376 L .25118 .05687 L .29241 .08582 L .33204 .11963 L .37426 .16143 L .41488 .20627 L .45808 .25749 L .49968 .30862 L .53969 .35783 L .58228 .40849 L .62328 .45401 L .66685 .49738 L .70883 .53318 L .74922 .56141 L .79219 .58453 L .81356 .59343 L .83356 .60028 L .85397 .60589 L .87334 .61003 L .88354 .61178 L Mistroke .89465 .61338 L .91411 .61549 L .92497 .61634 L .93481 .61692 L .94026 .61717 L .94616 .6174 L .95169 .61758 L .95684 .61771 L .96167 .61781 L .96685 .61789 L .9698 .61792 L .97259 .61795 L .97782 .61799 L .98049 .618 L .98333 .61802 L .98575 .61802 L .98713 .61803 L .98843 .61803 L .98984 .61803 L .99132 .61803 L .99259 .61803 L .99398 .61803 L .99476 .61803 L .99547 .61803 L .9963 .61803 L .99707 .61803 L .99845 .61803 L .99923 .61803 L .99995 .61803 L 1 .61803 L Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{30, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgKooooo003Vooooo`00i_ooool003Wooooo0ol00003ooooo`03o`000?oooooooooo00?o00005ooo ool00ol0003oooooooooo`0Dooooo`05o`000?ooooooooooooooool000000_ooool3o`0001Cooooo 1Ol0000Booooo`Go00000_ooool00ol0003oooooooooo`03o`0001Cooooo0ol0000Jooooo`00>Ooo ool00ol0003oooooooooo`02o`0000Cooooo00?o0000ooooooooool00_l0000Eooooo`;o00005Ooo ool2o`0000Gooooo00?o0000ooooooooool00_l0000Cooooo`03o`000?oooooooooo01Cooooo00?o 0000ooooooooool01_ooool00ol0003oooooooooo`02o`0001;ooooo00?o0000ooooooooool00_l0 000Hooooo`00>Oooool01Ol0003ooooooooooooooooo000000Sooooo00?o0000ooooooooool05?oo ool00ol0003oooooooooo`0Dooooo`03o`000?oooooooooo00Oooooo00?o0000ooooooooool04_oo ool00ol0003oooooooooo`0Dooooo`03o`000?oooooooooo00Wooooo00?o0000ooooooooool04?oo ool01Ol0003ooooooooooooooooo000001Sooooo000iooooo`05o`000?ooooooooooooooool00000 2?ooool00ol0003oooooooooo`0Dooooo`03o`000?oooooooooo01Cooooo00?o0000ooooooooool0 1oooool00ol0003oooooooooo`0Cooooo`;o00005Oooool2o`0000Wooooo00?o0000ooooooooool0 5?ooool00ol0003oooooooooo`0Fooooo`00>Oooool01?l0003oooooooooooooool2o`0000Cooooo 00Co0000oooooooooooo00005_ooool2o`0001Gooooo0_l00005ooooo`04o`000?ooooooooooo`00 01Oooooo00?o0000ooooooooool05?ooool00ol0003oooooooooo`03ooooo`04o`000?oooooooooo o`0001Cooooo0ol0000Hooooo`00>_ooool01Ol0003ooooooooooooooooo000000Cooooo1?l0000G ooooo`03o`000?oooooooooo01Cooooo00?o0000ooooooooool00oooool4o`0001Cooooo00Go0000 ooooooooooooooooo`00000Booooo`05o`000?ooooooooooooooool000001?ooool4o`0001Oooooo 00?o0000ooooooooool05Oooool003[ooooo00Go0000ooooooooooooooooo`000005ooooo`03o`00 0?oooooooooo01Gooooo0ol0000Dooooo`?o00001_ooool00ol0003oooooooooo`0Dooooo`05o`00 0?ooooooooooooooool000004_ooool01Ol0003ooooooooooooooooo000000Gooooo00?o0000oooo ooooool04oooool01Ol0003ooooooooooooooooo000001Oooooo000kooooo`Co00001Oooool5o`00 01Gooooo0_l0000Eooooo`;o00001Oooool5o`0001?ooooo1?l0000Cooooo`Co00001Oooool5o`00 01;ooooo1?l0000Gooooo`00i_ooool00>Kooooo003Vooooo`00i_ooool00>Kooooo000Uoooook3o 00004Oooool002Gooooo00?o0000ooooooooool04?ooool6o`0000?ooooo00?o0000ooooooooool0 6Oooool00ol0003oooooooooo`0Iooooo`03o`000?oooooooooo01Wooooo00?o0000ooooooooool0 6Oooool00ol0003oooooooooo`0Hooooo`03o`000?oooooooooo01Oooooo000Uooooo`03o`000?oo oooooooo01Kooooo1?l0002Tooooo`009Oooool2o`0001_ooooo0ol0002Qooooo`009Oooool00ol0 003oooooooooo`0Mooooo`?o0000W_ooool002Gooooo00?o0000ooooooooool08?ooool2o`0009co oooo000Uooooo`03o`000?oooooooooo02;ooooo0_l0002Jooooo`009Oooool2o`0002Gooooo0_l0 002Hooooo`009Oooool00ol0003oooooooooo`0Vooooo`03o`000?oooooooooo09Gooooo000Uoooo o`03o`000?oooooooooo02Oooooo0_l0002Eooooo`009Oooool2o`0002[ooooo0_l0002Cooooo`00 9Oooool00ol0003oooooooooo`0[ooooo`03o`000?oooooooooo093ooooo000Uooooo`03o`000?oo oooooooo02cooooo0_l0002@ooooo`009Oooool00ol0003oooooooooo`0^ooooo`03o`000?oooooo oooo08gooooo000Booooo`?o00000oooool00ol0003oooooooooo`03o`0000Oooooo0_l0000`oooo o`03o`000?oooooooooo08cooooo000Booooo`03o`000?oooooooooo00;o00001?ooool00ol0003o ooooooooo`02o`0000Gooooo00?o0000ooooooooool0ooooo`03o`000?oooooooooo06kooooo000Uooooo`03 o`000?oooooooooo04gooooo00?o0000ooooooooool0K_ooool002Gooooo00?o0000ooooooooool0 C_ooool00ol0003oooooooooo`1]ooooo`005?ooool01Ol0003ooooooooooooooooo000000;ooooo 0ol00007ooooo`;o0000D?ooool00ol0003oooooooooo`1/ooooo`005?ooool2o`0000Gooooo00?o 0000ooooooooool00_l00005ooooo`03o`000?oooooooooo053ooooo00?o0000ooooooooool0Jooo ool001Gooooo00?o0000ooooooooool01oooool00ol0003oooooooooo`03ooooo`03o`000?oooooo oooo057ooooo00?o0000ooooooooool0J_ooool001Gooooo00?o0000ooooooooool01oooool00ol0 003oooooooooo`03ooooo`;o0000Doooool00ol0003oooooooooo`1Yooooo`005Oooool2o`0000Go oooo00Co0000oooooooooooo00001Oooool00ol0003oooooooooo`1Cooooo`03o`000?oooooooooo 06Sooooo000Fooooo`03o`000?oooooooooo00?ooooo1?l00005ooooo`03o`000?oooooooooo05Co oooo00?o0000ooooooooool0Ioooool001Cooooo0ol00006ooooo`03o`000?oooooooooo00Gooooo 00?o0000ooooooooool0EOooool00ol0003oooooooooo`1Vooooo`005_ooool2o`0000Gooooo1Ol0 0003ooooo`;o0000E_ooool00ol0003oooooooooo`1Vooooo`009Oooool00ol0003oooooooooo`1F ooooo`03o`000?oooooooooo06Gooooo000Uooooo`03o`000?oooooooooo05Oooooo00?o0000oooo ooooool0I?ooool002Gooooo0_l0001Iooooo`03o`000?oooooooooo06?ooooo000Uooooo`03o`00 0?oooooooooo05Wooooo00?o0000ooooooooool0H_ooool002Gooooo00?o0000ooooooooool0F_oo ool00ol0003oooooooooo`1Qooooo`009Oooool00ol0003oooooooooo`1Kooooo`03o`000?oooooo oooo063ooooo000Uooooo`;o0000GOooool00ol0003oooooooooo`1Oooooo`009Oooool00ol0003o ooooooooo`1Looooo`03o`000?oooooooooo05oooooo000Uooooo`03o`000?oooooooooo05gooooo 00?o0000ooooooooool0G_ooool002Gooooo0_l0001Oooooo`03o`000?oooooooooo05gooooo000J ooooo`Go00001_ooool00ol0003oooooooooo`1Oooooo`03o`000?oooooooooo05cooooo000Koooo o`03o`000?oooooooooo00Oooooo00?o0000ooooooooool0H?ooool00ol0003oooooooooo`1Koooo o`007?ooool00ol0003oooooooooo`06ooooo`03o`000?oooooooooo063ooooo00?o0000oooooooo ool0Foooool001gooooo0_l00006ooooo`;o0000H_ooool00ol0003oooooooooo`1Jooooo`007ooo ool00ol0003oooooooooo`03ooooo`03o`000?oooooooooo06;ooooo00?o0000ooooooooool0FOoo ool001cooooo00Go0000ooooooooooooooooo`000004ooooo`03o`000?oooooooooo06?ooooo00?o 0000ooooooooool0F?ooool001cooooo00Go0000ooooooooooooooooo`000004ooooo`;o0000I?oo ool00ol0003oooooooooo`1Hooooo`007Oooool4o`0000Cooooo00?o0000ooooooooool0I?ooool0 0ol0003oooooooooo`1Gooooo`009Oooool00ol0003oooooooooo`1Uooooo`03o`000?oooooooooo 05Kooooo000Uooooo`03o`000?oooooooooo06Kooooo00?o0000ooooooooool0EOooool002Gooooo 0_l0001Xooooo`03o`000?oooooooooo05Cooooo000Uooooo`03o`000?oooooooooo06Sooooo00?o 0000ooooooooool0Doooool002Gooooo00?o0000ooooooooool0JOooool00ol0003oooooooooo`1B ooooo`009Oooool2o`0006_ooooo00?o0000ooooooooool0DOooool002Gooooo00?o0000oooooooo ool0Joooool00ol0003oooooooooo`1@ooooo`009Oooool00ol0003oooooooooo`1/ooooo`03o`00 0?oooooooooo04oooooo000Uooooo`;o0000K_ooool00ol0003oooooooooo`1>ooooo`004Oooool5 o`0000;ooooo00?o0000ooooooooool00ol00007ooooo`03o`000?oooooooooo06kooooo00?o0000 ooooooooool0COooool001;ooooo00?o0000ooooooooool01_ooool00ol0003oooooooooo`02o`00 00Gooooo00?o0000ooooooooool0Koooool00ol0003oooooooooo`1?ooool001_ooooo00?o0000ooooooooool00_l00005ooooo`03o`000?oooooo oooo08Kooooo0_l0000fooooo`006oooool01Ol0003ooooooooooooooooo000000Gooooo00?o0000 ooooooooool0R?ooool2o`0003Cooooo000Oooooo`03o`000?oooooooooo00?ooooo0_l0002;oooo o`;o0000<_ooool001gooooo0ol00005ooooo`03o`000?oooooooooo08cooooo0ol0000_ooooo`00 8?ooool00ol0003oooooooooo`02ooooo`03o`000?oooooooooo08oooooo0ol0000/ooooo`007?oo ool01Ol0003ooooooooooooooooo000000Cooooo0_l0002Cooooo`Co0000:?ooool001gooooo1?l0 0004ooooo`03o`000?oooooooooo09Kooooo2Ol0000Oooooo`009Oooool00ol0003oooooooooo`2O ooooo`ko00004Oooool00>Kooooo003Vooooo`00i_ooool0073ooooo00?o0000ooooooooool02Ooo ool4o`0003kooooo00?o0000ooooooooool09Oooool006oooooo00?o0000ooooooooool02_ooool0 0ol0003oooooooooo`02o`0003kooooo00?o0000ooooooooool09?ooool003Sooooo00?o0000oooo ooooool00_ooool00ol0003oooooo`000004ooooo`03o`000?oooooooooo00;ooooo0ol00003oooo o`?o000000?oooooo`000?ooool01?l0000@ooooo`03o`000?oooooooooo00;ooooo00?o0000oooo ooooool00ol000000ooooooo0000o`000003ooooo`03o`000?oooooooooo00Co000000Coooooo`00 0?oooooooooo0ol00007ooooo`?o000000?oooooo`000?ooool01?l00006ooooo`?o00000_ooool3 o`0000;ooooo00Go0000ooooooooooooooooo`000002ooooo`?o00000oooool3o`0000Oooooo00?o 0000ooooooooool08oooool003Wooooo00Go0000oooooooooooo0000ooooo`03o`0000?ooooo0_l0 0003ooooo`04o`000?ooooooooooo`0000;ooooo00?o0000ooooooooool00_l000001?oooooo0000 ooooooooool2o`0000Gooooo1Ol00006ooooo`05o`000?ooooooooooooooool000000_ooool00ol0 003oooooooooo`04o`0000;ooooo00Co0000oooooooooooo00000_ooool01_l0003oooooooooool0 003oooooo`0000;ooooo00?o0000ooooooooool01?ooool00ol0003oooooooooo`02o`000004oooo ool0003oooooooooo`;o00001Oooool00ol0003oooooooooo`03o`0000;ooooo00Co0000ooooool0 003o00000_ooool00ol0003oooooooooo`04o`0000;ooooo00Co0000oooooooooooo00001_ooool0 0ol0003oooooooooo`0Sooooo`00>Oooool02?l0003oooooooooool0003oooooo`000?oooooo0000 0oooool00ol0003oooooo`000002ooooo`03o`000?oooooooooo00?ooooo0_l00002ooooo`03o`00 0?oooooo000000?ooooo00?o0000ooooooooool03_ooool01Ol0003ooooooooooooooooo000000;o oooo0_l00002ooooo`03o`000?oooooo000000?ooooo00?o0000ooooool000000oooool01Ol0003o ooooo`000?oooooo000000Wooooo0_l00002ooooo`03o`000?oooooo000000?ooooo00?o0000oooo ooooool00oooool00ol0003oooooooooo`02ooooo`03o`000?oooooooooo00?ooooo00Go0000oooo ooooooooooooo`000002ooooo`03o`000?oooooo000000;ooooo00?o0000ooooooooool01oooool0 0ol0003oooooooooo`0Sooooo`00>Oooool02?l0003oooooooooool0003oooooo`000?oooooo0000 0oooool00ol0003oooooo`000002ooooo`Go00000oooool3o`000003ooooool0003ooooo00;ooooo 00?o0000ooooooooool00oooool5o`0000Kooooo00Go0000ooooooooooooooooo`000004ooooo`?o 000000?oooooo`000?ooool00_ooool00ol0003oooooo`000003ooooo`04o`000?oooooo0000oooo o`Go00001oooool3o`000003ooooool0003ooooo00;ooooo00?o0000ooooooooool00oooool00ol0 003oooooooooo`02ooooo`Go000000?oooooo`000?ooool00_ooool01_l0003oooooooooool0003o ooooo`0000;ooooo1Ol00005ooooo`03o`000?oooooooooo02?ooooo000jooooo`03o`000?oooooo 000000;ooooo0ol00002ooooo`05o`000?ooooooooooo`000?ooool00_l00002ooooo`04o`000?oo ooooooooo`0000;ooooo0ol00003ooooo`;o00004?ooool01?l0003oooooooooool00003ooooo`03 o`000?oooooooooo00Co00000_ooool01?l0003oooooo`000?l00002ooooo`03o`000?oooooooooo 00?o00000_ooool00ol0003oooooooooo`04ooooo`03o`000?oooooooooo00?o00000oooool2o`00 00Cooooo0_l00002ooooo`?o00000_ooool01?l0003oooooo`000?l00002ooooo`04o`000?oooooo ooooooooo`?o000000?oooooo`000?l000000_ooool00ol0003oooooooooo`03ooooo`03o`000?oo oooooooo02?ooooo000jooooo`;o00000oooool00ol0003oooooo`000002ooooo`05o`000?oooooo ooooooooool000000_ooool3o`0000?ooooo0ol00002ooooo`05o`000?ooooooooooooooool00000 3oooool3o`0000;ooooo00Co0000oooooooooooooooo0ol00002ooooo`Co00000oooool2o`000004 ooooool0003oooooo`0000;ooooo0ol00007ooooo`?o00000_ooool01Ol0003ooooooooooooooooo 000000Kooooo0ol00002ooooo`?o00000_ooool4o`0000;ooooo1_l000001?oooooo0000o`000?l0 0004ooooo`03o`000?oooooooooo02Cooooo000jooooo`;o00000oooool00ol0003oooooooooo`0Y ooooo`03o`000?oooooooooo00;ooooo00?o0000ooooooooool04Oooool00ol0003oooooooooo`0[ ooooo`03o`000?oooooooooo00Wooooo00?o0000ooooooooool09Oooool003_ooooo00?o0000oooo ooooool00_ooool3o`0002Wooooo0_l0000Gooooo`03o`000?oooooooooo05kooooo003Vooooo`00 i_ooool00>Kooooo0000\ \>"], ImageRangeCache->{{{0, 229.375}, {141.312, 0}} -> {-0.678172, -0.481902, \ 0.014364, 0.0232414}}] }, Open ]], Cell[BoxData[{\(theta = Pi;\), "\[IndentingNewLine]", \(\[CapitalDelta]theta = Pi/40;\), "\[IndentingNewLine]", RowBox[{ RowBox[{"g3", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{\(2 f[x - r] + Pi/2 /. x \[Rule] r \((1 - Cos[theta])\)\), ",", \({theta, 0, thetafin}\), ",", \(PlotRange \[Rule] {{0, Pi}, {0, Pi}}\), ",", \(PlotStyle \[Rule] Hue[1]\), ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\<\!\(TextForm\`\[Theta]\)\>\"", ",", "\"\\""}], "}"}]}], ",", \(TextStyle \[Rule] {FontFamily -> "\", FontSize \[Rule] fs, FontSlant -> "\"}\), ",", " ", \(Ticks \[Rule] None\), ",", " ", \(DisplayFunction \[Rule] Identity\)}], "]"}], ",", \({thetafin, \[CapitalDelta]theta, theta, \[CapitalDelta]theta}\)}], "]"}]}], ";"}]}], "Input"], Cell[BoxData[{ \(\(theta = Pi;\)\), "\[IndentingNewLine]", \(\(\[CapitalDelta]theta = Pi/40;\)\), "\[IndentingNewLine]", \(\(g4 = Table[Show[ Graphics[{\ Circle[{0, 0}, r, {\(-Pi\)/2 - \[CapitalDelta]theta, \(-Pi\)/ 2 + \[CapitalDelta]theta}], Line[r {{Cos[\(-Pi\)/2 - \[CapitalDelta]theta], Sin[\(-Pi\)/2 - \[CapitalDelta]theta]}, {Cos[\(-Pi\)/ 2 + \[CapitalDelta]theta], Sin[\(-Pi\)/2 + \[CapitalDelta]theta]}}]}], PlotRange \[Rule] {{\(-r\), r}, {\(-r\), r}}, AspectRatio \[Rule] Automatic, \ DisplayFunction \[Rule] Identity], {\[CapitalDelta]theta, \[CapitalDelta]theta, theta, \[CapitalDelta]theta}];\)\)}], "Input"], Cell[BoxData[ \(\(Table[ Show[GraphicsArray[{g3[\([i]\)], g4[\([i]\)]}], DisplayFunction \[Rule] $DisplayFunction], {i, Length[g3]}];\)\)], "Input"] }, Open ]] }, Open ]] }, FrontEndVersion->"5.2 for Macintosh", ScreenRectangle->{{0, 994}, {0, 746}}, WindowToolbars->{"RulerBar", "EditBar"}, WindowSize->{791, 560}, WindowMargins->{{41, Automatic}, {Automatic, 69}}, ShowSelection->True, ShowCellLabel->False, Magnification->1 ] (******************************************************************* 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[1776, 53, 27, 0, 77, "Title"], Cell[CellGroupData[{ Cell[1828, 57, 114, 2, 34, "Subsubsection"], Cell[1945, 61, 366, 9, 40, "Text"], Cell[2314, 72, 355, 8, 40, "Text"], Cell[CellGroupData[{ Cell[2694, 84, 113, 2, 22, "Input"], Cell[2810, 88, 15220, 420, 121, 3826, 272, "GraphicsData", "PostScript", \ "Graphics"] }, Open ]], Cell[18045, 511, 354, 10, 40, "Text"], Cell[CellGroupData[{ Cell[18424, 525, 70, 1, 22, "Input"], Cell[18497, 528, 114, 2, 32, "Output"] }, Open ]], Cell[18626, 533, 403, 16, 40, "Text"], Cell[CellGroupData[{ Cell[19054, 553, 205, 4, 32, "Input"], Cell[19262, 559, 9452, 191, 148, 1272, 86, "GraphicsData", "PostScript", \ "Graphics"] }, Open ]], Cell[28729, 753, 206, 5, 40, "Text"], Cell[CellGroupData[{ Cell[28960, 762, 425, 7, 66, "Input"], Cell[29388, 771, 16687, 346, 155, 4169, 187, "GraphicsData", "PostScript", \ "Graphics"] }, Open ]], Cell[46090, 1120, 161, 4, 26, "Text"], Cell[46254, 1126, 1659, 30, 167, "Input"], Cell[47916, 1158, 457, 9, 51, "Text"], Cell[CellGroupData[{ Cell[48398, 1171, 399, 7, 54, "Input"], Cell[48800, 1180, 32045, 1015, 148, 18170, 839, "GraphicsData", "PostScript", \ "Graphics"] }, Open ]], Cell[80860, 2198, 1179, 24, 77, "Input"], Cell[82042, 2224, 881, 17, 88, "Input"], Cell[82926, 2243, 182, 4, 32, "Input"] }, Open ]] }, Open ]] } ] *) (******************************************************************* End of Mathematica Notebook file. *******************************************************************)