(************** 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[ 158807, 3807]*) (*NotebookOutlinePosition[ 159471, 3830]*) (* CellTagsIndexPosition[ 159427, 3826]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{ Cell[TextData[{ StyleBox["Numerical Solution of the Falkner-Skan \nEquation for various \ Wedge Angles", FontSize->18], StyleBox["\n", TextAlignment->Center, FontFamily->"Arial", FontSize->18], StyleBox["Author's Data: ", FontSize->16], StyleBox["Housam BINOUS\nDepartment of Chemical Engineering\nNational \ Institute of Applied Sciences and Technology\nTunis, TUNISIA\nEmail: \ binoushousam@yahoo.com ", FontSize->16, FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}] }], "Title", TextAlignment->Center, Background->RGBColor[0.734386, 0.996109, 0.648447]], Cell[OLEData["\<\ d03d>K9a00000000000000000005001P8A_`]080034>9474[a`P iNU>fC@jF9Ll2@0000000000000P4`00@0D008RU7@2X8PP0PP80003nN=ZUUTeX 4d4HQ[nIgNaV=k]]4W<@jF7]@B?BVRHF@A0Uh54?YUj5U:JXV5AY8@b68U91_>Q9 l>:YGQC_@@Ao/=2;5keE4:5B?5BSN16dRC>c?lcDKYaXH;?cI6KNNOKKfK08;03] _Pj0H@CH9d4?2hL]S53@@[SGjo7F>=XMo9J:aSWhA<;KUJF]OLH`k84N6`aYb/mY Zdf?3kCc1edW5Haah5AehO`D^E`3l11KnbMneegR3WOHXUS7T:j@n_CL9H2EY3fN oiR5m_:giP]jN8G_cK`eVj>1<4I79nViJ5MA5[>YNO:g_4kB=^;c4;3cEb5gSNLN 80ZNQoYin[TXb]ddU7g=@GaOVZ;__JgeN=n2^Zn3gcZRKg`^mDfZnc[hlI3XfoWE agMREMWG`Tm/dCLnUoYJZlZn5Vh?Rkj9KQoOX[Y_BcNUoA^OBge]MMnFOU9CmRd= hW_KD?I=3N;kfUCf?Cb8koZ@/ZlcR>oE]>Qk[@_a_Ygn5:]SlaAmBO 61L_lId`gK23m`bK_h_`6`WnFVT`>CgUKbl8hm4:VEnXeB77LX7>f0^gn0Cf]O`Y 2m^[Y_7i_`6DlM?[l@00<0I002IV@2Ic0003`284cP0000?08XC<0000000^Pl@0000G`1O 05l0D01@05@0<@0`0000Ra<@0000003[;PP0003L5Wh/0U07N_FP0_`4B0180o`4000P010<90000?`<1 0040403`1b00003oool000000820P0000000^n3S030020@<0003oooooooooo`000000000000000000000000000000000000000000 000004<000140P00000004<0M@1b0780I@1^07@0801E07<0I@1b000000000000 0000000000000000000000000000000000000000000J0080oooooooooooooooo 0000000000000000000000000000000000000000000000000`00038000000000 0@1306l0K@1`04l0HP1Z00000000000000000000000000000000000000000000 0000000000000000000001800P0100000P000?ooool000000000000000000000 00000000000000000000000000040000N`000000000?0000j0000080003T1000 7P0000h00014JF5`Kg=YM6UfIB0a06l07P0000L0001RJFi_MG<0M1h000070000 HVU^KgEc07@N00000P0003D0KVlN00005@0004eYHg9_LfmVM21@KgMULU1_JFid 001@0400002@jBOE0@000400003@i>g@g1C60D00000Pe/VkgQC60@<0000:0000 0000000000000000000000000000000000000000003no`001@42000000000000 00000000000100000]G=eI`^6a2CU`P0:bci[S00000D0P004000004000280000 0`000900000?0000[00000@0002l00001P000<@000070000c00000P0003D0000 2@000=`0000:0000i00001L0003/00002`000?@0000@0000o00001<000040@00 5P0000`1000=0000504000`0001d0@000P000>@4000N00005000045VIVUSJ65W IB3P86`WjF=bHFh07P0000P0001dMFiYKF5b00<0002h7P000`0000<000030000 0@0000<0000000000`00000000030000000000<000112PX02`000000000;0000 000000/0000000002`000000000N40001@0000H00011LVUQK0070000DgU]HVm/ 0180001=KfCXK6DPL65b86CYIV5eM00G0000CFUSLVmcKfId84EaMF5dJFm^83<^ <00>0000A6UQL6mcJGAYMVDP<@0<4000200001h0000B0000D6m/JF=ULb1eM6U/ JG?YIG<00`000080000N00005@0004e_I>Q/IB1TIB1SKfiSIG1dJFm^00<00001 00007P0001P0001CIG9fI@00mPlN0000500005o0TNP3V`@00040j@0@003P4000P1H000D0000:0000000000000001000000000@l02@B/0000 000:10@0000300003`3<3iP000000I04007_4@0000 10002?lcV@020008m`0041l0l0lL0000003c0a@0000200000000000000000020 000000l0d0O_00007`3o0a@00002000430000000000000000P0001l050@L0000 000E11@0002jTk3f0jd7U00006@000080000000002RY4`1jF`T`00000000003d o?oo000000404`1`0?/320000000001`2000L03k0`P000010000@0/000l0R1X3000000l0n0?E2@000P3_0aP0000100000@872@P00000 0000000000004`1P0?0780000?ooo`000000P8200000002kh><0I002IV@2I c000H03`1b00003oool0000009JFUP000000nmmC0?nIIP3<<`00VFH00600l0LP 0000oooo00000020P800000009W10@@000R30@0000Ro0@404@300@40 00So0@402@010P8000P0013`20000?03805P5ARQ0?017`40000000``/800000`0000T2=@00000l0 RQ<`0000002j3a00001O05l0G`1@0500E00a0300002;4a0000000>/^20000=`D aP4@Dlc@802j3b80001=06l0I03X06`0I@0P0700H@1b0200I03Y06H0H@1e07@0 3`3^0cL800020>l360000000000?400000000000080000001`0C00l030BW1`00 3`02l9l7000P00S`200000`0000A2000400Hl@@0000100003`03l?<6000?00C` :00000402O0@00000000000000000000000000802_08000000P000D0000?00C` R00001802_08000010P0000:002300_`<000080043/e0hD00P0008L00@000841 __Kn0;l1400@0<010@002?l1200800420P0020004?080000Y03<0>8E?10?00g` :0000000W`l4000010000000X@lD00000@00000000P000400@000000000?00C` F00004812_0800001@P0040:002300_`<00004@1100007l100010;l1000@0<01 I0d0002R30[`200000/800002P00X`0; l3`000200?CD=@>50080002700H0002o00800P210@@000R30@0000Ro0@004030 0@4000So0@0020010P8000P0013`200005H1GPQa3U023`0=l840000009l?1000 00@000000:P?4@0004I/KgLPL65cM21Q85MUI6MU002Q3aH0000B000000000000 4P0000400P0101@0002Z3cH0000400000@0000<00@000000000400000@0000<0 0`000000000500000@0000<00@000000000?00C`KP000;842_0800003@P0010: 001S00_`900000A10@0000/10@0003l100010;l1000@0?l1000803l2000201<0 8_460000_`400600000@l0P0003[2Qd65Q8d3Pl04O0<000000312`@000010000 3`04l50080002700H0 002o00800P210@@000R30@0000Ro0@0040300@4000So0@0020010P8000P0013` 20000eICF`KAAAn4B[AU5E@QAaPE=D;TQ8i@925AF7226A8X[XPAo1[@QDE5B1 J0T83TP@VoMVM/f^HbOS4U@5iEW?>mol_?WVkM^I]oHGWdL^_?k>S^nPC>h53@Y5 0`:N>XK:GM0OD5H[58UEYZ^Am6H@9B^?9Qm4NEF5Th_`kog0>E nC]@WfFbc>11W7L4SZ0O1^6@bW2OA75nmeaFWGlgjZQCMWWC6]bcP3B8^1kE0?8a 0=f^cG?RobOLNOhNabLo0n<@5amefHjAikFW>VkJZ66B=NAZiUm?fLSc^g/7kMfd 1e1>Co]cYNLoQ1Y6KDA]0_4:016P?@QP2lPmMB_@V@2`3BPf0:i3gH5j?FX[jPfX >e5_1=Xk0GJQ]Z7NQ7XcjRdPmiUfikX7[kNRMZ;NQ][Ue6o^AN/Wk[eWCRbikgQK lFJN`h2haj0fo=9NdbUJFTD[AH[1gI8lQL@K8DLCX]C=]S]e3JEn8GioWKF58VIg X0TSPnJCTKB8Y@GD2mShQbhSS_Z4H7lZoma1n`PNaaJS^OoTGaMV18MGA?SZ79ZC m/QPkS30fGZc^n?k:2bLo7Gb3:XEoffb`aR:dOZjV8cYGS?5XYb6M]Q[fE^Z=`?E kC7Q]ellM/l;^g_F]8/lKen=YkC;BWH_1iCi1V_Qnf7@boOEiH_EnLKEnHKhEb4_ gnYfTFnm>]l@Ok_AbgOY[eGhmWbRc=OPkiUN_]G]8UnS^]eb_PIOJ?;b[B^/`[MG WNnD7_C5KgFkb=MDic^Umf_:O1>el7diXoQW1kMaOg^O9_4E1ko99;k/h6Tm4B6l[hBO 477lAPVoF>m_GmJl>Ro6M9CbUBEc1;d1n>CPlTQVg1S:CeX7L B2Z[j>mYOFnDC?BDN;iU48jG<0_j/Lfm>[k2BlROVC_DW9/aWA2@WUGfFlWU1O_7giV;3NN6lYKim;3nLc4V9E^og5d8YDOcVG7[DAgG6CU3bF] OZMBi4d^j4k0kgNM7Zg0`?Wi@JbD`jTcScXEaa8]l6k;=U7F6==al1bYUjF3bfDjPC_`4ofUUimjEWOWcejPO7fnD0Mk1KCaJmmGaf7o2i^3]JfXakIZD>:`bKECYB3CnQhd9B>2R;VWI`I@>c >m_:3OB@KnN?n_aMkWoVnD^UD_]oSOl6Ob[2^@00LQLD00000@100000002S1000 P0h00;lF00000?D?70000000000o2P0300000;`K0001000010000000:NRAKkdj R`>U0i43[P>G0kH3W@>n0j@3a0>[0lX3/P?>0kT3c`>i0m83`P?<0l@3b@>k0lT3 _0?50kD3_`>_0kT3Z@>b0j83ZP>L0j83UP>H0i03SP>;0h<3Q@=g0h03JP=k0ed3 MP=?0g43@@=]0c83J0i0U<3YP9A0i<2 C`=[0Td3@P9<0d82AP?J0k`3e0?G0l83`P?J0k`3100000H10@040000;@4300@0 000]0@8010000?01000400009`7oo`<0000N00P0003j0P000@00000000040000 ;@4000@0000]0@@0100000H10P240000>0D203/010120UP2J`9G0Y<2E@:V0U@2 ^@9B0/`2D0;N0Td2l09:0P43A`8B0d@28P=00S43?0900cP2C`B@00002i001b5a@000010400000009<4001`3P00F1D0 0000m@lL0000000003l:00<00000EAX0004000040000002a<000000000240;D0 o@3E1`00003HV1X0f1hH00000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000?ooool3000010000040003ooooo0P000000002L<@00 =BD0018H000100T000<930002@2@0000000400000`4800D0000;0P0000050000 30;;2;T;0`0001h01`000?`2003oool000040000;@4000P0003j0PD000000?oo o`040000;@4100`000102B40l0000000003;2;T;ooooo`P0003j0P0000000000 00040000;@4200L0003l0P00oooo0000100002d10`0400009`7oo`@0003`0@00 0`0001h01`000?`2002nm_h000040000;@4000@0000]0@40300004098@3`0000 000001l8n`YE06X0100002d10P040000;@4300P0003j0P000`00000000040000 ;@4400L0003l0P4000000000100002d11@0<000090<406X0E@1Z07@8I@]d26D; E@040000;@4200@0000]0@<010000?01100400009`7oo`<0000N00P0003j0P00 4`00030D20440101g17<2OPAd0X`4M`:J17/2YPB00[84Q`:m18h2b0BF0]44W`;I1:T2 h@Bc0^L4_P;/1V1603VPAU0hh4J@>116`3L`A^0g84J0=o16H3 S0AS0iL4G`>S15/3[@AE0kL4C`?114P3b@A00m44>0?H12l3gP@U0n<470?W1143 jP@70n/4o0;/1?02j`CT0^T4f0;V1<`2h@C10]/4]`;E1:d2c@BT0/@4V`:j19<2 [`B<0Z@4QP:H1842R`Am0Wh4NP9f17T2M`Ac0WT4P`9Q17@2N`AZ0WT4P`840000 1P4100@0000]0@<0100002d10P040000l04000@0000W0Ooo0`0001h020000?X2 000C0000T0ld2100002d1 0P040000;@4300@0003`0@00100002L1oolL0000n`:]o`000000090100000P10 019CNFeRKf`00000000000000000000000000000000000@0000]0@00100002h1 600400000P4100D000090_lcV@8<0000I0PX0000b2Q43X0D20000>R0C01<0100002h1 00040000;@4600@0003`0@0070000?/2_Ol00000002@0@000000@00R@G9YHF`0 0000000000000000000000000000000000040000;@4000@0000^0AP010000081 0@0500002@;oL1PD0001QKVM/IFDU02D09@0?02D0100002h1 00040000;@4600@0003`0@0070000?/2[Ol00000002l0P000000@00R@G9YHF`0 0000000000000000000000000000000000040000;@4000@0000^0AP010000081 0@0500002@8000023@00038:4P5j10@00016K6mg<`0G03<0@P040000;P4000@0 000]0@H010000?01000L0000n`:]o`0000000;`2000000100291LVUQK0000000 000000000000000000000000000000@0000]0@00100002h1600400000P4100D0 00090P00008=0000?m:0000002@0@0000870P0@DgU]HVm/00000000000000000000000000000000 00040000;@4700@0003`0@P02@00038:F`IM1`40000XAbT070000?/2>?m:0000 002@0@0000870P0@DgU]HVm/0000000000000000000000000000000000040000 ;@4800@0003`0@L02@00038:F`Kh1`40000YAbT070000?/20?m:0000002@0@00 00870P0@DgU]HVm/0000000000000000000000000000000000040000;@4700@0 003`0@P02@00038:FPJ^1P40000XAbT070000?/20?m:0000002@0@0000870P0@ DgU]HVm/0000000000000000000000000000000000040000;@4800@0003`0@L0 2@00038:FPI?2040000YAbT070000?/2Fom:0000002@0@0000870P0@DgU]HVm/ 0000000000000000000000000000000000040000;@4700@0003`0@P02@00038: 9POH0`40000XAbT070000?/2Fom:0000002@0@0000870P0@DgU]HVm/00000000 00000000000000000000000000040000;@4800@0003`0@L02@00038:9PM01040 000YAbT070000?/2Fom:0000002@0@0000870P0@DgU]HVm/0000000000000000 000000000000000000040000;@4700@0003`0@P02@00038:9PMB1@40000XAbT0 70000?/2Fom:0000002@0@0000870P0@DgU]HVm/000000000000000000000000 0000000000040000;@4800@0003`0@L02@00038:9PNj1@40000YAbT070000?/2 Fom:0000002@0@0000870P0@DgU]HVm/00000000000000000000000000000000 00040000;@4700@0003`0@P02@00038:9PL92040000XAbT070000?/2Fom:0000 002@0@0000870P0@DgU]HVm/0000000000000000000000000000000000040000 ;@4800@0003`0@L02@00038:9PN>2040000YAbT070000?/2Pol00000002@0@00 00870P0@DgU]HVm/0000000000000000000000000000000000040000;@4700@0 003`0@P02@00038:80M20`40003_Ach02@00038:A@M20`40003^Ach02@00038: HPI20`40003_Ach02@00038:`0I20`40003]Ach02@00038:>`I20`40003/Ach0 2@00038:9`O:2040000mAdD02@00038:9`L^2040002UAeT02@00038:9`Of1@40 000mAdD02@00038:9`Ml1040000mAdD02@00038:F`J12040000mAdD02@00038: F`H51`40000]AdD02@00038:F`K[1@40000[AdD02@00038:F`IB1040000[AdD0 70000?/2Pol00000002@0@0000070P0@E6U]IGC6<0@0000]0@L0 10000?01000400009`7oo`@0000W0Ooo70000?/2[Ol00000002l0P000000@00R @G9YHF`00000000000000000000000000000000000040000;@4000@0000^0AP0 100000810@0500002@8000024P00038:lP@410L00016HFa[KVEb03<0;P0G02h0 <`0^0200100002h100040000;@4600@0003`0@0070000?/2[Ol00000002l0P00 0000@00R@G9YHF`00000000000000000000000000000000000040000;@4000@0 000^0AP0100000810@0500002@8000022@00038:lP@[1@40000]Aad0100002h1 00040000;@4600@0003`0@0070000?/2[Ol00000002l0P000000@00R@G9YHF`0 0000000000000000000000000000000000040000;@4000@0000^0AP010000081 0@0500002@8000023@00038:lPA81@@0001CJf5^=`0^02h0<`040000;P4000@0 000]0@H010000?01000L0000n`:]o`0000000;`2000000100291LVUQK0000000 000000000000000000000000000000@0000]0@00100002h1600400000P4100D0 00090P00008F00000D203/0 10120TH3J`970i<2B@>W0T/3^P9=0ld2C`?O0U43l@9D0`83E`A0hD3V`<\>"], "Graphics", ImageSize->{421, 315.75}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}], Cell[TextData[{ StyleBox["Acknowledgement:", FontSize->18], " The governing equation is taken from ", StyleBox["Analysis of Transport Phenomena, William M. Deen, OUP, 1998", FontVariations->{"CompatibilityType"->0}], StyleBox[".", FontFamily->"Arial"] }], "Subsubtitle", Background->RGBColor[0.792157, 1, 1]], Cell[CellGroupData[{ Cell[TextData[StyleBox["case 1 : \[Beta]=0. The Blasius equation is \ recovered.", FontWeight->"Bold", FontColor->RGBColor[0, 0, 1]]], "Subsubtitle", Background->RGBColor[1, 1, 0.717647]], Cell[BoxData[ \(sol[\[Xi]_] := NDSolve[{D[f[\[Eta]], {\[Eta], 3}] + f[\[Eta]]\ \(f''\)[\[Eta]] + \[Beta]\ \((1 - \((\(f'\)[\[Eta]])\ \)^2)\) \[Equal] 0, f[0] \[Equal] \ 0, \(f'\)[0] \[Equal] \ 0, \(f''\)[0] \[Equal] \ \[Xi]}, {f[\[Eta]]}, {\[Eta], 0, 5}]\)], "Input"], Cell[BoxData[ \(\(\[Beta] = 0;\)\)], "Input"], Cell[BoxData[ \(DFEnd[\[Xi]_?NumericQ] := D[f[\[Eta]] /. sol[\[Xi]], {\[Eta], 1}] /. \[Eta] \[Rule] 5\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(SOL1 = FindRoot[DFEnd[\[Xi]] \[Equal] \ 1, {\[Xi], 0.5}]\)], "Input"], Cell[BoxData[ \({\[Xi] \[Rule] 0.4696451434767958`}\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(plt1 = Plot[Evaluate[ D[f[\[Eta]] /. sol[\[Xi] /. SOL1], {\[Eta], 1}]], {\[Eta], 0, 5}, PlotStyle \[Rule] Hue[1/5], PlotRange \[Rule] All]\)], "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.0238095 0.190476 0.014715 0.588604 [ [.21429 .00222 -3 -9 ] [.21429 .00222 3 0 ] [.40476 .00222 -3 -9 ] [.40476 .00222 3 0 ] [.59524 .00222 -3 -9 ] [.59524 .00222 3 0 ] [.78571 .00222 -3 -9 ] [.78571 .00222 3 0 ] [.97619 .00222 -3 -9 ] [.97619 .00222 3 0 ] [.01131 .13244 -18 -4.5 ] [.01131 .13244 0 4.5 ] [.01131 .25016 -18 -4.5 ] [.01131 .25016 0 4.5 ] [.01131 .36788 -18 -4.5 ] [.01131 .36788 0 4.5 ] [.01131 .4856 -18 -4.5 ] [.01131 .4856 0 4.5 ] [.01131 .60332 -6 -4.5 ] [.01131 .60332 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .21429 .01472 m .21429 .02097 L s [(1)] .21429 .00222 0 1 Mshowa .40476 .01472 m .40476 .02097 L s [(2)] .40476 .00222 0 1 Mshowa .59524 .01472 m .59524 .02097 L s [(3)] .59524 .00222 0 1 Mshowa .78571 .01472 m .78571 .02097 L s [(4)] .78571 .00222 0 1 Mshowa .97619 .01472 m .97619 .02097 L s [(5)] .97619 .00222 0 1 Mshowa .125 Mabswid .0619 .01472 m .0619 .01847 L s .1 .01472 m .1 .01847 L s .1381 .01472 m .1381 .01847 L s .17619 .01472 m .17619 .01847 L s .25238 .01472 m .25238 .01847 L s .29048 .01472 m .29048 .01847 L s .32857 .01472 m .32857 .01847 L s .36667 .01472 m .36667 .01847 L s .44286 .01472 m .44286 .01847 L s .48095 .01472 m .48095 .01847 L s .51905 .01472 m .51905 .01847 L s .55714 .01472 m .55714 .01847 L s .63333 .01472 m .63333 .01847 L s .67143 .01472 m .67143 .01847 L s .70952 .01472 m .70952 .01847 L s .74762 .01472 m .74762 .01847 L s .82381 .01472 m .82381 .01847 L s .8619 .01472 m .8619 .01847 L s .9 .01472 m .9 .01847 L s .9381 .01472 m .9381 .01847 L s .25 Mabswid 0 .01472 m 1 .01472 L s .02381 .13244 m .03006 .13244 L s [(0.2)] .01131 .13244 1 0 Mshowa .02381 .25016 m .03006 .25016 L s [(0.4)] .01131 .25016 1 0 Mshowa .02381 .36788 m .03006 .36788 L s [(0.6)] .01131 .36788 1 0 Mshowa .02381 .4856 m .03006 .4856 L s [(0.8)] .01131 .4856 1 0 Mshowa .02381 .60332 m .03006 .60332 L s [(1)] .01131 .60332 1 0 Mshowa .125 Mabswid .02381 .04415 m .02756 .04415 L s .02381 .07358 m .02756 .07358 L s .02381 .10301 m .02756 .10301 L s .02381 .16187 m .02756 .16187 L s .02381 .1913 m .02756 .1913 L s .02381 .22073 m .02756 .22073 L s .02381 .27959 m .02756 .27959 L s .02381 .30902 m .02756 .30902 L s .02381 .33845 m .02756 .33845 L s .02381 .39731 m .02756 .39731 L s .02381 .42674 m .02756 .42674 L s .02381 .45617 m .02756 .45617 L s .02381 .51503 m .02756 .51503 L s .02381 .54446 m .02756 .54446 L s .02381 .57389 m .02756 .57389 L s .25 Mabswid .02381 0 m .02381 .61803 L s .8 1 0 r .5 Mabswid .02381 .01472 m .06244 .07078 L .10458 .13176 L .14415 .18851 L .18221 .24205 L .22272 .29713 L .26171 .34742 L .30316 .39691 L .34309 .43985 L .3815 .47609 L .42237 .5088 L .46172 .53454 L .49955 .55419 L .53984 .57015 L .57861 .58138 L .59975 .58607 L .61984 .58973 L .65803 .59491 L .6777 .59685 L .69867 .59848 L .72009 .59976 L .74026 .60069 L .76033 .60139 L .77881 .60189 L .79763 .60228 L .81829 .60259 L .8378 .60281 L .85872 .60298 L .86889 .60304 L .87996 .6031 L .88952 .60314 L .90008 .60318 L .91985 .60324 L .93069 .60326 L .94086 .60328 L .95929 .6033 L .97619 .60332 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg0?ooo`030l0oooo000E0?ooo`030000003oool0oooo01L0oooo00<0c?l00?oo o`3oool0kP3oool001D0oooo00<000000?ooo`3oool05`3oool00`3d0oooo000E0?ooo`8000006P3o ool00`3/0oooo000E0?ooo`030000003oool0oooo01X0oooo00<0c?l00?ooo`3oool0j`3oool001D0 oooo00<000000?ooo`3oool06`3oool00`3T0oooo000E0?ooo`030000003oool0oooo01d0oooo00<0 c?l00?ooo`3oool0j03oool001D0oooo00<000000?ooo`3oool07@3oool00`3L0oooo000E0?ooo`80 0000803oool00`3H0oooo000E0?ooo`030000003oool0oooo0200oooo00<0c?l00?ooo`3oool0i@3o ool001D0oooo00<000000?ooo`3oool08@3oool00`3@0oooo000E0?ooo`030000003oool0oooo0280 oooo00<0c?l00?ooo`3oool0h`3oool001D0oooo00<000000?ooo`3oool08`3oool00`380oooo000E 0?ooo`8000009@3oool00`300oooo000E0?ooo`030000003oool0oooo02D0oooo00<0c?l00?ooo`3o ool0h03oool001D0oooo00<000000?ooo`3oool09P3oool00`30?oo o`005@3oool00`000000oooo0?ooo`0h0?ooo`030P3o ool00`30?ooo`03 0"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-0.414926, -0.0774698, \ 0.019309, 0.00624851}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[StyleBox["case 2 : \[Beta]=0.4", FontWeight->"Bold", FontColor->RGBColor[0, 0, 1]]], "Subsubtitle", Background->RGBColor[1, 1, 0.717647]], Cell[BoxData[ \(\(\[Beta] = 0.4;\)\)], "Input"], Cell[BoxData[ \(DFEnd[\[Xi]_?NumericQ] := D[f[\[Eta]] /. sol[\[Xi]], {\[Eta], 1}] /. \[Eta] \[Rule] 5\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(SOL2 = FindRoot[DFEnd[\[Xi]] \[Equal] \ 1, {\[Xi], 0.5}]\)], "Input"], Cell[BoxData[ \({\[Xi] \[Rule] 0.854422218768468`}\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(plt2 = Plot[Evaluate[ D[f[\[Eta]] /. sol[\[Xi] /. SOL2], {\[Eta], 1}]], {\[Eta], 0, 5}, PlotStyle \[Rule] Hue[2/5], PlotRange \[Rule] All]\)], "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.0238095 0.190476 0.014715 0.588604 [ [.21429 .00221 -3 -9 ] [.21429 .00221 3 0 ] [.40476 .00221 -3 -9 ] [.40476 .00221 3 0 ] [.59524 .00221 -3 -9 ] [.59524 .00221 3 0 ] [.78571 .00221 -3 -9 ] [.78571 .00221 3 0 ] [.97619 .00221 -3 -9 ] [.97619 .00221 3 0 ] [.01131 .13244 -18 -4.5 ] [.01131 .13244 0 4.5 ] [.01131 .25016 -18 -4.5 ] [.01131 .25016 0 4.5 ] [.01131 .36788 -18 -4.5 ] [.01131 .36788 0 4.5 ] [.01131 .4856 -18 -4.5 ] [.01131 .4856 0 4.5 ] [.01131 .60332 -6 -4.5 ] [.01131 .60332 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .21429 .01471 m .21429 .02096 L s [(1)] .21429 .00221 0 1 Mshowa .40476 .01471 m .40476 .02096 L s [(2)] .40476 .00221 0 1 Mshowa .59524 .01471 m .59524 .02096 L s [(3)] .59524 .00221 0 1 Mshowa .78571 .01471 m .78571 .02096 L s [(4)] .78571 .00221 0 1 Mshowa .97619 .01471 m .97619 .02096 L s [(5)] .97619 .00221 0 1 Mshowa .125 Mabswid .0619 .01471 m .0619 .01846 L s .1 .01471 m .1 .01846 L s .1381 .01471 m .1381 .01846 L s .17619 .01471 m .17619 .01846 L s .25238 .01471 m .25238 .01846 L s .29048 .01471 m .29048 .01846 L s .32857 .01471 m .32857 .01846 L s .36667 .01471 m .36667 .01846 L s .44286 .01471 m .44286 .01846 L s .48095 .01471 m .48095 .01846 L s .51905 .01471 m .51905 .01846 L s .55714 .01471 m .55714 .01846 L s .63333 .01471 m .63333 .01846 L s .67143 .01471 m .67143 .01846 L s .70952 .01471 m .70952 .01846 L s .74762 .01471 m .74762 .01846 L s .82381 .01471 m .82381 .01846 L s .8619 .01471 m .8619 .01846 L s .9 .01471 m .9 .01846 L s .9381 .01471 m .9381 .01846 L s .25 Mabswid 0 .01471 m 1 .01471 L s .02381 .13244 m .03006 .13244 L s [(0.2)] .01131 .13244 1 0 Mshowa .02381 .25016 m .03006 .25016 L s [(0.4)] .01131 .25016 1 0 Mshowa .02381 .36788 m .03006 .36788 L s [(0.6)] .01131 .36788 1 0 Mshowa .02381 .4856 m .03006 .4856 L s [(0.8)] .01131 .4856 1 0 Mshowa .02381 .60332 m .03006 .60332 L s [(1)] .01131 .60332 1 0 Mshowa .125 Mabswid .02381 .04415 m .02756 .04415 L s .02381 .07358 m .02756 .07358 L s .02381 .10301 m .02756 .10301 L s .02381 .16187 m .02756 .16187 L s .02381 .1913 m .02756 .1913 L s .02381 .22073 m .02756 .22073 L s .02381 .27959 m .02756 .27959 L s .02381 .30902 m .02756 .30902 L s .02381 .33845 m .02756 .33845 L s .02381 .39731 m .02756 .39731 L s .02381 .42674 m .02756 .42674 L s .02381 .45617 m .02756 .45617 L s .02381 .51503 m .02756 .51503 L s .02381 .54446 m .02756 .54446 L s .02381 .57389 m .02756 .57389 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 1 .4 r .5 Mabswid .02381 .01472 m .06244 .11188 L .10458 .20673 L .14415 .28515 L .18221 .35082 L .22272 .41035 L .26171 .45791 L .30316 .49865 L .34309 .52926 L .3815 .55171 L .42237 .56929 L .44268 .576 L .46172 .58126 L .49955 .58923 L .5198 .59237 L .53832 .5947 L .55892 .59677 L .57803 .59829 L .59652 .59946 L .61623 .60043 L .63764 .60123 L .65781 .60179 L .67789 .60222 L .69636 .60251 L .71518 .60273 L .73585 .60291 L .75536 .60303 L .77627 .60312 L .78644 .60316 L .79751 .60319 L .80707 .60321 L .81763 .60323 L .83741 .60326 L .84824 .60327 L .85841 .60328 L .86824 .60329 L .8786 .6033 L .8971 .6033 L .90664 .60331 L .91684 .60331 L .93521 .60331 L .94532 .60332 L .95629 .60332 L .97619 .60332 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg0?ooo`03003oIP3oool0oooo0?L0oooo000E0?ooo`030000003oool0 oooo00h0oooo00<00?mV0?ooo`3oool0m`3oool001D0oooo00<000000?ooo`3oool03`3oool00`00 ofH0oooo0?ooo`3f0?ooo`005@3oool00`000000oooo0?ooo`0?0?ooo`03003oIP3oool0oooo0?H0 oooo000E0?ooo`030000003oool0oooo0100oooo00<00?mV0?ooo`3oool0m@3oool001D0oooo00<0 00000?ooo`3oool0403oool00`00ofH0oooo0?ooo`3e0?ooo`005@3oool00`000000oooo0?ooo`0A 0?ooo`03003oIP3oool0oooo0?@0oooo000E0?ooo`8000004P3oool00`00ofH0oooo0?ooo`3d0?oo o`005@3oool00`000000oooo0?ooo`0B0?ooo`03003oIP3oool0oooo0?<0oooo000E0?ooo`030000 003oool0oooo0180oooo00<00?mV0?ooo`3oool0l`3oool001D0oooo00<000000?ooo`3oool04`3o ool00`00ofH0oooo0?ooo`3b0?ooo`005@3oool00`000000oooo0?ooo`0C0?ooo`03003oIP3oool0 oooo0?80oooo000E0?ooo`030000003oool0oooo01@0oooo00<00?mV0?ooo`3oool0l@3oool001D0 oooo00<000000?ooo`3oool0503oool00`00ofH0oooo0?ooo`3a0?ooo`005@3oool00`000000oooo 0?ooo`0E0?ooo`03003oIP3oool0oooo0?00oooo000E0?ooo`8000005P3oool00`00ofH0oooo0?oo o`3`0?ooo`005@3oool00`000000oooo0?ooo`0F0?ooo`03003oIP3oool0oooo0>l0oooo000E0?oo o`030000003oool0oooo01H0oooo00<00?mV0?ooo`3oool0k`3oool001D0oooo00<000000?ooo`3o ool05`3oool00`00ofH0oooo0?ooo`3^0?ooo`005@3oool00`000000oooo0?ooo`0G0?ooo`03003o IP3oool0oooo0>h0oooo000E0?ooo`030000003oool0oooo01P0oooo00<00?mV0?ooo`3oool0k@3o ool00080oooo0P0000040?ooo`8000001@3oool3000000<0oooo00<000000?ooo`3oool0603oool0 0`00ofH0oooo0?ooo`3]0?ooo`0000D0oooo0000003oool0oooo0000000;0?ooo`030000003oool0 oooo0080oooo00<000000?ooo`3oool06@3oool00`00ofH0oooo0?ooo`3/0?ooo`0000D0oooo0000 003oool0oooo000000080?ooo`D000000`3oool3000001T0oooo00<00?mV0?ooo`3oool0k03oool0 00050?ooo`000000oooo0?ooo`000000203oool010000000oooo0?ooo`0000040?ooo`030000003o ool0oooo01X0oooo00<00?mV0?ooo`3oool0j`3oool000050?ooo`000000oooo0?ooo`0000002@3o ool00`000000oooo000000040?ooo`030000003oool0oooo01X0oooo00<00?mV0?ooo`3oool0j`3o ool00080oooo0P00000;0?ooo`800000103oool00`000000oooo0?ooo`0K0?ooo`03003oIP3oool0 oooo0>X0oooo000E0?ooo`030000003oool0oooo01/0oooo00<00?mV0?ooo`3oool0jP3oool001D0 oooo00<000000?ooo`3oool0703oool00`00ofH0oooo0?ooo`3Y0?ooo`005@3oool00`000000oooo 0?ooo`0L0?ooo`03003oIP3oool0oooo0>T0oooo000E0?ooo`030000003oool0oooo01d0oooo00<0 0?mV0?ooo`3oool0j03oool001D0oooo0P00000N0?ooo`03003oIP3oool0oooo0>P0oooo000E0?oo o`030000003oool0oooo01h0oooo00<00?mV0?ooo`3oool0i`3oool001D0oooo00<000000?ooo`3o ool07`3oool00`00ofH0oooo0?ooo`3V0?ooo`005@3oool00`000000oooo0?ooo`0O0?ooo`03003o IP3oool0oooo0>H0oooo000E0?ooo`030000003oool0oooo0200oooo00<00?mV0?ooo`3oool0i@3o ool001D0oooo00<000000?ooo`3oool0803oool00`00ofH0oooo0?ooo`3U0?ooo`005@3oool00`00 0000oooo0?ooo`0Q0?ooo`03003oIP3oool0oooo0>@0oooo000E0?ooo`030000003oool0oooo0240 oooo00<00?mV0?ooo`3oool0i03oool001D0oooo0P00000S0?ooo`03003oIP3oool0oooo0><0oooo 000E0?ooo`030000003oool0oooo0280oooo00<00?mV0?ooo`3oool0h`3oool001D0oooo00<00000 0?ooo`3oool08`3oool00`00ofH0oooo0?ooo`3R0?ooo`005@3oool00`000000oooo0?ooo`0T0?oo o`03003oIP3oool0oooo0>40oooo000E0?ooo`030000003oool0oooo02@0oooo00<00?mV0?ooo`3o ool0h@3oool001D0oooo00<000000?ooo`3oool09@3oool00`00ofH0oooo0?ooo`3P0?ooo`005@3o ool00`000000oooo0?ooo`0U0?ooo`03003oIP3oool0oooo0>00oooo000E0?ooo`030000003oool0 oooo02H0oooo00<00?mV0?ooo`3oool0g`3oool001D0oooo0P00000W0?ooo`03003oIP3oool0oooo 0=l0oooo000E0?ooo`030000003oool0oooo02L0oooo00<00?mV0?ooo`3oool0gP3oool001D0oooo 00<000000?ooo`3oool09`3oool00`00ofH0oooo0?ooo`3N0?ooo`005@3oool00`000000oooo0?oo o`0X0?ooo`03003oIP3oool0oooo0=d0oooo000E0?ooo`030000003oool0oooo02T0oooo00<00?mV 0?ooo`3oool0g03oool001D0oooo00<000000?ooo`3oool0:@3oool00`00ofH0oooo0?ooo`3L0?oo o`000P3oool2000000@0oooo0P0000030?ooo`<000001@3oool00`000000oooo0?ooo`0Z0?ooo`03 003oIP3oool0oooo0=/0oooo00001@3oool000000?ooo`3oool0000000P0oooo00@000000?ooo`3o ool00000103oool00`000000oooo0?ooo`0[0?ooo`03003oIP3oool0oooo0=X0oooo00001@3oool0 00000?ooo`3oool0000000P0oooo00@000000?ooo`3oool00000103oool3000002/0oooo00<00?mV 0?ooo`3oool0fP3oool000050?ooo`000000oooo0?ooo`000000203oool3000000D0oooo00<00000 0?ooo`3oool0;03oool00`00ofH0oooo0?ooo`3I0?ooo`0000D0oooo0000003oool0oooo00000009 0?ooo`030000003oool0oooo00@0oooo00<000000?ooo`3oool0;@3oool00`00ofH0oooo0?ooo`3H 0?ooo`000P3oool2000000X0oooo0`0000040?ooo`030000003oool0oooo02d0oooo00<00?mV0?oo o`3oool0f03oool001D0oooo00<000000?ooo`3oool0;P3oool00`00ofH0oooo0?ooo`3G0?ooo`00 5@3oool00`000000oooo0?ooo`0^0?ooo`03003oIP3oool0oooo0=L0oooo000E0?ooo`030000003o ool0oooo02l0oooo00<00?mV0?ooo`3oool0eP3oool001D0oooo00<000000?ooo`3oool0<03oool0 0`00ofH0oooo0?ooo`3E0?ooo`005@3oool200000340oooo00<00?mV0?ooo`3oool0e@3oool001D0 oooo00<000000?ooo`3oool0<@3oool00`00ofH0oooo0?ooo`3D0?ooo`005@3oool00`000000oooo 0?ooo`0b0?ooo`03003oIP3oool0oooo0=<0oooo000E0?ooo`030000003oool0oooo0380oooo00<0 0?mV0?ooo`3oool0d`3oool001D0oooo00<000000?ooo`3oool0<`3oool00`00ofH0oooo0?ooo`3B 0?ooo`005@3oool00`000000oooo0?ooo`0d0?ooo`03003oIP3oool0oooo0=40oooo000E0?ooo`03 0000003oool0oooo03D0oooo00<00?mV0?ooo`3oool0d03oool001D0oooo00<000000?ooo`3oool0 =P3oool00`00ofH0oooo0?ooo`3?0?ooo`005@3oool2000003P0oooo00<00?mV0?ooo`3oool0cP3o ool001D0oooo00<000000?ooo`3oool0>03oool00`00ofH0oooo0?ooo`3=0?ooo`005@3oool00`00 0000oooo0?ooo`0h0?ooo`03003oIP3oool0oooo0P3oool00`00ofH0oooo 0?ooo`3;0?ooo`005@3oool00`000000oooo0?ooo`0k0?ooo`03003oIP3oool0oooo0"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-0.414975, -0.0774878, \ 0.0193093, 0.00624861}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[StyleBox["case 3 : \[Beta]=-0.199", FontWeight->"Bold", FontColor->RGBColor[0, 0, 1]]], "Subsubtitle", Background->RGBColor[1, 1, 0.717647]], Cell[BoxData[ \(\(\[Beta] = \(-0.199\);\)\)], "Input"], Cell[BoxData[ \(sol[\[Xi]_] := NDSolve[{D[f[\[Eta]], {\[Eta], 3}] + f[\[Eta]]\ \(f''\)[\[Eta]] + \[Beta]\ \((1 - \((\(f'\)[\[Eta]])\ \)^2)\) \[Equal] 0, f[0] \[Equal] \ 0, \(f'\)[0] \[Equal] \ 0, \(f''\)[0] \[Equal] \ \[Xi]}, {f[\[Eta]]}, {\[Eta], 0, 5}]\)], "Input"], Cell[BoxData[ \(DFEnd[\[Xi]_?NumericQ] := D[f[\[Eta]] /. sol[\[Xi]], {\[Eta], 1}] /. \[Eta] \[Rule] 5\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(SOL3 = FindRoot[DFEnd[\[Xi]] \[Equal] \ 1, {\[Xi], 0.5}]\)], "Input"], Cell[BoxData[ \({\[Xi] \[Rule] 0.038223502338509734`}\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(plt3 = Plot[Evaluate[ D[f[\[Eta]] /. sol[\[Xi] /. SOL3], {\[Eta], 1}]], {\[Eta], 0, 5}, PlotStyle \[Rule] Hue[3/5], PlotRange \[Rule] All]\)], "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.0238095 0.190476 0.0147151 0.588604 [ [.21429 .00222 -3 -9 ] [.21429 .00222 3 0 ] [.40476 .00222 -3 -9 ] [.40476 .00222 3 0 ] [.59524 .00222 -3 -9 ] [.59524 .00222 3 0 ] [.78571 .00222 -3 -9 ] [.78571 .00222 3 0 ] [.97619 .00222 -3 -9 ] [.97619 .00222 3 0 ] [.01131 .13244 -18 -4.5 ] [.01131 .13244 0 4.5 ] [.01131 .25016 -18 -4.5 ] [.01131 .25016 0 4.5 ] [.01131 .36788 -18 -4.5 ] [.01131 .36788 0 4.5 ] [.01131 .4856 -18 -4.5 ] [.01131 .4856 0 4.5 ] [.01131 .60332 -6 -4.5 ] [.01131 .60332 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .21429 .01472 m .21429 .02097 L s [(1)] .21429 .00222 0 1 Mshowa .40476 .01472 m .40476 .02097 L s [(2)] .40476 .00222 0 1 Mshowa .59524 .01472 m .59524 .02097 L s [(3)] .59524 .00222 0 1 Mshowa .78571 .01472 m .78571 .02097 L s [(4)] .78571 .00222 0 1 Mshowa .97619 .01472 m .97619 .02097 L s [(5)] .97619 .00222 0 1 Mshowa .125 Mabswid .0619 .01472 m .0619 .01847 L s .1 .01472 m .1 .01847 L s .1381 .01472 m .1381 .01847 L s .17619 .01472 m .17619 .01847 L s .25238 .01472 m .25238 .01847 L s .29048 .01472 m .29048 .01847 L s .32857 .01472 m .32857 .01847 L s .36667 .01472 m .36667 .01847 L s .44286 .01472 m .44286 .01847 L s .48095 .01472 m .48095 .01847 L s .51905 .01472 m .51905 .01847 L s .55714 .01472 m .55714 .01847 L s .63333 .01472 m .63333 .01847 L s .67143 .01472 m .67143 .01847 L s .70952 .01472 m .70952 .01847 L s .74762 .01472 m .74762 .01847 L s .82381 .01472 m .82381 .01847 L s .8619 .01472 m .8619 .01847 L s .9 .01472 m .9 .01847 L s .9381 .01472 m .9381 .01847 L s .25 Mabswid 0 .01472 m 1 .01472 L s .02381 .13244 m .03006 .13244 L s [(0.2)] .01131 .13244 1 0 Mshowa .02381 .25016 m .03006 .25016 L s [(0.4)] .01131 .25016 1 0 Mshowa .02381 .36788 m .03006 .36788 L s [(0.6)] .01131 .36788 1 0 Mshowa .02381 .4856 m .03006 .4856 L s [(0.8)] .01131 .4856 1 0 Mshowa .02381 .60332 m .03006 .60332 L s [(1)] .01131 .60332 1 0 Mshowa .125 Mabswid .02381 .04415 m .02756 .04415 L s .02381 .07358 m .02756 .07358 L s .02381 .10301 m .02756 .10301 L s .02381 .16187 m .02756 .16187 L s .02381 .1913 m .02756 .1913 L s .02381 .22073 m .02756 .22073 L s .02381 .27959 m .02756 .27959 L s .02381 .30902 m .02756 .30902 L s .02381 .33845 m .02756 .33845 L s .02381 .39731 m .02756 .39731 L s .02381 .42674 m .02756 .42674 L s .02381 .45617 m .02756 .45617 L s .02381 .51503 m .02756 .51503 L s .02381 .54446 m .02756 .54446 L s .02381 .57389 m .02756 .57389 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 .4 1 r .5 Mabswid .02381 .01472 m .04262 .01751 L .06244 .02169 L .08255 .02722 L .10458 .03478 L .14509 .05274 L .18408 .07494 L .22553 .10367 L .26546 .13607 L .30387 .17121 L .34474 .21223 L .38409 .25443 L .42192 .29653 L .46221 .34175 L .50098 .38437 L .54221 .42726 L .58192 .46494 L .62011 .49692 L .66075 .52575 L .69988 .54826 L .74147 .56679 L .78153 .57994 L .82008 .58895 L .84002 .59246 L .86109 .59545 L .89906 .59935 L .91857 .60076 L .93948 .60193 L .95833 .60273 L .97619 .60332 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg@3oool00`00I_l0oooo0?ooo`3< 0?ooo`005@3oool00`000000oooo0?ooo`0j0?ooo`03001Vo`3oool0oooo00?ooo`8000001@3oool00`000000oooo0?ooo`3o0?ooo`T0 oooo000E0?ooo`030000003oool0oooo0?l0oooo2@3oool00001\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-0.414926, -0.07747, \ 0.019309, 0.00624851}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[StyleBox["case 4 : \[Beta]=1.0", FontWeight->"Bold", FontColor->RGBColor[0, 0, 1]]], "Subsubtitle", Background->RGBColor[1, 1, 0.717647]], Cell[BoxData[ \(\(\[Beta] = 1;\)\)], "Input"], Cell[BoxData[ \(sol[\[Xi]_] := NDSolve[{D[f[\[Eta]], {\[Eta], 3}] + f[\[Eta]]\ \(f''\)[\[Eta]] + \[Beta]\ \((1 - \((\(f'\)[\[Eta]])\ \)^2)\) \[Equal] 0, f[0] \[Equal] \ 0, \(f'\)[0] \[Equal] \ 0, \(f''\)[0] \[Equal] \ \[Xi]}, {f[\[Eta]]}, {\[Eta], 0, 3}]\)], "Input"], Cell[BoxData[ \(DFEnd[\[Xi]_?NumericQ] := D[f[\[Eta]] /. sol[\[Xi]], {\[Eta], 1}] /. \[Eta] \[Rule] 3\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(SOL4 = FindRoot[DFEnd[\[Xi]] \[Equal] \ 1, {\[Xi], 0.5}]\)], "Input"], Cell[BoxData[ \({\[Xi] \[Rule] 1.2328155712258004`}\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(plt4 = Plot[Evaluate[ D[f[\[Eta]] /. sol[\[Xi] /. SOL4], {\[Eta], 1}]], {\[Eta], 0, 3}, PlotStyle \[Rule] Hue[4/5], PlotRange \[Rule] All]\)], "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.0238095 0.31746 0.014715 0.588604 [ [.18254 .00222 -9 -9 ] [.18254 .00222 9 0 ] [.34127 .00222 -3 -9 ] [.34127 .00222 3 0 ] [.5 .00222 -9 -9 ] [.5 .00222 9 0 ] [.65873 .00222 -3 -9 ] [.65873 .00222 3 0 ] [.81746 .00222 -9 -9 ] [.81746 .00222 9 0 ] [.97619 .00222 -3 -9 ] [.97619 .00222 3 0 ] [.01131 .13244 -18 -4.5 ] [.01131 .13244 0 4.5 ] [.01131 .25016 -18 -4.5 ] [.01131 .25016 0 4.5 ] [.01131 .36788 -18 -4.5 ] [.01131 .36788 0 4.5 ] [.01131 .4856 -18 -4.5 ] [.01131 .4856 0 4.5 ] [.01131 .60332 -6 -4.5 ] [.01131 .60332 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .18254 .01472 m .18254 .02097 L s [(0.5)] .18254 .00222 0 1 Mshowa .34127 .01472 m .34127 .02097 L s [(1)] .34127 .00222 0 1 Mshowa .5 .01472 m .5 .02097 L s [(1.5)] .5 .00222 0 1 Mshowa .65873 .01472 m .65873 .02097 L s [(2)] .65873 .00222 0 1 Mshowa .81746 .01472 m .81746 .02097 L s [(2.5)] .81746 .00222 0 1 Mshowa .97619 .01472 m .97619 .02097 L s [(3)] .97619 .00222 0 1 Mshowa .125 Mabswid .05556 .01472 m .05556 .01847 L s .0873 .01472 m .0873 .01847 L s .11905 .01472 m .11905 .01847 L s .15079 .01472 m .15079 .01847 L s .21429 .01472 m .21429 .01847 L s .24603 .01472 m .24603 .01847 L s .27778 .01472 m .27778 .01847 L s .30952 .01472 m .30952 .01847 L s .37302 .01472 m .37302 .01847 L s .40476 .01472 m .40476 .01847 L s .43651 .01472 m .43651 .01847 L s .46825 .01472 m .46825 .01847 L s .53175 .01472 m .53175 .01847 L s .56349 .01472 m .56349 .01847 L s .59524 .01472 m .59524 .01847 L s .62698 .01472 m .62698 .01847 L s .69048 .01472 m .69048 .01847 L s .72222 .01472 m .72222 .01847 L s .75397 .01472 m .75397 .01847 L s .78571 .01472 m .78571 .01847 L s .84921 .01472 m .84921 .01847 L s .88095 .01472 m .88095 .01847 L s .9127 .01472 m .9127 .01847 L s .94444 .01472 m .94444 .01847 L s .25 Mabswid 0 .01472 m 1 .01472 L s .02381 .13244 m .03006 .13244 L s [(0.2)] .01131 .13244 1 0 Mshowa .02381 .25016 m .03006 .25016 L s [(0.4)] .01131 .25016 1 0 Mshowa .02381 .36788 m .03006 .36788 L s [(0.6)] .01131 .36788 1 0 Mshowa .02381 .4856 m .03006 .4856 L s [(0.8)] .01131 .4856 1 0 Mshowa .02381 .60332 m .03006 .60332 L s [(1)] .01131 .60332 1 0 Mshowa .125 Mabswid .02381 .04415 m .02756 .04415 L s .02381 .07358 m .02756 .07358 L s .02381 .10301 m .02756 .10301 L s .02381 .16187 m .02756 .16187 L s .02381 .1913 m .02756 .1913 L s .02381 .22073 m .02756 .22073 L s .02381 .27959 m .02756 .27959 L s .02381 .30902 m .02756 .30902 L s .02381 .33845 m .02756 .33845 L s .02381 .39731 m .02756 .39731 L s .02381 .42674 m .02756 .42674 L s .02381 .45617 m .02756 .45617 L s .02381 .51503 m .02756 .51503 L s .02381 .54446 m .02756 .54446 L s .02381 .57389 m .02756 .57389 L s .25 Mabswid .02381 0 m .02381 .61803 L s .8 0 1 r .5 Mabswid .02381 .01472 m .06244 .09868 L .10458 .18043 L .14415 .24818 L .18221 .30547 L .22272 .3585 L .26171 .40239 L .30316 .44202 L .34309 .47405 L .3815 .49981 L .42237 .52244 L .46172 .5402 L .49955 .55408 L .53984 .56594 L .57861 .57499 L .61984 .5825 L .65954 .58806 L .69774 .59219 L .73838 .59552 L .77751 .59792 L .81909 .59981 L .85916 .60114 L .89771 .60208 L .93871 .60282 L .97619 .60332 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg@3oool2000000@0oooo0P0000040?ooo`8000008P3oool500000200oooo1@0000020?oo o`800000103oool2000002<0oooo1000000Q0?ooo`@000000`3oool2000000@0oooo0P00000S0?oo o`8000001`3oool003P0oooo00@000000?ooo`3oool00000203oool010000000oooo0?ooo`00000S 0?ooo`030000003oool0oooo0280oooo00<000000?ooo`3oool01`3oool010000000oooo0?ooo`00 000R0?ooo`030000003oool0oooo0280oooo00<000000?ooo`3oool02@3oool010000000oooo0?oo o`00000Q0?ooo`040000003oool0oooo000000H0oooo000h0?ooo`040000003oool0oooo000000/0 oooo00<000000?ooo`3oool08@3oool00`000000oooo0?ooo`0R0?ooo`030000003oool0oooo00X0 oooo00<000000?ooo`3oool08@3oool00`000000oooo0?ooo`0R0?ooo`030000003oool0oooo00/0 oooo00<000000?ooo`3oool08@3oool00`000000oooo0?ooo`050?ooo`00>03oool010000000oooo 0?ooo`0000090?ooo`800000903oool00`000000oooo0?ooo`0R0?ooo`030000003oool0oooo00P0 oooo0P00000U0?ooo`030000003oool0oooo0280oooo00<000000?ooo`3oool0203oool2000002D0 oooo00<000000?ooo`3oool0103oool003P0oooo00@000000?ooo`3oool000002@3oool00`000000 oooo0?ooo`0S0?ooo`030000003oool0oooo0280oooo00<000000?ooo`3oool0203oool00`000000 oooo0?ooo`0R0?ooo`040000003oool0oooo00000240oooo00@000000?ooo`3oool000002@3oool0 0`000000oooo0?ooo`0Q0?ooo`040000003oool0oooo000000H0oooo000i0?ooo`8000002P3oool3 00000280oooo0P00000S0?ooo`8000002P3oool3000002<0oooo0P00000S0?ooo`8000002P3oool3 00000280oooo0P0000070?ooo`00o`3ooolQ0?ooo`005@3oool00`000000oooo0?ooo`3o0?ooo`T0 oooo000E0?ooo`030000003oool0oooo0?l0oooo2@3oool001D0oooo00<000000?ooo`3oool0o`3o ool90?ooo`005@3oool00`000000oooo0?ooo`3o0?ooo`T0oooo000?0?ooo`H0000000<0c03o0000 00000000o`00000800000040oooo000E0?ooo`030<`0o`3oool0oooo00H0oooo00<000000?ooo`3o ool01@3oool00`000000oooo0?ooo`060?ooo`030000003oool0oooo00H0oooo00<000000?ooo`3o ool01@3oool00`000000oooo0?ooo`060?ooo`030000003oool0oooo00D0oooo00<000000?ooo`3o ool01P3oool00`000000oooo0?ooo`060?ooo`030000003oool0oooo00D0oooo00<000000?ooo`3o ool01P3oool00`000000oooo0?ooo`060?ooo`030000003oool0oooo00D0oooo00<000000?ooo`3o ool01P3oool00`000000oooo0?ooo`050?ooo`030000003oool0oooo00H0oooo00<000000?ooo`3o ool01P3oool00`000000oooo0?ooo`050?ooo`030000003oool0oooo00H0oooo00<000000?ooo`3o ool01P3oool00`000000oooo0?ooo`050?ooo`030000003oool0oooo00H0oooo00<000000?ooo`3o ool01P3oool00`000000oooo0?ooo`050?ooo`030000003oool0oooo00H0oooo00<000000?ooo`3o ool01@3oool00`000000oooo0?ooo`060?ooo`030000003oool0oooo00H0oooo00<000000?ooo`3o ool01@3oool00`000000oooo0?ooo`060?ooo`030000003oool0oooo00D0oooo000E0?ooo`030000 003<0?l0oooo02P0oooo00<000000?ooo`3oool0:03oool00`000000oooo0?ooo`0X0?ooo`030000 003oool0oooo02T0oooo00<000000?ooo`3oool0:03oool00`000000oooo0?ooo`0X0?ooo`030000 003oool0oooo00D0oooo000E0?ooo`030000003<0?l0oooo0?l0oooo2@3oool001D0oooo00<00000 0?ooo`3<0?l0o`3oool90?ooo`005@3oool00`000000oooo0<`0o`3o0?ooo`T0oooo000E0?ooo`04 0000003oool0oooo0<`0ool0oooo203oool001D0oooo00@000000?ooo`3oool0c03oo`3oool80?oo o`005@3oool2000000030?ooo`3<0?l0oooo0?l0oooo1`3oool001D0oooo00D000000?ooo`3oool0 oooo0<`0o`3o0?ooo`L0oooo000E0?ooo`050000003oool0oooo0?ooo`3<0?l0o`3oool70?ooo`00 5@3oool00`000000oooo0?ooo`020?ooo`030<`0o`3oool0oooo0?l0oooo103oool001D0oooo00<0 00000?ooo`3oool00P3oool00`3<0?l0oooo0?ooo`3o0?ooo`@0oooo000E0?ooo`030000003oool0 oooo00<0oooo00<0c03o0?ooo`3oool0o`3oool30?ooo`005@3oool00`000000oooo0?ooo`030?oo o`030<`0o`3oool0oooo0?l0oooo0`3oool001D0oooo00<000000?ooo`3oool0103oool00`3<0?l0 oooo0?ooo`3o0?ooo`80oooo000E0?ooo`8000001@3oool00`3<0?l0oooo0?ooo`3o0?ooo`80oooo 000E0?ooo`030000003oool0oooo00@0oooo00<0c03o0?ooo`3oool0o`3oool20?ooo`005@3oool0 0`000000oooo0?ooo`050?ooo`030<`0o`3oool0oooo0?l0oooo0@3oool001D0oooo00<000000?oo o`3oool01@3oool00`3<0?l0oooo0?ooo`3o0?ooo`40oooo000E0?ooo`030000003oool0oooo00H0 oooo00<0c03o0?ooo`3oool0o`3oool001D0oooo00<000000?ooo`3oool01P3oool00`3<0?l0oooo 0?ooo`3o0?ooo`005@3oool00`000000oooo0?ooo`070?ooo`030<`0o`3oool0oooo0?h0oooo000E 0?ooo`030000003oool0oooo00L0oooo00<0c03o0?ooo`3oool0oP3oool001D0oooo0P0000090?oo o`030<`0o`3oool0oooo0?d0oooo000E0?ooo`030000003oool0oooo00P0oooo00<0c03o0?ooo`3o ool0o@3oool001D0oooo00<000000?ooo`3oool02@3oool00`3<0?l0oooo0?ooo`3l0?ooo`005@3o ool00`000000oooo0?ooo`090?ooo`030<`0o`3oool0oooo0?`0oooo000E0?ooo`030000003oool0 oooo00X0oooo00<0c03o0?ooo`3oool0n`3oool001D0oooo00<000000?ooo`3oool02P3oool00`3< 0?l0oooo0?ooo`3k0?ooo`000P3oool2000000@0oooo0P0000030?ooo`@00000103oool00`000000 oooo0?ooo`0;0?ooo`030<`0o`3oool0oooo0?X0oooo00001@3oool000000?ooo`3oool0000000P0 oooo00<000000?ooo`3oool01@3oool00`000000oooo0?ooo`0;0?ooo`030<`0o`3oool0oooo0?X0 oooo00001@3oool000000?ooo`3oool0000000T0oooo00<000000?ooo`3oool0103oool3000000`0 oooo00<0c03o0?ooo`3oool0n@3oool000050?ooo`000000oooo0?ooo`0000002P3oool00`000000 oooo0?ooo`030?ooo`030000003oool0oooo00`0oooo00<0c03o0?ooo`3oool0n@3oool000050?oo o`000000oooo0?ooo`000000203oool010000000oooo0?ooo`0000040?ooo`030000003oool0oooo 00d0oooo00<0c03o0?ooo`3oool0n03oool00080oooo0P00000:0?ooo`8000001@3oool00`000000 oooo0?ooo`0>0?ooo`030<`0o`3oool0oooo0?L0oooo000E0?ooo`030000003oool0oooo00h0oooo 00<0c03o0?ooo`3oool0m`3oool001D0oooo00<000000?ooo`3oool03`3oool00`3<0?l0oooo0?oo o`3f0?ooo`005@3oool00`000000oooo0?ooo`0?0?ooo`030<`0o`3oool0oooo0?H0oooo000E0?oo o`030000003oool0oooo0100oooo00<0c03o0?ooo`3oool0m@3oool001D0oooo0P00000A0?ooo`03 0<`0o`3oool0oooo0?D0oooo000E0?ooo`030000003oool0oooo0140oooo00<0c03o0?ooo`3oool0 m03oool001D0oooo00<000000?ooo`3oool04@3oool00`3<0?l0oooo0?ooo`3d0?ooo`005@3oool0 0`000000oooo0?ooo`0B0?ooo`030<`0o`3oool0oooo0?<0oooo000E0?ooo`030000003oool0oooo 0180oooo00<0c03o0?ooo`3oool0l`3oool001D0oooo00<000000?ooo`3oool04`3oool00`3<0?l0 oooo0?ooo`3b0?ooo`005@3oool00`000000oooo0?ooo`0D0?ooo`030<`0o`3oool0oooo0?40oooo 000E0?ooo`030000003oool0oooo01@0oooo00<0c03o0?ooo`3oool0l@3oool001D0oooo0P00000F 0?ooo`030<`0o`3oool0oooo0?00oooo000E0?ooo`030000003oool0oooo01D0oooo00<0c03o0?oo o`3oool0l03oool001D0oooo00<000000?ooo`3oool05P3oool00`3<0?l0oooo0?ooo`3_0?ooo`00 5@3oool00`000000oooo0?ooo`0G0?ooo`030<`0o`3oool0oooo0>h0oooo000E0?ooo`030000003o ool0oooo01L0oooo00<0c03o0?ooo`3oool0kP3oool001D0oooo00<000000?ooo`3oool0603oool0 0`3<0?l0oooo0?ooo`3]0?ooo`005@3oool00`000000oooo0?ooo`0H0?ooo`030<`0o`3oool0oooo 0>d0oooo000E0?ooo`030000003oool0oooo01T0oooo00<0c03o0?ooo`3oool0k03oool001D0oooo 0P00000K0?ooo`030<`0o`3oool0oooo0>/0oooo000E0?ooo`030000003oool0oooo01X0oooo00<0 c03o0?ooo`3oool0j`3oool001D0oooo00<000000?ooo`3oool06`3oool00`3<0?l0oooo0?ooo`3Z 0?ooo`005@3oool00`000000oooo0?ooo`0L0?ooo`030<`0o`3oool0oooo0>T0oooo000E0?ooo`03 0000003oool0oooo01`0oooo00<0c03o0?ooo`3oool0j@3oool001D0oooo00<000000?ooo`3oool0 7@3oool00`3<0?l0oooo0?ooo`3X0?ooo`000P3oool2000000@0oooo0P0000050?ooo`<000000`3o ool00`000000oooo0?ooo`0M0?ooo`030<`0o`3oool0oooo0>P0oooo00001@3oool000000?ooo`3o ool0000000/0oooo00<000000?ooo`3oool00P3oool00`000000oooo0?ooo`0N0?ooo`030<`0o`3o ool0oooo0>L0oooo00001@3oool000000?ooo`3oool0000000P0oooo1@0000030?ooo`<000007`3o ool00`3<0?l0oooo0?ooo`3V0?ooo`0000D0oooo0000003oool0oooo000000080?ooo`040000003o ool0oooo000000@0oooo00<000000?ooo`3oool07`3oool00`3<0?l0oooo0?ooo`3V0?ooo`0000D0 oooo0000003oool0oooo000000090?ooo`030000003oool0000000@0oooo00<000000?ooo`3oool0 803oool00`3<0?l0oooo0?ooo`3U0?ooo`000P3oool2000000/0oooo0P0000040?ooo`030000003o ool0oooo0200oooo00<0c03o0?ooo`3oool0i@3oool001D0oooo00<000000?ooo`3oool08@3oool0 0`3<0?l0oooo0?ooo`3T0?ooo`005@3oool00`000000oooo0?ooo`0R0?ooo`030<`0o`3oool0oooo 0><0oooo000E0?ooo`030000003oool0oooo0280oooo00<0c03o0?ooo`3oool0h`3oool001D0oooo 00<000000?ooo`3oool08`3oool00`3<0?l0oooo0?ooo`3R0?ooo`005@3oool2000002D0oooo00<0 c03o0?ooo`3oool0h@3oool001D0oooo00<000000?ooo`3oool0903oool00`3<0?l0oooo0?ooo`3Q 0?ooo`005@3oool00`000000oooo0?ooo`0U0?ooo`030<`0o`3oool0oooo0>00oooo000E0?ooo`03 0000003oool0oooo02D0oooo00<0c03o0?ooo`3oool0h03oool001D0oooo00<000000?ooo`3oool0 9P3oool00`3<0?l0oooo0?ooo`3O0?ooo`005@3oool00`000000oooo0?ooo`0W0?ooo`030<`0o`3o ool0oooo0=h0oooo000E0?ooo`030000003oool0oooo02L0oooo00<0c03o0?ooo`3oool0gP3oool0 01D0oooo00<000000?ooo`3oool0:03oool00`3<0?l0oooo0?ooo`3M0?ooo`005@3oool2000002X0 oooo00<0c03o0?ooo`3oool0g03oool001D0oooo00<000000?ooo`3oool0:P3oool00`3<0?l0oooo 0?ooo`3K0?ooo`005@3oool00`000000oooo0?ooo`0Z0?ooo`030<`0o`3oool0oooo0=/0oooo000E 0?ooo`030000003oool0oooo02/0oooo00<0c03o0?ooo`3oool0fP3oool001D0oooo00<000000?oo o`3oool0;03oool00`3<0?l0oooo0?ooo`3I0?ooo`005@3oool00`000000oooo0?ooo`0]0?ooo`03 0<`0o`3oool0oooo0=P0oooo000E0?ooo`030000003oool0oooo02d0oooo00<0c03o0?ooo`3oool0 f03oool001D0oooo00<000000?ooo`3oool0;P3oool00`3<0?l0oooo0?ooo`3G0?ooo`005@3oool2 00000300oooo00<0c03o0?ooo`3oool0eP3oool001D0oooo00<000000?ooo`3oool0<03oool00`3< 0?l0oooo0?ooo`3E0?ooo`005@3oool00`000000oooo0?ooo`0a0?ooo`030<`0o`3oool0oooo0=@0 oooo000E0?ooo`030000003oool0oooo0340oooo00<0c03o0?ooo`3oool0e03oool001D0oooo00<0 00000?ooo`3oool003oool00`3<0?l0oooo0?ooo`3=0?ooo`005@3oool00`000000oooo0?ooo`0i0?oo o`030<`0o`3oool0oooo0<`0oooo000E0?ooo`030000003oool0oooo03X0oooo00<0c03o0?ooo`3o ool0b`3oool001D0oooo00<000000?ooo`3oool0>`3oool00`3<0?l0oooo0?ooo`3:0?ooo`005@3o ool00`000000oooo0?ooo`0l0?ooo`030<`0o`3oool0oooo00?ooo`003@3oool5000000<0oooo00<000000?ooo`3o ool0^P3oool;0<`0od<0oooo000?0?ooo`030000003oool0oooo00<0oooo00<000000?ooo`3oool0 a@3ooolQ0<`0ob80oooo000?0?ooo`030000003oool0oooo00<0oooo0`00003V0?oooa/0c03o1`3o ool000l0oooo00<000000?ooo`3oool00`3oool00`000000oooo0?ooo`3o0?ooo`T0oooo000?0?oo o`030000003oool0oooo00<0oooo00<000000?ooo`3oool0o`3oool90?ooo`003P3oool2000000D0 oooo00<000000?ooo`3oool0o`3oool90?ooo`005@3oool00`000000oooo0?ooo`3o0?ooo`T0oooo 0000\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-0.248956, -0.0774698, \ 0.0115854, 0.00624851}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[StyleBox["case 5 : \[Beta]=1.6", FontWeight->"Bold", FontColor->RGBColor[0, 0, 1]]], "Subsubtitle", Background->RGBColor[1, 1, 0.717647]], Cell[BoxData[ \(\(\[Beta] = 1.6;\)\)], "Input"], Cell[BoxData[ \(sol[\[Xi]_] := NDSolve[{D[f[\[Eta]], {\[Eta], 3}] + f[\[Eta]]\ \(f''\)[\[Eta]] + \[Beta]\ \((1 - \((\(f'\)[\[Eta]])\ \)^2)\) \[Equal] 0, f[0] \[Equal] \ 0, \(f'\)[0] \[Equal] \ 0, \(f''\)[0] \[Equal] \ \[Xi]}, {f[\[Eta]]}, {\[Eta], 0, 2.2}]\)], "Input"], Cell[BoxData[ \(DFEnd[\[Xi]_?NumericQ] := D[f[\[Eta]] /. sol[\[Xi]], {\[Eta], 1}] /. \[Eta] \[Rule] 2.2\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(SOL5 = FindRoot[DFEnd[\[Xi]] \[Equal] \ 1, {\[Xi], 0.5}]\)], "Input"], Cell[BoxData[ \({\[Xi] \[Rule] 1.522715915591888`}\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(plt5 = Plot[Evaluate[ D[f[\[Eta]] /. sol[\[Xi] /. SOL5], {\[Eta], 1}]], {\[Eta], 0, 2.2}, PlotStyle \[Rule] Hue[5/5], PlotRange \[Rule] All]\)], "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.0238095 0.4329 0.014715 0.588604 [ [.24026 .00222 -9 -9 ] [.24026 .00222 9 0 ] [.45671 .00222 -3 -9 ] [.45671 .00222 3 0 ] [.67316 .00222 -9 -9 ] [.67316 .00222 9 0 ] [.88961 .00222 -3 -9 ] [.88961 .00222 3 0 ] [.01131 .13244 -18 -4.5 ] [.01131 .13244 0 4.5 ] [.01131 .25016 -18 -4.5 ] [.01131 .25016 0 4.5 ] [.01131 .36788 -18 -4.5 ] [.01131 .36788 0 4.5 ] [.01131 .4856 -18 -4.5 ] [.01131 .4856 0 4.5 ] [.01131 .60332 -6 -4.5 ] [.01131 .60332 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .24026 .01472 m .24026 .02097 L s [(0.5)] .24026 .00222 0 1 Mshowa .45671 .01472 m .45671 .02097 L s [(1)] .45671 .00222 0 1 Mshowa .67316 .01472 m .67316 .02097 L s [(1.5)] .67316 .00222 0 1 Mshowa .88961 .01472 m .88961 .02097 L s [(2)] .88961 .00222 0 1 Mshowa .125 Mabswid .0671 .01472 m .0671 .01847 L s .11039 .01472 m .11039 .01847 L s .15368 .01472 m .15368 .01847 L s .19697 .01472 m .19697 .01847 L s .28355 .01472 m .28355 .01847 L s .32684 .01472 m .32684 .01847 L s .37013 .01472 m .37013 .01847 L s .41342 .01472 m .41342 .01847 L s .5 .01472 m .5 .01847 L s .54329 .01472 m .54329 .01847 L s .58658 .01472 m .58658 .01847 L s .62987 .01472 m .62987 .01847 L s .71645 .01472 m .71645 .01847 L s .75974 .01472 m .75974 .01847 L s .80303 .01472 m .80303 .01847 L s .84632 .01472 m .84632 .01847 L s .9329 .01472 m .9329 .01847 L s .97619 .01472 m .97619 .01847 L s .25 Mabswid 0 .01472 m 1 .01472 L s .02381 .13244 m .03006 .13244 L s [(0.2)] .01131 .13244 1 0 Mshowa .02381 .25016 m .03006 .25016 L s [(0.4)] .01131 .25016 1 0 Mshowa .02381 .36788 m .03006 .36788 L s [(0.6)] .01131 .36788 1 0 Mshowa .02381 .4856 m .03006 .4856 L s [(0.8)] .01131 .4856 1 0 Mshowa .02381 .60332 m .03006 .60332 L s [(1)] .01131 .60332 1 0 Mshowa .125 Mabswid .02381 .04415 m .02756 .04415 L s .02381 .07358 m .02756 .07358 L s .02381 .10301 m .02756 .10301 L s .02381 .16187 m .02756 .16187 L s .02381 .1913 m .02756 .1913 L s .02381 .22073 m .02756 .22073 L s .02381 .27959 m .02756 .27959 L s .02381 .30902 m .02756 .30902 L s .02381 .33845 m .02756 .33845 L s .02381 .39731 m .02756 .39731 L s .02381 .42674 m .02756 .42674 L s .02381 .45617 m .02756 .45617 L s .02381 .51503 m .02756 .51503 L s .02381 .54446 m .02756 .54446 L s .02381 .57389 m .02756 .57389 L s .25 Mabswid .02381 0 m .02381 .61803 L s 1 0 0 r .5 Mabswid .02381 .01472 m .06244 .09096 L .10458 .16569 L .14415 .22812 L .18221 .28145 L .22272 .33145 L .26171 .37348 L .30316 .41217 L .34309 .44419 L .3815 .47064 L .42237 .49463 L .46172 .51416 L .49955 .53006 L .53984 .5443 L .57861 .55574 L .61984 .56583 L .65954 .57384 L .69774 .58022 L .73838 .5858 L .77751 .59022 L .81909 .59406 L .85916 .59709 L .89771 .59951 L .93871 .60166 L .97619 .60332 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg03oool00`000000oooo0?ooo`0h0?ooo`030000003oool0oooo03P0 oooo00<000000?ooo`3oool0=`3oool00`000000oooo0?ooo`0M0?ooo`005@3oool00`000000o`00 0?ooo`3o0?ooo`T0oooo000E0?ooo`030000003oool0o`000?l0oooo2@3oool001D0oooo00<00000 0?ooo`3o0000o`3oool90?ooo`005@3oool010000000oooo0?ooo`3o003o0?ooo`P0oooo000E0?oo o`040000003oool0oooo0?l00?l0oooo203oool001D0oooo0P0000020?ooo`030?l0003oool0oooo 0?l0oooo1@3oool001D0oooo00D000000?ooo`3oool0oooo0?l0003o0?ooo`L0oooo000E0?ooo`03 0000003oool0oooo0080oooo00<0o`000?ooo`3oool0o`3oool40?ooo`005@3oool00`000000oooo 0?ooo`020?ooo`030?l0003oool0oooo0?l0oooo103oool001D0oooo00<000000?ooo`3oool00`3o ool00`3o0000oooo0?ooo`3o0?ooo`<0oooo000E0?ooo`030000003oool0oooo00<0oooo00<0o`00 0?ooo`3oool0o`3oool30?ooo`005@3oool00`000000oooo0?ooo`040?ooo`030?l0003oool0oooo 0?l0oooo0P3oool001D0oooo00<000000?ooo`3oool0103oool00`3o0000oooo0?ooo`3o0?ooo`80 oooo000E0?ooo`8000001P3oool00`3o0000oooo0?ooo`3o0?ooo`40oooo000E0?ooo`030000003o ool0oooo00D0oooo00<0o`000?ooo`3oool0o`3oool10?ooo`005@3oool00`000000oooo0?ooo`06 0?ooo`030?l0003oool0oooo0?l0oooo000E0?ooo`030000003oool0oooo00H0oooo00<0o`000?oo o`3oool0o`3oool001D0oooo00<000000?ooo`3oool01`3oool00`3o0000oooo0?ooo`3n0?ooo`00 5@3oool00`000000oooo0?ooo`070?ooo`030?l0003oool0oooo0?h0oooo000E0?ooo`030000003o ool0oooo00P0oooo00<0o`000?ooo`3oool0o@3oool001D0oooo00<000000?ooo`3oool0203oool0 0`3o0000oooo0?ooo`3m0?ooo`005@3oool2000000X0oooo00<0o`000?ooo`3oool0o03oool001D0 oooo00<000000?ooo`3oool02@3oool00`3o0000oooo0?ooo`3l0?ooo`005@3oool00`000000oooo 0?ooo`0:0?ooo`030?l0003oool0oooo0?/0oooo000E0?ooo`030000003oool0oooo00/0oooo00<0 o`000?ooo`3oool0nP3oool001D0oooo00<000000?ooo`3oool02`3oool00`3o0000oooo0?ooo`3j 0?ooo`005@3oool00`000000oooo0?ooo`0<0?ooo`030?l0003oool0oooo0?T0oooo00020?ooo`80 0000103oool2000000<0oooo100000040?ooo`030000003oool0oooo00`0oooo00<0o`000?ooo`3o ool0n@3oool000050?ooo`000000oooo0?ooo`000000203oool00`000000oooo0?ooo`050?ooo`03 0000003oool0oooo00d0oooo00<0o`000?ooo`3oool0n03oool000050?ooo`000000oooo0?ooo`00 00002@3oool00`000000oooo0?ooo`040?ooo`<000003P3oool00`3o0000oooo0?ooo`3g0?ooo`00 00D0oooo0000003oool0oooo0000000:0?ooo`030000003oool0oooo00<0oooo00<000000?ooo`3o ool03P3oool00`3o0000oooo0?ooo`3g0?ooo`0000D0oooo0000003oool0oooo000000080?ooo`04 0000003oool0oooo000000@0oooo00<000000?ooo`3oool03`3oool00`3o0000oooo0?ooo`3f0?oo o`000P3oool2000000X0oooo0P0000050?ooo`030000003oool0oooo00l0oooo00<0o`000?ooo`3o ool0mP3oool001D0oooo00<000000?ooo`3oool0403oool00`3o0000oooo0?ooo`3e0?ooo`005@3o ool00`000000oooo0?ooo`0A0?ooo`030?l0003oool0oooo0?@0oooo000E0?ooo`030000003oool0 oooo0140oooo00<0o`000?ooo`3oool0m03oool001D0oooo00<000000?ooo`3oool04P3oool00`3o 0000oooo0?ooo`3c0?ooo`005@3oool2000001<0oooo00<0o`000?ooo`3oool0l`3oool001D0oooo 00<000000?ooo`3oool04`3oool00`3o0000oooo0?ooo`3b0?ooo`005@3oool00`000000oooo0?oo o`0D0?ooo`030?l0003oool0oooo0?40oooo000E0?ooo`030000003oool0oooo01@0oooo00<0o`00 0?ooo`3oool0l@3oool001D0oooo00<000000?ooo`3oool05@3oool00`3o0000oooo0?ooo`3`0?oo o`005@3oool00`000000oooo0?ooo`0F0?ooo`030?l0003oool0oooo0>l0oooo000E0?ooo`030000 003oool0oooo01H0oooo00<0o`000?ooo`3oool0k`3oool001D0oooo00<000000?ooo`3oool05`3o ool00`3o0000oooo0?ooo`3^0?ooo`005@3oool2000001T0oooo00<0o`000?ooo`3oool0k@3oool0 01D0oooo00<000000?ooo`3oool0603oool00`3o0000oooo0?ooo`3]0?ooo`005@3oool00`000000 oooo0?ooo`0I0?ooo`030?l0003oool0oooo0>`0oooo000E0?ooo`030000003oool0oooo01T0oooo 00<0o`000?ooo`3oool0k03oool001D0oooo00<000000?ooo`3oool06P3oool00`3o0000oooo0?oo o`3[0?ooo`005@3oool00`000000oooo0?ooo`0K0?ooo`030?l0003oool0oooo0>X0oooo000E0?oo o`030000003oool0oooo01/0oooo00<0o`000?ooo`3oool0jP3oool001D0oooo00<000000?ooo`3o ool0703oool00`3o0000oooo0?ooo`3Y0?ooo`005@3oool2000001h0oooo00<0o`000?ooo`3oool0 j03oool001D0oooo00<000000?ooo`3oool07@3oool00`3o0000oooo0?ooo`3X0?ooo`005@3oool0 0`000000oooo0?ooo`0N0?ooo`030?l0003oool0oooo0>L0oooo000E0?ooo`030000003oool0oooo 01l0oooo00<0o`000?ooo`3oool0iP3oool001D0oooo00<000000?ooo`3oool07`3oool00`3o0000 oooo0?ooo`3V0?ooo`005@3oool00`000000oooo0?ooo`0P0?ooo`030?l0003oool0oooo0>D0oooo 00020?ooo`800000103oool2000000D0oooo0`0000030?ooo`030000003oool0oooo0240oooo00<0 o`000?ooo`3oool0i03oool000050?ooo`000000oooo0?ooo`0000002`3oool00`000000oooo0?oo o`020?ooo`030000003oool0oooo0280oooo00<0o`000?ooo`3oool0h`3oool000050?ooo`000000 oooo0?ooo`000000203oool5000000<0oooo0`00000R0?ooo`030?l0003oool0oooo0><0oooo0000 1@3oool000000?ooo`3oool0000000P0oooo00@000000?ooo`3oool00000103oool00`000000oooo 0?ooo`0S0?ooo`030?l0003oool0oooo0>80oooo00001@3oool000000?ooo`3oool0000000T0oooo 00<000000?ooo`000000103oool00`000000oooo0?ooo`0T0?ooo`030?l0003oool0oooo0>40oooo 00020?ooo`8000002`3oool2000000@0oooo00<000000?ooo`3oool0903oool00`3o0000oooo0?oo o`3Q0?ooo`005@3oool00`000000oooo0?ooo`0U0?ooo`030?l0003oool0oooo0>00oooo000E0?oo o`030000003oool0oooo02H0oooo00<0o`000?ooo`3oool0g`3oool001D0oooo00<000000?ooo`3o ool09`3oool00`3o0000oooo0?ooo`3N0?ooo`005@3oool00`000000oooo0?ooo`0W0?ooo`030?l0 003oool0oooo0=h0oooo000E0?ooo`800000:@3oool00`3o0000oooo0?ooo`3M0?ooo`005@3oool0 0`000000oooo0?ooo`0Y0?ooo`030?l0003oool0oooo0=`0oooo000E0?ooo`030000003oool0oooo 02X0oooo00<0o`000?ooo`3oool0f`3oool001D0oooo00<000000?ooo`3oool0:P3oool00`3o0000 oooo0?ooo`3K0?ooo`005@3oool00`000000oooo0?ooo`0[0?ooo`030?l0003oool0oooo0=X0oooo 000E0?ooo`030000003oool0oooo02`0oooo00<0o`000?ooo`3oool0f@3oool001D0oooo00<00000 0?ooo`3oool0;@3oool00`3o0000oooo0?ooo`3H0?ooo`005@3oool00`000000oooo0?ooo`0]0?oo o`030?l0003oool0oooo0=P0oooo000E0?ooo`800000;`3oool00`3o0000oooo0?ooo`3G0?ooo`00 5@3oool00`000000oooo0?ooo`0_0?ooo`030?l0003oool0oooo0=H0oooo000E0?ooo`030000003o ool0oooo0300oooo00<0o`000?ooo`3oool0e@3oool001D0oooo00<000000?ooo`3oool0<@3oool0 0`3o0000oooo0?ooo`3D0?ooo`005@3oool00`000000oooo0?ooo`0a0?ooo`030?l0003oool0oooo 0=@0oooo000E0?ooo`030000003oool0oooo0380oooo00<0o`000?ooo`3oool0d`3oool001D0oooo 00<000000?ooo`3oool0<`3oool00`3o0000oooo0?ooo`3B0?ooo`005@3oool00`000000oooo0?oo o`0d0?ooo`030?l0003oool0oooo0=40oooo000E0?ooo`800000=P3oool00`3o0000oooo0?ooo`3@ 0?ooo`005@3oool00`000000oooo0?ooo`0f0?ooo`030?l0003oool0oooo003oool00`3o0000oooo0?ooo`3=0?ooo`005@3oool00`000000oooo0?ooo`0h0?ooo`030?l0003o ool0oooo0P3oool00`3o 0000oooo0?ooo`3;0?ooo`0000D0oooo0000003oool0oooo000000080?ooo`040000003oool0oooo 000000@0oooo00<000000?ooo`3oool0>`3oool00`3o0000oooo0?ooo`3:0?ooo`0000D0oooo0000 003oool0oooo000000080?ooo`040000003oool0oooo000000@0oooo0`00000l0?ooo`030?l0003o ool0oooo00?ooo`005@3o ool00`000000oooo0?ooo`2j0?ooo`/0o`00@`3oool001D0oooo00<000000?ooo`3oool0a@3oool; 0?l003P0oooo000E0?ooo`030000003oool0oooo0=00oooo2`3o000]0?ooo`003@3oool5000000<0 oooo00<000000?ooo`3oool0f`3oool;0?l00280oooo000?0?ooo`030000003oool0oooo00<0oooo 00<000000?ooo`3oool0iP3oool;0?l001L0oooo000?0?ooo`030000003oool0oooo00<0oooo0`00 003a0?oooa00o`001`3oool000l0oooo00<000000?ooo`3oool00`3oool00`000000oooo0?ooo`3o 0?ooo`T0oooo000?0?ooo`030000003oool0oooo00<0oooo00<000000?ooo`3oool0o`3oool90?oo o`003P3oool2000000D0oooo00<000000?ooo`3oool0o`3oool90?ooo`005@3oool00`000000oooo 0?ooo`3o0?ooo`T0oooo0000\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-0.182568, -0.0774698, \ 0.00849595, 0.00624851}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[StyleBox["We obtain the same result as figure 8-10 in page 352 \ of Deen's book", FontSize->18]], "Subsubtitle", Background->RGBColor[1, 0.74902, 1]], Cell[CellGroupData[{ Cell[BoxData[ \(Show[plt1, plt2, plt3, plt4, plt5, Frame \[Rule] True]\)], "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.0238095 0.190476 0.0147151 0.588604 [ [.02381 -0.0125 -3 -9 ] [.02381 -0.0125 3 0 ] [.21429 -0.0125 -3 -9 ] [.21429 -0.0125 3 0 ] [.40476 -0.0125 -3 -9 ] [.40476 -0.0125 3 0 ] [.59524 -0.0125 -3 -9 ] [.59524 -0.0125 3 0 ] [.78571 -0.0125 -3 -9 ] [.78571 -0.0125 3 0 ] [.97619 -0.0125 -3 -9 ] [.97619 -0.0125 3 0 ] [ 0 0 -0.125 0 ] [-0.0125 .01472 -6 -4.5 ] [-0.0125 .01472 0 4.5 ] [-0.0125 .13244 -18 -4.5 ] [-0.0125 .13244 0 4.5 ] [-0.0125 .25016 -18 -4.5 ] [-0.0125 .25016 0 4.5 ] [-0.0125 .36788 -18 -4.5 ] [-0.0125 .36788 0 4.5 ] [-0.0125 .4856 -18 -4.5 ] [-0.0125 .4856 0 4.5 ] [-0.0125 .60332 -6 -4.5 ] [-0.0125 .60332 0 4.5 ] [ 0 0 -0.125 0 ] [ 0 .61803 .125 0 ] [ 1 0 .125 0 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .02381 0 m .02381 .00625 L s [(0)] .02381 -0.0125 0 1 Mshowa .21429 0 m .21429 .00625 L s [(1)] .21429 -0.0125 0 1 Mshowa .40476 0 m .40476 .00625 L s [(2)] .40476 -0.0125 0 1 Mshowa .59524 0 m .59524 .00625 L s [(3)] .59524 -0.0125 0 1 Mshowa .78571 0 m .78571 .00625 L s [(4)] .78571 -0.0125 0 1 Mshowa .97619 0 m .97619 .00625 L s [(5)] .97619 -0.0125 0 1 Mshowa .125 Mabswid .0619 0 m .0619 .00375 L s .1 0 m .1 .00375 L s .1381 0 m .1381 .00375 L s .17619 0 m .17619 .00375 L s .25238 0 m .25238 .00375 L s .29048 0 m .29048 .00375 L s .32857 0 m .32857 .00375 L s .36667 0 m .36667 .00375 L s .44286 0 m .44286 .00375 L s .48095 0 m .48095 .00375 L s .51905 0 m .51905 .00375 L s .55714 0 m .55714 .00375 L s .63333 0 m .63333 .00375 L s .67143 0 m .67143 .00375 L s .70952 0 m .70952 .00375 L s .74762 0 m .74762 .00375 L s .82381 0 m .82381 .00375 L s .8619 0 m .8619 .00375 L s .9 0 m .9 .00375 L s .9381 0 m .9381 .00375 L s .25 Mabswid 0 0 m 1 0 L s 0 .01472 m .00625 .01472 L s [(0)] -0.0125 .01472 1 0 Mshowa 0 .13244 m .00625 .13244 L s [(0.2)] -0.0125 .13244 1 0 Mshowa 0 .25016 m .00625 .25016 L s [(0.4)] -0.0125 .25016 1 0 Mshowa 0 .36788 m .00625 .36788 L s [(0.6)] -0.0125 .36788 1 0 Mshowa 0 .4856 m .00625 .4856 L s [(0.8)] -0.0125 .4856 1 0 Mshowa 0 .60332 m .00625 .60332 L s [(1)] -0.0125 .60332 1 0 Mshowa .125 Mabswid 0 .04415 m .00375 .04415 L s 0 .07358 m .00375 .07358 L s 0 .10301 m .00375 .10301 L s 0 .16187 m .00375 .16187 L s 0 .1913 m .00375 .1913 L s 0 .22073 m .00375 .22073 L s 0 .27959 m .00375 .27959 L s 0 .30902 m .00375 .30902 L s 0 .33845 m .00375 .33845 L s 0 .39731 m .00375 .39731 L s 0 .42674 m .00375 .42674 L s 0 .45617 m .00375 .45617 L s 0 .51503 m .00375 .51503 L s 0 .54446 m .00375 .54446 L s 0 .57389 m .00375 .57389 L s .25 Mabswid 0 0 m 0 .61803 L s .02381 .61178 m .02381 .61803 L s .21429 .61178 m .21429 .61803 L s .40476 .61178 m .40476 .61803 L s .59524 .61178 m .59524 .61803 L s .78571 .61178 m .78571 .61803 L s .97619 .61178 m .97619 .61803 L s .125 Mabswid .0619 .61428 m .0619 .61803 L s .1 .61428 m .1 .61803 L s .1381 .61428 m .1381 .61803 L s .17619 .61428 m .17619 .61803 L s .25238 .61428 m .25238 .61803 L s .29048 .61428 m .29048 .61803 L s .32857 .61428 m .32857 .61803 L s .36667 .61428 m .36667 .61803 L s .44286 .61428 m .44286 .61803 L s .48095 .61428 m .48095 .61803 L s .51905 .61428 m .51905 .61803 L s .55714 .61428 m .55714 .61803 L s .63333 .61428 m .63333 .61803 L s .67143 .61428 m .67143 .61803 L s .70952 .61428 m .70952 .61803 L s .74762 .61428 m .74762 .61803 L s .82381 .61428 m .82381 .61803 L s .8619 .61428 m .8619 .61803 L s .9 .61428 m .9 .61803 L s .9381 .61428 m .9381 .61803 L s .25 Mabswid 0 .61803 m 1 .61803 L s .99375 .01472 m 1 .01472 L s .99375 .13244 m 1 .13244 L s .99375 .25016 m 1 .25016 L s .99375 .36788 m 1 .36788 L s .99375 .4856 m 1 .4856 L s .99375 .60332 m 1 .60332 L s .125 Mabswid .99625 .04415 m 1 .04415 L s .99625 .07358 m 1 .07358 L s .99625 .10301 m 1 .10301 L s .99625 .16187 m 1 .16187 L s .99625 .1913 m 1 .1913 L s .99625 .22073 m 1 .22073 L s .99625 .27959 m 1 .27959 L s .99625 .30902 m 1 .30902 L s .99625 .33845 m 1 .33845 L s .99625 .39731 m 1 .39731 L s .99625 .42674 m 1 .42674 L s .99625 .45617 m 1 .45617 L s .99625 .51503 m 1 .51503 L s .99625 .54446 m 1 .54446 L s .99625 .57389 m 1 .57389 L s .25 Mabswid 1 0 m 1 .61803 L s .8 1 0 r .5 Mabswid .02381 .01472 m .06244 .07078 L .10458 .13176 L .14415 .18851 L .18221 .24205 L .22272 .29713 L .26171 .34742 L .30316 .39691 L .34309 .43985 L .3815 .47609 L .42237 .5088 L .46172 .53454 L .49955 .55419 L .53984 .57015 L .57861 .58138 L .59975 .58607 L .61984 .58973 L .65803 .59491 L .6777 .59685 L .69867 .59848 L .72009 .59976 L .74026 .60069 L .76033 .60139 L .77881 .60189 L .79763 .60228 L .81829 .60259 L .8378 .60281 L .85872 .60298 L .86889 .60304 L .87996 .6031 L .88952 .60314 L .90008 .60318 L .91985 .60324 L .93069 .60326 L .94086 .60328 L .95929 .6033 L .97619 .60332 L s 0 1 .4 r .02381 .01472 m .06244 .11188 L .10458 .20673 L .14415 .28515 L .18221 .35082 L .22272 .41035 L .26171 .45791 L .30316 .49865 L .34309 .52926 L .3815 .55171 L .42237 .56929 L .44268 .576 L .46172 .58126 L .49955 .58923 L .5198 .59237 L .53832 .5947 L .55892 .59677 L .57803 .59829 L .59652 .59946 L .61623 .60043 L .63764 .60123 L .65781 .60179 L .67789 .60222 L .69636 .60251 L .71518 .60273 L .73585 .60291 L .75536 .60303 L .77627 .60312 L .78644 .60316 L .79751 .60319 L .80707 .60321 L .81763 .60323 L .83741 .60326 L .84824 .60327 L .85841 .60328 L .86824 .60329 L .8786 .6033 L .8971 .6033 L .90664 .60331 L .91684 .60331 L .93521 .60331 L .94532 .60332 L .95629 .60332 L .97619 .60332 L s 0 .4 1 r .02381 .01472 m .04262 .01751 L .06244 .02169 L .08255 .02722 L .10458 .03478 L .14509 .05274 L .18408 .07494 L .22553 .10367 L .26546 .13607 L .30387 .17121 L .34474 .21223 L .38409 .25443 L .42192 .29653 L .46221 .34175 L .50098 .38437 L .54221 .42726 L .58192 .46494 L .62011 .49692 L .66075 .52575 L .69988 .54826 L .74147 .56679 L .78153 .57994 L .82008 .58895 L .84002 .59246 L .86109 .59545 L .89906 .59935 L .91857 .60076 L .93948 .60193 L .95833 .60273 L .97619 .60332 L s .8 0 1 r .02381 .01472 m .04699 .09868 L .07227 .18043 L .09601 .24818 L .11885 .30547 L .14315 .3585 L .16655 .40239 L .19142 .44202 L .21537 .47405 L .23842 .49981 L .26294 .52244 L .28655 .5402 L .30925 .55408 L .33343 .56594 L .35669 .57499 L .38143 .5825 L .40525 .58806 L .42817 .59219 L .45255 .59552 L .47603 .59792 L .50098 .59981 L .52502 .60114 L .54815 .60208 L .57275 .60282 L .59524 .60332 L s 1 0 0 r .02381 .01472 m .04081 .09096 L .05935 .16569 L .07676 .22812 L .0935 .28145 L .11133 .33145 L .12849 .37348 L .14672 .41217 L .16429 .44419 L .18119 .47064 L .19917 .49463 L .21649 .51416 L .23314 .53006 L .25086 .5443 L .26792 .55574 L .28606 .56583 L .30353 .57384 L .32034 .58022 L .33822 .5858 L .35544 .59022 L .37373 .59406 L .39136 .59709 L .40833 .59951 L .42637 .60166 L .44286 .60332 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg0?ooo`030?l0003oool0c03o00@0oooo00<00?mV0?ooo`3oool02@3oool00`30?ooo`030?l0003oool0c03o00D0oooo00<00?mV0?ooo`3oool02@3oool00`3 0?ooo`030?l0003oool0c03o00D0oooo00<00?mV0?ooo`3oool02@3oool00`30?oo o`040?l0003oool0oooo0<`0o`D0oooo00<00?mV0?ooo`3oool02@3oool00`30?ooo`0300?ooo`03003oIP3oool0oooo01P0oooo00<0c?l00?ooo`3oool0=@3o ool00`00I_l0oooo0?ooo`1Z0?ooo`4000000@3oool001D0oooo00<000000?ooo`3oool0;P3oool0 0`3o0000oooo0?ooo`050?ooo`030<`0o`3oool0oooo00h0oooo00<00?mV0?ooo`3oool0603oool0 0`303oool00`3o0000oooo0?oo o`070?ooo`030<`0o`3oool0oooo0100oooo00<00?mV0?ooo`3oool06@3oool00`3@3oool00`3o0000oooo0?ooo`070?ooo`030<`0o`3oool0oooo0100oooo0P00ofHJ0?oo o`80c?l0>03oool00`00I_l0oooo0?ooo`1G0?ooo`4000000@3oool001D0oooo00<000000?ooo`3o ool0>P3oool00`3o0000oooo0?ooo`070?ooo`80c03o4P3oool00`00ofH0oooo0?ooo`0I0?ooo`03 0`3oool00`3o0000oooo0?ooo`080?ooo`030<`0o`3oool0oooo0100oooo0P00ofHJ0?ooo`80c?l0 >03oool2001VoeD0oooo0@0000010?ooo`005@3oool00`000000oooo0?ooo`0l0?ooo`030?l0003o ool0oooo00P0oooo0P3<0?lB0?ooo`800?mV6P3oool00`30?ooo`8000000@3oool001D0oooo00<000000?ooo`3oool0@03oool20?l000X0 oooo00<0c03o0?ooo`3oool04@3oool2003oIQX0oooo0P3"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-0.548301, -0.103856, \ 0.0197818, 0.00640152}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]] }, Closed]] }, Open ]] }, FrontEndVersion->"5.2 for Microsoft Windows", ScreenRectangle->{{0, 800}, {0, 517}}, CellGrouping->Manual, WindowSize->{495, 359}, WindowMargins->{{0, Automatic}, {Automatic, 0}} ] (******************************************************************* 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, 614, 18, 273, "Title"], Cell[2393, 73, 29944, 462, 324, "Graphics"], Cell[32340, 537, 330, 9, 89, "Subsubtitle"], Cell[CellGroupData[{ Cell[32695, 550, 193, 4, 47, "Subsubtitle"], Cell[32891, 556, 328, 7, 90, "Input"], Cell[33222, 565, 49, 1, 30, "Input"], Cell[33274, 568, 125, 2, 30, "Input"], Cell[CellGroupData[{ Cell[33424, 574, 89, 1, 30, "Input"], Cell[33516, 577, 69, 1, 29, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[33622, 583, 197, 4, 50, "Input"], Cell[33822, 589, 16698, 420, 186, 3619, 254, "GraphicsData", "PostScript", \ "Graphics"], Cell[50523, 1011, 130, 3, 29, "Output"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[50702, 1020, 157, 3, 49, "Subsubtitle"], Cell[50862, 1025, 51, 1, 30, "Input"], Cell[50916, 1028, 125, 2, 30, "Input"], Cell[CellGroupData[{ Cell[51066, 1034, 89, 1, 30, "Input"], Cell[51158, 1037, 68, 1, 29, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[51263, 1043, 197, 4, 50, "Input"], Cell[51463, 1049, 16812, 427, 186, 3728, 261, "GraphicsData", "PostScript", \ "Graphics"], Cell[68278, 1478, 130, 3, 29, "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[68457, 1487, 160, 3, 49, "Subsubtitle"], Cell[68620, 1492, 58, 1, 30, "Input"], Cell[68681, 1495, 328, 7, 90, "Input"], Cell[69012, 1504, 125, 2, 30, "Input"], Cell[CellGroupData[{ Cell[69162, 1510, 89, 1, 30, "Input"], Cell[69254, 1513, 71, 1, 29, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[69362, 1519, 197, 4, 50, "Input"], Cell[69562, 1525, 16364, 410, 186, 3514, 247, "GraphicsData", "PostScript", \ "Graphics"], Cell[85929, 1937, 130, 3, 29, "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[86108, 1946, 157, 3, 49, "Subsubtitle"], Cell[86268, 1951, 49, 1, 30, "Input"], Cell[86320, 1954, 328, 7, 90, "Input"], Cell[86651, 1963, 125, 2, 30, "Input"], Cell[CellGroupData[{ Cell[86801, 1969, 89, 1, 30, "Input"], Cell[86893, 1972, 69, 1, 29, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[86999, 1978, 197, 4, 50, "Input"], Cell[87199, 1984, 17375, 434, 186, 3679, 260, "GraphicsData", "PostScript", \ "Graphics"], Cell[104577, 2420, 130, 3, 29, "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[104756, 2429, 157, 3, 49, "Subsubtitle"], Cell[104916, 2434, 51, 1, 30, "Input"], Cell[104970, 2437, 330, 7, 110, "Input"], Cell[105303, 2446, 138, 3, 50, "Input"], Cell[CellGroupData[{ Cell[105466, 2453, 89, 1, 30, "Input"], Cell[105558, 2456, 68, 1, 29, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[105663, 2462, 199, 4, 50, "Input"], Cell[105865, 2468, 16173, 394, 186, 3266, 230, "GraphicsData", "PostScript", \ "Graphics"], Cell[122041, 2864, 130, 3, 29, "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[122220, 2873, 167, 3, 74, "Subsubtitle"], Cell[CellGroupData[{ Cell[122412, 2880, 87, 1, 30, "Input"], Cell[122502, 2883, 36132, 914, 186, 7262, 553, "GraphicsData", "PostScript", \ "Graphics"], Cell[158637, 3799, 130, 3, 29, "Output"] }, Open ]] }, Closed]] }, Open ]] } ] *) (******************************************************************* End of Mathematica Notebook file. *******************************************************************)