(************** Content-type: application/mathematica ************** CreatedBy='Mathematica 5.0' 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[ 132996, 3744]*) (*NotebookOutlinePosition[ 133661, 3767]*) (* CellTagsIndexPosition[ 133617, 3763]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{ Cell[TextData[{ StyleBox["Unsteady-State Diffusion and Reaction in a Semi-infinite Medium ", FontSize->24], StyleBox["\n", FontWeight->"Plain", FontVariations->{"CompatibilityType"->0}], StyleBox["Author's Data", FontSize->14, FontWeight->"Bold"], StyleBox[": ", FontSize->14], StyleBox["Housam BINOUS\nDepartment of Chemical Engineering\nNational \ Institute of Applied Sciences and Technology\nTunis, TUNISIA\nEmail: \ binoushousam@yahoo.com ", FontSize->14, FontWeight->"Plain"] }], "Title", TextAlignment->Center, FontSize->18, Background->RGBColor[0.68751, 0.996109, 0.796887]], Cell[TextData[StyleBox["Reference:C. J. Geankoplis, Transport Processes and \ Unit Operations, 3rd edition, Prentice Hall, 1993.", FontWeight->"Bold"]], "Subsubtitle", Background->RGBColor[1, 1, 0.643137]], Cell[CellGroupData[{ Cell["Governing equation and boundary conditions are:", "Subsubtitle", Background->RGBColor[1, 1, 0.658824]], Cell[CellGroupData[{ Cell[GraphicsData["Metafile", "\<\ CF5dJ6E]HGAYHf4PEfU^I6mgLb15CDHPAVmbKF5d0@0001580@0005P0000300002`0007T0000k0000 00000000003@3000S0@00215CDH00040B14003H000040000000000000000000000@00003000>0@00 b`0004H000340`00^0<004M4BD<1002000<000B>P7800000X0<000402@000k/1000304/0000000D0 00090P00000400000P4100D000010_ooo`040000;P4H00D0000a0P40000500002`8000001@0000`2 80BP2a80000V1Pl06P3ooooo000@0000`?ooojWooomP2`00b@<000/0000V1Pl0301=HGAXE7U`I@00 `0090000nP800100000000008P040000;@4000D0000D0T02@00500004`900]011@0001@2@08f1PD0 000C0T02R0PE0000n`:0oP00000009010@0000@2011DJFeULb1>IGLPDVm]HFh00:d40000;@4100P0 000b2Z020PX20000Jf<800000@40001S01D0003k0R3o00000000T0410000108045AY KFEc84iUMb1BKfeQKP00[@@0000]0@8010000?010@08000030dLVa`L64P0000 00000000000100000@00000000040@000P2U]VM^J7@00000h3[>0000000000005000000000000000 00000>2^bP000000LViXM:Ff000007AYL7=THVeU00000300000000000000004000010000000000@1 00020=^gIfiXM000002TWLh000000000000D00000000000000000000000000000000000000000000 000000410@410@410@5002D0000<00000P0005@0001H0000J`0001`0001i0000;P0000400000X8`o i?R07P0001D0000E00000/0000B00004@0002@000010000 0:20@00[P400040001<0000000000000000000000000000001@0000H`020:P0001B0000 C04000<0000Poooo0000000000000000T040004000040P0@E01Y06d0I@1c0200CP1U07L0801B06l0 K@1Q06h0000000000@0000400000000000400080^[MQIfQd00000000cP0000000000060000000000 00000;ZKcP0000000000079^J7A`]`00000PM65U84I9A0000002N0@000000000000100000@000000 00000@000P1i]f5WJ7@00000G:S>000000000000H000000000000000h9c>000000000000LViXM7Bg 0000021dHFDP85I40000009h1000000000000040000100000000000100020::gHFMXM00000000000 0000000000000000000000410@410@410@4002D0000<00000`0002P0000<00000P0002D0000<0000 0`0005@0001H0000`0000400000X8`oi?R`0000400000X8`oi?R06D0 M`0P0580K`1]0640KP00000000000>BRbP00000000000000000006i`Ig=dN000001UL`0000000000 0000004000010000000000@1000300ZeIfiXM000003ZLlh000000000000@00000000000000000000 <:?:00000000000000000000LVaXI7=YK65/L71Q0P000000000000000@00004000000000004000<0 "], "Graphics", ImageSize->{146, 51.75}, ImageMargins->{{152, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}], Cell[GraphicsData["Metafile", "\<\ CF5dJ6E]HGAYHf4PEfU^I6mgLb15CDHPAVmbKF5d0@0001940@0005P0000200004@0005L0001H0000 00000000000k2@00]`L00215CDH00040A18003<000030000000000000000000000@00003000>0@00 b`0004H000340`00^0<004M4BD<1002000<00;l:Fld00000X0<000402@000kl1000204D0000000D0 00090P00000400000P4100D000010_ooo`040000;P4H00D0000a0P40000500002`8000001@0000`2 00MP2180000V1Pl06P3ooooo000@0000`?ooobP6000P2000:0d000/0000V1Pl0301=HGAXE7U`I@00 T04@0000n`:0oP000000090100000P02011CNFeRKf`00P@0000]0@002000038:TPDj0040003_00P0 000b2XP6>P010000kP080000l02000038:8P@j0040003]00P0000b2[`1>P010000 k0080000b1P40001S00P0 000b2^03K0@10000H`080000/B Pf<00XHm00:8<00000:FN`00000:00009PH?00X0ooooo`4000000100003k0Q001`000000_0800000 0@828U=iLgAUK@00100002d10@040000l04000<000000?oooooo7ooooooooooooooo3ooooooooooo ooooQooooolA0000300000P0000;0000400005X0001;00002@000100001J0000B`000180000<0000 0@0001H0000<000060000100000<00000@0000X0000@000000000000000900004000060800001`00 DP0004`100010000P?koo`00000000000000090100000002008045<0N@1]0680K`1/000000000000 000000000000000000000000000000000000000000000000000000000000000000@0007loole0000 2`000400003o0`00P000087ooolH000020000200001o00000000000000000@0010001`002P003@00 001`?`00R3l0001O004000@000L000X000d0000000000>ho00000000l4<00000003`>`0000000?0o 00000000h3l00000003oooioe1lkImXO>fOO7c]WiAlkInXO>fO`7c]WmQlkIo`O>fL283]W7R000000 00000000000000000000000000010@410@410@41/b0U000030000040001C0000E0000080000l0000 2@0004h000010000Z:b=?`2JSClj0000TPD00040001<0000000000000000000000000000001@0000 kfNJ8[l0001C0000E0000080001600002@0005P000010000Z:b=?`2JSClj0000R0H00040001<0000 000000000000000000000000001@0000kVLj9;l0001C0000E0000080000P00002@00038000010000 Z:b=?`2JSClj00000P<00040001<0000000000000000000000000000001@0000k`000;l0001C0000 E0000080000/00002@0003h000010000Z:b=?`2JSClj00008P@00040001<00000000000000000000 00000000001@0000k@000;l0001C0000E0000080000C00002@0002D000010000Z:b=?`2JSClj0000 _0400040001<0000000000000000000000000000001@0000k0000;l0001C0000E00003l000120000 A`0005@000010000Z:b=?`2JSCoJ1@0080H00040001<0000000000000000000000000000001@0000 ?@000=H0001C0000E00002@000120000;P0005@000010000Z:b=?`2JSCmB0`0080H00040001<0000 000000000000000000000000001@0000Y@0000H1001C0000E00001L0001200007`0005@000010000 Z:b=?`2JSClP0P0080H00040001<0000000000000000000000000000001@0000?@000=H0001C0000 E00003/0000Z0000@`0003`000010000Z:b=?`2JSCn01@00h0<00040001<00000000000000000000 00000000001@0000?@000=H0001C0000E00001L0000Z00007`0003`000010000Z:b=?`2JSClP0P00 h0<00040001<0000000000000000000000000000001@0000?NHkImH0001C0000E00003P0000A0000 @00002<000010000Z:b=?`2JSClb1@00X0400040001<0000000000000000000000000000001@0000 ?KH3`=H0001C0000E00001@0000A0000700002<000010000Z:b=?`2JSCoB0@00X0400040001<0000 000000000000000000000000001@0000?AlRi=H0001B0000C04000800020o_oo0000000000000000 T040000000040P0@E01Y06d0I@1c0200CP1U07L0801B06l0K@1Q06h0003lR8?So?ooog3?:l007b;T 01lRi9L2000Z9070TBDk>CT//@4`70mZ/400000002Z`G2>U/410000OF<4`8C[i>@30000000001_G1L1POIK1 :3@1`3SG1L2@OIK1U>cTi0000000k>CT^]D5`000000000000000000000000000000000410@410@41 0@4002D0000<00000P0002P0000<00000@0002D0000<00000P0005@0001D0000C0000480001C0000 E0000040002X[8do09Z=?``7000P1P000@0004`000000000000000000000000000000500000`00?0 _`0005@0001D0000D00002X0001G0000?0000040002X[8do09Z=?fH7003P0`000@0004`000000000 000000000000000000000500000`0000_`0005@0001D0000900002X0000[0000?0000040002X[8do 09Z=?e83003P0`000@0004`000000000000000000000000000000500000`00S0_`0005@0001D0000 A@000140001<00008`000040002X[8do09Z=?f@6002P0@000@0004`0000000000000000000000000 00000500000`0000_`0005@0001D000080000140000W00008`000040002X[8do09Z=?`@3002P0@00 0@0004`000000000000000000000000000000500000`01KT_`000580001<0@000@00083nool00000 00000000002@0@000@0000@2011D06T0K@1U07<0801>06D0M`0P0580K`1]0640KP000;3RI02DhV@0 T6lFi<0@00010;B1000006aa00000000000003/000160P00010003Lj002O0@00W`4002l/00000000 ool0003`0016;liI1]5^@00000000000202L000@00 00400;3^i>AUDS70L9:S`@0000000:;10809`7@0T/8@000000000000000000000000000000000000 0@410@410@410KkV9@0000`000010000:00000`0000200009@0000`000010000E00005@0000c0000 @P0003T0001D00000@000:R/SCl0VXdoaP@0020600010000C0000000000000000000000000000000 D00006<0;L2W0000E00005@0000;0000@P000180001D00000@000:R/SCl0VXdo3040020600010000 C0000000000000000000000000000000D00007P0002o0000E00005@000180000:P0004h0000l0000 0@000:R/SCl0VXdo/PH00>0300010000C0000000000000000000000000000000D00006<0002W0000 E00005@0000`0000:P0003H0000l00000@000:R/SCl0VXdoK0@00>0300010000C000000000000000 0000000000000000D00006<0002W0000E00005@0000;0000:P000180000l00000@000:R/SCl0VXdo 30400>0300010000C0000000000000000000000000000000D00007P0002o0000E00005@0000/0000 4@000380000S00000@000:R/SCl0VXdo7P@00:0100010000C0000000000000000000000000000000 D00006<0002W0000E00005@0000:00004@0000h0000S00000@000:R/SCl0VXdokP000:0100010000 C0000000000000000000000000000000D00007@0001g0000DP0004`100020000400000L000000000 00000;`2000000000@828U<0N@1c07@0I@1]00000000000000000000000000000000000000000000 00000000000000000000000000000000000000000000000000000000000000000000000000000000 00000000000000000000000000000000000000000000000000000000000000000000000000000000 00000000000000000000000000000000000000000000000000000000000000000000000000000000 00000000000000000000000000000000000000000000000000000000000000000000000000010@41 0@410@41000U000030000080000X000030000040001;000040000000000500009@0000`0000=0020 :00000`0000200003P0001@000000000400001@0 \>"], "Graphics", ImageSize->{100, 83.5625}, ImageMargins->{{176, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["\<\ Analytical solution was derived by P. V. Danckwerts, Trans. Faraday Soc., 46, \ 300 (1950) :\ \>", "Subsubtitle", Background->RGBColor[1, 1, 0.666667]], Cell[GraphicsData["Metafile", "\<\ CF5dJ6E]HGAYHf4PEfU^I6mgLb15CDHPAVmbKF5d0@0003H`0@0005P0000200004`0006/100220000 0000000000329@0080`00215CDH00040<3H00<8000050000000000000000000000@00003000>0@00 b`0004H0003T2`00f0/004M4BD<1002000<001Mag?`00000`0/000402@000lP500040>l0000000D0 00090P00000400000P4100D000010_ooo`040000;P4H00D0000a0P40000500002`8000001@0000`2 00]08Q80000V1Pl06P3ooooo000@0000`?ooog8?00008P00LQX000/0000V1Pl0301=HGAXE7U`I@00 T0890000nP800100000000008P040000;@4000D0000D0/h2W0@500004`;>0X@51@0001@230=82PD0 000C0_02N@X90000nP800200000000008P040000;@4100D0000D0_P2N@X500004`:N0l0:100002d1 0005000050:N0lP:1@0001<2`04V2`D0000D0/019P/500004`;00H8?40000?/2E?gS0000002@0@00 00800P0@DgU]HVm/00840000;@4200P0000b2R/3l0L10000:00@0000n`9DoN<00000090100000P02 011CNFeRKf`00P@0000]0@<010000?010P080000100002d1 0@050000509L2?l>1@0001<20PU63`@0000]0@001@0001@20PU>3`D0000C0R@7[0l50000508T1j`? 1@0001<290L85100003k0UCmh`000000T0400002008045=iKF9_K002100002d10P040000l04300P0 000b2Xl8UPd10000:00@0000n`9DoN<00000090100000P02011CNFeRKf`00P@0000]0@<010000?01 0P0800001V8Q0@000?X02000038:WPAR8@40003j00P0 000b2Rh3HR410000nP080000X02000038:OPOj0`40003Z00P0000b2Ph6nP<10000jP080000X02000038:;P?j0`40003Z00P0000b2XH:nP<10000j`080000T02000038: L0W68040003g00P0000b2SP8aR010000m`080000L02000038:IPXV5`40003X00P0000b2T879QL10000 iP080000Q`10000m`080000Q`10000mP080000L02000038: e0:P4P40003W00P0000b2P85X1810000j0080000H02000038:;P>/6040000]00P0 000b2Rh3CPP10000;@08000002@40001h00P0000b2^05NP810000H`080000IGLPDVm]HFh00:d40000;@4300@0003`0@802000038:i0T66040 000b00P0000b2Y88aQ010000;`090000/BPfD04X=b01:3IP0B Pf<00`4000433P000A:3N0000@:8eool0id84000003Je ool08d<4000003Reool0Gd<4000003Veool0XT<4000000000000kD<4000003beool0:d@4000003ne ool0Nd@40000042eool0XX<10000046eool0`4@4000004:eool0l4@4000004>eool0nQ80000004Be ool07TD4000004Feool0B4D4000004Neool0FDD4000004Reool0KDD4000004Veool0LT03000005Fe ool04A<0000005Reool0VTD4000005Veool0bDD4000005^eool0?`D0000005fe0000000000000000 00000000000000000@410@410@410F:e9@0000`000030000D`0005@0001E00008P0005T000140000 0@0003a4SCmMTX`ol0L002/300010000C0000000000000000000000000000000D00002P1001g0000 DP0004`100040000E?goon<0000000000000090100000002008045<0N@1]0680K`1/000000000>Ze ool03TP400000>^eool0bGX3000007Vgool0>TP40000026hool0FTP4000002noOQ0P^Qh3000003:o Pa0PQDP4000003>oQa0P_A`3000003BoRa0Pe4P4000003FoUA0P>Ah3000003JoVa0PnDP4000003Zo XA1Pk1`3000003^o[a0P71l3000003bo]A0PD4T4000003fo`Q0P[1d3000003nofQ0P7@000000042o jA0PTAd30000046ola0PcDT4000004Ron11PeQ`3000004Vo1Q4P/1`3000004Zo314PXa`300000000 00000000000000000000000000010@410@410@41000U0000300000@0000X0000300000<0000U0000 300000@0001C0000E0000:L0000R0000Z`0004@000010000?4B=?efBS3nP3`00:`<00040001<0000 000000000000000000000000001@0000:OlP]7L0000K0000400005@D001N1000=P00010000255000 @P@001/0000@0000QA@004X4000U000030000080000f000040000<`D003`10006`000100003D5000 l0@002D0000<00000@0003H0000@00000P006`000100003J6@00eP8003H0000@0000 2aX00;X2000K0000400000/J00320P009@0000`000020000=P000100001B6P00A0<001/0000@0000 FQX004@3000U000030000040000f000040000;PJ00300@006`000100002h6P00`04003H0000@0000 2Q`00<01000K00004000048:000b2000=P000100000Z2`00001D20006`000100003o3P00G0P002D0000<00000P0003H0000@0000APl00089000K0000 400004h?00022@009@0000`000010000=P000100002/3`0090L001/0000@0000[0l002@7000f0000 400000PD000T1`00DP0004`100030000E?goon<0000000000000090100000002008045<0N@1]0680 K`1/0000000004Zeool0SEL40000066eQA406eP4000006>eUQ4PROP1000006Be/14PgeP4000006Fe ool05eT4000006JeaA4P[OP1000006Neool0IeX4000006Reool0eoolPiVX4000008FeoolP7^/1000008Jeool07h01000000jf ool070000000012fool02V`40000016foolPm483000001:fool0`D830000026fool07F`4000002:f ool03Xh30000000000000000000000000000000000010@410@410@41000U0000300000<0000X0000 300000@0000U0000300000<0001C0000E0000980001K0000UP0007d000010000?4B=?efBS3nF3@00 S`P00040001<0000000000000000000000000000001@0000:?l0hGL0001B0000C04000@0001DoOoo h`00000000000000T040000000800P0@D`1i06d0HP1_06`00000IdL100000:nfool06e4100000;2f ool01eD100000;6fool0leP1000006^iool0000000000:Viool0Scl100000:Ziool0TcX100000<2i ool0Nd<100000<:iool0;dd1000004neZ@00>`000000052e/P00m`000000056e^`00:`<0000005Je a000/`40000005Nec@00K`80000004jeool0:D830000046e0000i`<0000004Feool0OQ40000004Ve ool0iPH0000004^eool0X`@0000004neool0UD03000005>eool0g@00000000000000000000000000 000000410@410@410@40HRD0000<0000100002P0000<00000`0002D0000<0000100005<0001D0000 f00005/0003L0000O@000040000lA8doGI:eool03Q/0000001Be ool0XSP0000001Feool0;ST0000001feool0dF<10000022eool0kf<1000002jeool0/S`0000002ne ool08cd00000036eool0Z3/0000003:eool0Tb`1000003Feool0?8<1000003Reool0ah<1000004Je ool0U1D0000004Veool0cPd0000004beool0c0H0000004neool0h800010000C0000000000000000000000000000000D0000?X3002?0000D`0005@0001V0@00 D00006/1001R00000@0003a4SCmMTX`oHR4007h700010000C0000000000000000000000000000000 D0000?X0002?0000D`0005@0001V0@00@00006/1001B00000@0003a4SCmMTX`oHR4000h600010000 C0000000000000000000000000000000D0000?X3002?0000D`0005@0001V0@00<@0006/100130000 0@0003a4SCmMTX`oHR4009h400010000C0000000000000000000000000000000D0000?X1002?0000 D`0005@0001V0@008P0006/1000d00000@0003a4SCmMTX`oHR4002h300010000C000000000000000 0000000000000000D0000?X1002?0000D`0005@0001V0@00L00006/1002200000@0003a4SCmMTX`o HR4008H:00010000C0000000000000000000000000000000D0000?/0002?0000D`0005@0001V0@00 4`0006/1000U00000@0003a4SCmMTX`oHR400;h100010000C0000000000000000000000000000000 D0000?T07@2?0000D`0005@0000[0000K@000300001o00000@0003a4SCmMTX`onP<004@:00010000 C0000000000000000000000000000000D0000>X0002?0000D`0005@0000[0000G`000300001a0000 0@0003a4SCmMTX`onP<00>h800010000C0000000000000000000000000000000D0000>X0002?0000 D`0005@0000[0000D0000300001R00000@0003a4SCmMTX`onP<007h700010000C000000000000000 0000000000000000D0000>X0002?0000D`0005@0000[0000@0000300001B00000@0003a4SCmMTX`o nP<000h600010000C0000000000000000000000000000000D0000>Xb002?0000D`0005@0000[0000 <@000300001300000@0003a4SCmMTX`onP<009h400010000C0000000000000000000000000000000 D0000>X0002?0000D`0005@0000[00008P000300000d00000@0003a4SCmMTX`onP<002h300010000 C0000000000000000000000000000000D0000>X0002?0000D`0005@0000[0000L000030000220000 0@0003a4SCmMTX`onP<008H:00010000C0000000000000000000000000000000D0000>/0402?0000 D`0005@0000[00004`000300000U00000@0003a4SCmMTX`onP<00;h100010000C000000000000000 0000000000000000D0000>T0002?0000D`0005@0001O0@00I00006@1001f00000@0003a4SCmMTX`o aR00070900010000C0000000000000000000000000000000D0000?L20B:?0000D`0005@0001O0@00 E`0006@1001Y00000@0003a4SCmMTX`oaR0003P800010000C0000000000000000000000000000000 D0000?L0IGF?0000D`0005@0001O0@00K`0006@1002100000@0003a4SCmMTX`oaR0006H:00010000 C0000000000000000000000000000000D0000?QiKF:?0000D`0005@0001O0@00C@0006@1001O0000 0@0003a4SCmMTX`oaR00048700010000C0000000000000000000000000000000D0000?H0002?0000 D`0005@0003h0000I0000?d0001f00000@0003a4SCmMTX`o9QL0070900010000C000000000000000 0000000000000000D0000>L0002?0000D`0005@0003h0000E`000?d0001Y00000@0003a4SCmMTX`o 9QL003P800010000C0000000000000000000000000000000D0000>L0002?0000D`0005@0003h0000 K`000?d0002100000@0003a4SCmMTX`o9QL006H:00010000C0000000000000000000000000000000 D0000>P0002?0000D`0005@0003h0000C@000?d0001O00000@0003a4SCmMTX`o9QL0048700010000 C0000000000000000000000000000000D0000>IeLV:?0000D`0005@0000i0@00F`000441001]0000 0@0003a4SCmMTX`oQ`000`400010000C0000000000000000000000000000000D0000?L0002?0000D`0005@0000^0@00 7P0003<1000`00000@0003a4SCmMTX`o>Q`00=@200010000C0000000000000000000000000000000 D0000?L0002?0000D`0005@0000^0@00=@0003<1001700000@0003a4SCmMTX`o>Q`0008500010000 C0000000000000000000000000000000D0000?P0002?0000D`0005@0000^0@00500003<1000V0000 0@0003a4SCmMTX`o>Q`00=h100010000C0000000000000000000000000000000D0000?H0002?0000 D`0005@000380000:`000L0002?0000D`0005@0003800007P000L0002?0000D`0005@000380000 =@000P0W8>?0000D`0005@00038000050000H0002?0000D`0005@000080@008P000101000d0000 0@0003a4SCmMTX`o[1P002h300010000C0000000000000000000000000000000D00002go003G0000 D`0005@0001I00008P000640000d00000@0003a4SCmMTX`oCPP002h300010000C000000000000000 0000000000000000D00002d0T07G0000D`0005@0000>0000?P0001H0001@00000@0003a4SCmMTX`o B0400>0500010000C0000000000000000000000000000000D00003d0003G0000DP0004`100040000 P?koo`00000000000000090100010000108045@0J@1]06D0L`0P04h0I@1g0200DP1_06d0H@1^0000 BC800000KF9_K006002LPeb300000000 0000000000000?oo0000000000000000000000000000000000000000000000000000000000000000 0000000000010@410@410@41000U0000300000@0000X0000300000<0000U0000300000@0001D0000 F0000501001K0000G04006d000010000?4B=?efBS3mL7`00TPP00080001<00000000000000000000 00000000001@0000J`1d0<00001g0000E00005P0000D0@00J@0002<1001k00000@0003a4SCmMTX`o a1T00>@900020000C0000000000000000000000000000000D00007@0A01g00001`4005@0001D0000 60400540000O0@00H`000040000lA8doGI:000000000000002@0@00000000<20B9SKG=cJC4b001` 001FCTTb001CNFeRKf`01P00W8=LP`000000000000000000003oo`00000000000000000000000000 00000000000000000000000000000000000000410@410@410@4002D0000<00000`0002P0000<0000 100002D0000<00000`0005@0001H00009@4006d0000`0@00MP000040000lA8doGI:0400020000 C0000000000000000000000000000000D0000440@P2@0000S`0005@0001H0000V00002H0002S0000 ;`000040000lA8doGI:002>0`000P0004`00000000000000000000000000000050000110480 T00008l0001B0000C04000@00020o_oo0000000000000000T040000000040P0@E01Y06d0I@1c0200 CP1U07L0801B06l0K@1Q06h000000901000000000`818V=]Lg=a>000071d85I>BC800000KF9_K006 002LPeb3000000000000000000000?oo0000000000000000000000000000000000000000001SKG=c LFTh0000000000000000000000000000000000@0000O00004P00000000000000T040000000030P4R 001cLg5Y>000L7@PETi9BC800000001_K006002LPeb3 000000000000000000000?oo0000000000000000000000000000000000000000001SKGAUN3P00000 000000000000000000000000000000@0000M00004@00000000000000T040000000030P4RHfd007Ph 0000L7@PETi9"], "Graphics", ImageSize->{394, 126.5}, ImageMargins->{{36, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Diffusion coefficient is ", Cell[BoxData[ \(TraditionalForm\`D\_AB\)]], ". Rate constant is k. c0 is surface concentration." }], "Subsubtitle", Background->RGBColor[1, 1, 0.666667]], Cell[BoxData[ \(\(D\_AB = 1.5\ 10^\(-9\);\)\)], "Input"], Cell["k=35;", "Input"], Cell["c0=3 10^-2;", "Input"] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ StyleBox["Case 1: Penetration depth is limited by reaction: ", FontWeight->"Bold"], Cell[BoxData[ \(TraditionalForm\`\[Delta]\_d\/\[Delta]\_r\)]], ">>1" }], "Subsubtitle", Background->RGBColor[1, 1, 0.658824]], Cell["t=10^2;", "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(\[Delta]\_d = Sqrt[D\_AB\ t]\)], "Input"], Cell[BoxData[ \(0.0003872983346207417`\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(\[Delta]\_r = Sqrt[D\_AB/k]\)], "Input"], Cell[BoxData[ \(6.546536707079772`*^-6\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(\[Delta]\_d\/\[Delta]\_r\)], "Input"], Cell[BoxData[ \(59.16079783099615`\)], "Output"] }, Open ]], Cell["c=.;t=.;", "Input"] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Solving the governing equation with NDSolve using the following boundary \ condition c[10 ", Cell[BoxData[ \(TraditionalForm\`\[Delta]\_r\)]], "]=0 with ", Cell[BoxData[ \(TraditionalForm\`\[Delta]\_r\)]], "~", Cell[BoxData[ \(TraditionalForm\`10\^\(-5\)\)]], "." }], "Subsubtitle", Background->RGBColor[1, 1, 0.666667]], Cell[CellGroupData[{ Cell[BoxData[ \(sol = NDSolve[{D[c[t, x], {t, 1}] \[Equal] D\_AB\ D[c[t, x], {x, 2}] - k\ c[t, x], c[0, x] \[Equal] c0\ Exp[\(-10^20\)\ x], c[t, 0] \[Equal] c0, c[t, 1\ 10^\(-4\)] \[Equal] 0}, c[t, x], {x, 0, 1\ 10^\(-4\)}, {t, 0, 100}]\)], "Input"], Cell[BoxData[ RowBox[{"{", RowBox[{"{", RowBox[{\(c[t, x]\), "\[Rule]", RowBox[{ TagBox[\(InterpolatingFunction[{{0.`, 0.0001`}, {0.`, 100.`}}, "<>"]\), False, Editable->False], "[", \(x, t\), "]"}]}], "}"}], "}"}]], "Output"] }, Open ]], Cell[CellGroupData[{ Cell["\<\ plt1=Plot[Chop[c[t,x]/.sol/.t->10^2],{x,0,1 \ 10^-4},PlotRange->{0,0.03},PlotStyle->RGBColor[1,0,0]]\ \>", "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 9523.81 -8.53809e-018 20.6011 [ [.21429 -0.0125 -21 -9 ] [.21429 -0.0125 21 0 ] [.40476 -0.0125 -21 -9 ] [.40476 -0.0125 21 0 ] [.59524 -0.0125 -21 -9 ] [.59524 -0.0125 21 0 ] [.78571 -0.0125 -21 -9 ] [.78571 -0.0125 21 0 ] [.97619 -0.0125 -18 -9 ] [.97619 -0.0125 18 0 ] [.01131 .10301 -30 -4.5 ] [.01131 .10301 0 4.5 ] [.01131 .20601 -24 -4.5 ] [.01131 .20601 0 4.5 ] [.01131 .30902 -30 -4.5 ] [.01131 .30902 0 4.5 ] [.01131 .41202 -24 -4.5 ] [.01131 .41202 0 4.5 ] [.01131 .51503 -30 -4.5 ] [.01131 .51503 0 4.5 ] [.01131 .61803 -24 -4.5 ] [.01131 .61803 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 0 m .21429 .00625 L s [(0.00002)] .21429 -0.0125 0 1 Mshowa .40476 0 m .40476 .00625 L s [(0.00004)] .40476 -0.0125 0 1 Mshowa .59524 0 m .59524 .00625 L s [(0.00006)] .59524 -0.0125 0 1 Mshowa .78571 0 m .78571 .00625 L s [(0.00008)] .78571 -0.0125 0 1 Mshowa .97619 0 m .97619 .00625 L s [(0.0001)] .97619 -0.0125 0 1 Mshowa .125 Mabswid .07143 0 m .07143 .00375 L s .11905 0 m .11905 .00375 L s .16667 0 m .16667 .00375 L s .2619 0 m .2619 .00375 L s .30952 0 m .30952 .00375 L s .35714 0 m .35714 .00375 L s .45238 0 m .45238 .00375 L s .5 0 m .5 .00375 L s .54762 0 m .54762 .00375 L s .64286 0 m .64286 .00375 L s .69048 0 m .69048 .00375 L s .7381 0 m .7381 .00375 L s .83333 0 m .83333 .00375 L s .88095 0 m .88095 .00375 L s .92857 0 m .92857 .00375 L s .25 Mabswid 0 0 m 1 0 L s .02381 .10301 m .03006 .10301 L s [(0.005)] .01131 .10301 1 0 Mshowa .02381 .20601 m .03006 .20601 L s [(0.01)] .01131 .20601 1 0 Mshowa .02381 .30902 m .03006 .30902 L s [(0.015)] .01131 .30902 1 0 Mshowa .02381 .41202 m .03006 .41202 L s [(0.02)] .01131 .41202 1 0 Mshowa .02381 .51503 m .03006 .51503 L s [(0.025)] .01131 .51503 1 0 Mshowa .02381 .61803 m .03006 .61803 L s [(0.03)] .01131 .61803 1 0 Mshowa .125 Mabswid .02381 .0206 m .02756 .0206 L s .02381 .0412 m .02756 .0412 L s .02381 .0618 m .02756 .0618 L s .02381 .0824 m .02756 .0824 L s .02381 .12361 m .02756 .12361 L s .02381 .14421 m .02756 .14421 L s .02381 .16481 m .02756 .16481 L s .02381 .18541 m .02756 .18541 L s .02381 .22661 m .02756 .22661 L s .02381 .24721 m .02756 .24721 L s .02381 .26781 m .02756 .26781 L s .02381 .28842 m .02756 .28842 L s .02381 .32962 m .02756 .32962 L s .02381 .35022 m .02756 .35022 L s .02381 .37082 m .02756 .37082 L s .02381 .39142 m .02756 .39142 L s .02381 .43262 m .02756 .43262 L s .02381 .45322 m .02756 .45322 L s .02381 .47383 m .02756 .47383 L s .02381 .49443 m .02756 .49443 L s .02381 .53563 m .02756 .53563 L s .02381 .55623 m .02756 .55623 L s .02381 .57683 m .02756 .57683 L s .02381 .59743 m .02756 .59743 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 1 0 0 r .5 Mabswid .02381 .61803 m .04262 .46255 L .06244 .33843 L .08255 .24523 L .10458 .17179 L .12415 .1252 L .14509 .08943 L .16639 .06367 L .18653 .04619 L .20651 .03349 L .22495 .02471 L .24367 .01832 L .2643 .01318 L .28371 .0096 L .30459 .00682 L .31469 .00581 L .32572 .00488 L .34581 .00352 L .36548 .00254 L .37648 .00213 L .38646 .00182 L .4057 .00134 L .41563 .00114 L .42652 .00095 L .44646 .00069 L .46753 .00049 L .48704 .00036 L .50795 .00025 L .51812 .00022 L .52919 .00018 L .54931 .00013 L .56909 9e-005 L .57907 8e-005 L .59009 7e-005 L .60944 5e-005 L .6194 4e-005 L .6303 4e-005 L .65034 3e-005 L .67144 2e-005 L .69105 1e-005 L .712 1e-005 L .72224 1e-005 L .73334 1e-005 L .7535 0 L .77337 0 L .78339 0 L .79441 0 L .81386 0 L .83475 0 L .84488 0 L Mistroke .85593 0 L .86648 0 L .87603 0 L .88551 0 L .89574 0 L .90656 0 L .91673 0 L .93631 0 L .94168 0 L .94742 0 L .95275 0 L .95778 0 L .9624 0 L .96742 0 L .97619 0 L Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg5oo`0000Eoo`00Oomoo`0000Qoo`04001oogoo0002Ool01000 Oomoo`000goo0P001Goo00<007ooOol067oo00=l07ooOol0hGoo00001Goo001oogoo000027oo00@0 07ooOol0009oo`04001oogoo0003Ool00`00Oomoo`04Ool00`00Oomoo`0GOol00g`0Oomoo`3ROol0 009oo`8000Yoo`8000Aoo`8000Aoo`<000Aoo`03001oogoo01Ioo`03O01oogoo0>=oo`008Goo00<0 07ooOol05Woo00=l07ooOol0hgoo000QOol2000FOol00g`0Oomoo`3TOol0025oo`03001oogoo01Eo o`03O01oogoo0>Aoo`008Goo00<007ooOol057oo00=l07ooOol0iGoo000QOol00`00Oomoo`0DOol0 0g`0Oomoo`3UOol0025oo`03001oogoo01Aoo`03O01oogoo0>Eoo`008Goo0P0057oo00=l07ooOol0 iWoo000QOol00`00Oomoo`0COol00g`0Oomoo`3VOol0025oo`03001oogoo01=oo`03O01oogoo0>Io o`008Goo00<007ooOol04Woo00=l07ooOol0igoo000QOol00`00Oomoo`0BOol00g`0Oomoo`3WOol0 025oo`8001=oo`03O01oogoo0>Moo`008Goo00<007ooOol04Goo00=l07ooOol0j7oo000QOol00`00 Oomoo`0AOol00g`0Oomoo`3XOol0025oo`03001oogoo015oo`03O01oogoo0>Qoo`008Goo00<007oo Ool047oo00=l07ooOol0jGoo000QOol2000AOol00g`0Oomoo`3YOol0025oo`03001oogoo011oo`03 O01oogoo0>Uoo`008Goo00<007ooOol03goo00=l07ooOol0jWoo0008Ool20004Ool20004Ool20003 Ool50003Ool00`00Oomoo`0?Ool00g`0Oomoo`3ZOol000Moo`04001oogoo0008Ool01000Oomoo`00 17oo00<007ooOol00goo00<007ooOol03goo00=l07ooOol0jWoo0007Ool01000Oomoo`0027oo00@0 07ooOol000Aoo`03001oogoo00=oo`8000moo`03O01oogoo0>]oo`001goo00@007ooOol000Qoo`04 001oogoo0004Ool00`00Oomoo`03Ool00`00Oomoo`0>Ool00g`0Oomoo`3[Ool000Moo`04001oogoo 0008Ool01000Oomoo`0017oo00<007ooOol00goo00<007ooOol03Woo00=l07ooOol0jgoo0008Ool2 000:Ool20004Ool20005Ool00`00Oomoo`0=Ool00g`0Oomoo`3/Ool0025oo`03001oogoo00eoo`03 O01oogoo0>aoo`008Goo0P003Woo00=l07ooOol0k7oo000QOol00`00Oomoo`0eoo`008Goo00<007ooOol037oo00=l07ooOol0kGoo 000QOol00`00Oomoo`0;Ool00g`0Oomoo`3^Ool0025oo`03001oogoo00]oo`03O01oogoo0>ioo`00 8Goo0P0037oo00=l07ooOol0kWoo000QOol00`00Oomoo`0;Ool00g`0Oomoo`3^Ool0025oo`03001o ogoo00Yoo`03O01oogoo0>moo`008Goo00<007ooOol02Woo00=l07ooOol0kgoo000QOol00`00Oomo o`0:Ool00g`0Oomoo`3_Ool0025oo`8000]oo`03O01oogoo0>moo`008Goo00<007ooOol02Goo00=l 07ooOol0l7oo000QOol00`00Oomoo`09Ool00g`0Oomoo`3`Ool0025oo`03001oogoo00Uoo`03O01o ogoo0?1oo`008Goo00<007ooOol02Goo00=l07ooOol0l7oo000QOol2000:Ool00g`0Oomoo`3`Ool0 025oo`03001oogoo00Qoo`03O01oogoo0?5oo`008Goo00<007ooOol027oo00=l07ooOol0lGoo0002 Ool20004Ool20004Ool20003Ool50002Ool20005Ool00`00Oomoo`08Ool00g`0Oomoo`3aOol00005 Ool007ooOol00008Ool01000Oomoo`0017oo00D007ooOomoo`00009oo`03001oogoo009oo`03001o ogoo00Qoo`03O01oogoo0?5oo`0000Eoo`00Oomoo`0000Qoo`04001oogoo0004Ool00`00Oomoo`04 Ool00`00Oomoo`02Ool20009Ool00g`0Oomoo`3aOol00005Ool007ooOol00008Ool01000Oomoo`00 17oo00<007ooOol00Woo0P001Goo00<007ooOol01goo00=l07ooOol0lWoo00001Goo001oogoo0000 27oo00@007ooOol000Aoo`03001oogoo009oo`03001oogoo00Aoo`03001oogoo00Moo`03O01oogoo 0?9oo`000Woo0P002Woo0P0017oo0P0017oo0`0017oo00<007ooOol01goo00=l07ooOol0lWoo000Q Ool00`00Oomoo`07Ool00g`0Oomoo`3bOol0025oo`8000Moo`03O01oogoo0?=oo`008Goo00<007oo Ool01Woo00=l07ooOol0lgoo000QOol00`00Oomoo`06Ool00g`0Oomoo`3cOol0025oo`03001oogoo 00Ioo`03O01oogoo0?=oo`008Goo00<007ooOol01Woo00=l07ooOol0lgoo000QOol20007Ool00g`0 Oomoo`3cOol0025oo`03001oogoo00Eoo`03O01oogoo0?Aoo`008Goo00<007ooOol01Goo00=l07oo Ool0m7oo000QOol00`00Oomoo`05Ool00g`0Oomoo`3dOol0025oo`03001oogoo00Eoo`03O01oogoo 0?Aoo`008Goo0P001Woo00=l07ooOol0m7oo000QOol00`00Oomoo`05Ool00g`0Oomoo`3dOol0025o o`03001oogoo00Aoo`03O01oogoo0?Eoo`008Goo00<007ooOol017oo00=l07ooOol0mGoo000QOol0 0`00Oomoo`04Ool00g`0Oomoo`3eOol0025oo`8000Eoo`03O01oogoo0?Eoo`008Goo00<007ooOol0 17oo00=l07ooOol0mGoo000QOol00`00Oomoo`04Ool00g`0Oomoo`3eOol000Qoo`8000Aoo`8000Ao o`8000=oo`@000Aoo`03001oogoo00=oo`03O01oogoo0?Ioo`001goo00@007ooOol000Qoo`04001o ogoo0002Ool00`00Oomoo`05Ool00`00Oomoo`03Ool00g`0Oomoo`3fOol000Moo`04001oogoo0008 Ool01000Oomoo`000goo00<007ooOol017oo0P0017oo00=l07ooOol0mWoo0007Ool01000Oomoo`00 27oo00@007ooOol000Aoo`03001oogoo00=oo`03001oogoo00=oo`03O01oogoo0?Ioo`001goo00@0 07ooOol000Qoo`04001oogoo0002Ool01000Oomoo`0017oo00<007ooOol00goo00=l07ooOol0mWoo 0008Ool2000:Ool20004Ool20005Ool00`00Oomoo`03Ool00g`0Oomoo`3fOol0025oo`03001oogoo 009oo`03O01oogoo0?Moo`008Goo0P000goo00=l07ooOol0mgoo000QOol00`00Oomoo`02Ool00g`0 Oomoo`3gOol0025oo`03001oogoo009oo`03O01oogoo0?Moo`008Goo00<007ooOol00Woo00=l07oo Ool0mgoo000QOol00`00Oomoo`02Ool00g`0Oomoo`3gOol0025oo`05001oogooOoml003jOol0025o o`80009oo`03O01oogoo0?Qoo`008Goo00D007ooOomoog`00?Yoo`008Goo00D007ooOomoog`00?Yo o`008Goo00D007ooOomoog`00?Yoo`008Goo00D007ooOomoog`00?Yoo`008Goo0P000Woo00=l07oo Ool0n7oo000QOol01@00OomoogooO000nWoo000QOol01000Oomoog`0ngoo000QOol01000Oomoog`0 ngoo000QOol01000Oomoog`0ngoo000QOol200000gooO01oo`3jOol0025oo`04001oogooO03kOol0 025oo`04001oogooO03kOol0009oo`8000Aoo`8000Aoo`8000=oo`@000=oo`8000Eoo`04001oogoo O03kOol00005Ool007ooOol00008Ool01000Oomoo`000Woo00<007ooOol00goo00@007ooOol000Ao o`04001oogooO03kOol00005Ool007ooOol00008Ool01000Oomoo`000goo00<007ooOol01Goo00<0 07ooOol00Woo0P0000=oog`0Ool0nWoo00001Goo001oogoo000027oo00@007ooOol000Aoo`03001o ogoo009oo`8000Eoo`04001oogooO03kOol00005Ool007ooOol00008Ool01000Oomoo`000Woo00@0 07ooOol000=oo`03001oogoo00Aoo`03001oog`00?aoo`000Woo0P002Woo0P0017oo0P0017oo0`00 17oo00<007ooO000o7oo000QOol00`00Ooml003lOol0025oo`800003O01oogoo0?Yoo`008Goo00<0 07ooO000o7oo000QOol00`00Ooml003lOol0025oo`03001oog`00?aoo`008Goo00<007ooO000o7oo 000QOol200000g`0Oomoo`3jOol0025oo`03001l07oo0?aoo`008Goo00<007`0Ool0o7oo000QOol0 0`00O01oo`3lOol0025oo`03001l07oo0?aoo`008Goo00<007`0Ool0o7oo000QOol00`00O01oo`3l Ool0025oo`03001l07oo0?aoo`008Goo00<007`0Ool0o7oo000QOol00`00O01oo`3lOol0025oo`03 001l07oo0?aoo`008Goo00=l07ooOol0o7oo000QOol00g`0Oomoo`3lOol000Qoo`8000Aoo`8000Ao o`8000Aoo`8000Eoo`03O01oogoo0?aoo`001goo00@007ooOol000Qoo`04001oogoo0002Ool01000 Oomoo`0017oo00=l07ooOol0o7oo0007Ool01000Oomoo`0027oo00@007ooOol000Aoo`03001oogoo 00=oo`03O00007oo0?aoo`001goo00@007ooOol000Qoo`04001oogoo0005Ool00`00Oomoo`3oOol2 Ool000Moo`04001oogoo0008Ool01000Oomoo`000Woo00@007ooOol00?moo`Aoo`0027oo0P002Woo 0P0017oo0P00ogoo1Goo003oOolQOol00?moob5oo`00ogoo8Goo003oOolQOol00?moob5oo`00\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-1.40301*^-05, -0.0030816, \ 4.23905*^-07, 0.00019597}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Danckwerts' solution:", "Subsubtitle", Background->RGBColor[1, 1, 0.666667]], Cell[CellGroupData[{ Cell[BoxData[ \(c = c0\ \((0.5\ Exp[\(-x\)\ \((k/D\_AB)\)^0.5]\ Erfc[ x/\((2\ \((t\ D\_AB)\)^0.5)\) - \((t\ k)\)^0.5] + 0.5\ Exp[x\ \((k/D\_AB)\)^0.5]\ Erfc[ x/\((2\ \((t\ D\_AB)\)^0.5)\) + \((t\ k)\)^0.5])\)\)], "Input"], Cell[BoxData[ \(3\/100\ \((0.5`\ \[ExponentialE]\^\(\(-152752.52316519467`\)\ x\)\ \ Erfc[\(-5.916079783099616`\)\ t\^0.5` + \(12909.944487358056`\ x\)\/t\^0.5`] \ + 0.5`\ \[ExponentialE]\^\(152752.52316519467`\ x\)\ Erfc[ 5.916079783099616`\ t\^0.5` + \(12909.944487358056`\ \ x\)\/t\^0.5`])\)\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell["\<\ plt2=Plot[Chop[c/.t->10^2],{x,0,10^-4},PlotRange->{0,0.03},PlotStyle->\ RGBColor[0,0,1]]\ \>", "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 9523.81 -8.53809e-018 20.6011 [ [.21429 -0.0125 -21 -9 ] [.21429 -0.0125 21 0 ] [.40476 -0.0125 -21 -9 ] [.40476 -0.0125 21 0 ] [.59524 -0.0125 -21 -9 ] [.59524 -0.0125 21 0 ] [.78571 -0.0125 -21 -9 ] [.78571 -0.0125 21 0 ] [.97619 -0.0125 -18 -9 ] [.97619 -0.0125 18 0 ] [.01131 .10301 -30 -4.5 ] [.01131 .10301 0 4.5 ] [.01131 .20601 -24 -4.5 ] [.01131 .20601 0 4.5 ] [.01131 .30902 -30 -4.5 ] [.01131 .30902 0 4.5 ] [.01131 .41202 -24 -4.5 ] [.01131 .41202 0 4.5 ] [.01131 .51503 -30 -4.5 ] [.01131 .51503 0 4.5 ] [.01131 .61803 -24 -4.5 ] [.01131 .61803 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 0 m .21429 .00625 L s [(0.00002)] .21429 -0.0125 0 1 Mshowa .40476 0 m .40476 .00625 L s [(0.00004)] .40476 -0.0125 0 1 Mshowa .59524 0 m .59524 .00625 L s [(0.00006)] .59524 -0.0125 0 1 Mshowa .78571 0 m .78571 .00625 L s [(0.00008)] .78571 -0.0125 0 1 Mshowa .97619 0 m .97619 .00625 L s [(0.0001)] .97619 -0.0125 0 1 Mshowa .125 Mabswid .07143 0 m .07143 .00375 L s .11905 0 m .11905 .00375 L s .16667 0 m .16667 .00375 L s .2619 0 m .2619 .00375 L s .30952 0 m .30952 .00375 L s .35714 0 m .35714 .00375 L s .45238 0 m .45238 .00375 L s .5 0 m .5 .00375 L s .54762 0 m .54762 .00375 L s .64286 0 m .64286 .00375 L s .69048 0 m .69048 .00375 L s .7381 0 m .7381 .00375 L s .83333 0 m .83333 .00375 L s .88095 0 m .88095 .00375 L s .92857 0 m .92857 .00375 L s .25 Mabswid 0 0 m 1 0 L s .02381 .10301 m .03006 .10301 L s [(0.005)] .01131 .10301 1 0 Mshowa .02381 .20601 m .03006 .20601 L s [(0.01)] .01131 .20601 1 0 Mshowa .02381 .30902 m .03006 .30902 L s [(0.015)] .01131 .30902 1 0 Mshowa .02381 .41202 m .03006 .41202 L s [(0.02)] .01131 .41202 1 0 Mshowa .02381 .51503 m .03006 .51503 L s [(0.025)] .01131 .51503 1 0 Mshowa .02381 .61803 m .03006 .61803 L s [(0.03)] .01131 .61803 1 0 Mshowa .125 Mabswid .02381 .0206 m .02756 .0206 L s .02381 .0412 m .02756 .0412 L s .02381 .0618 m .02756 .0618 L s .02381 .0824 m .02756 .0824 L s .02381 .12361 m .02756 .12361 L s .02381 .14421 m .02756 .14421 L s .02381 .16481 m .02756 .16481 L s .02381 .18541 m .02756 .18541 L s .02381 .22661 m .02756 .22661 L s .02381 .24721 m .02756 .24721 L s .02381 .26781 m .02756 .26781 L s .02381 .28842 m .02756 .28842 L s .02381 .32962 m .02756 .32962 L s .02381 .35022 m .02756 .35022 L s .02381 .37082 m .02756 .37082 L s .02381 .39142 m .02756 .39142 L s .02381 .43262 m .02756 .43262 L s .02381 .45322 m .02756 .45322 L s .02381 .47383 m .02756 .47383 L s .02381 .49443 m .02756 .49443 L s .02381 .53563 m .02756 .53563 L s .02381 .55623 m .02756 .55623 L s .02381 .57683 m .02756 .57683 L s .02381 .59743 m .02756 .59743 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 0 0 1 r .5 Mabswid .02381 .61803 m .04262 .45709 L .06244 .33258 L .08255 .24089 L .10458 .1692 L .12415 .12361 L .14509 .08835 L .16639 .06278 L .18653 .04545 L .20651 .03299 L .22495 .02454 L .24367 .01818 L .2643 .01306 L .28371 .00956 L .30459 .00684 L .32572 .00488 L .34581 .00353 L .36562 .00257 L .384 .00191 L .40453 .00138 L .42313 .00102 L .44238 .00075 L .4632 .00054 L .48314 .00039 L .5042 .00028 L .52384 .0002 L .54217 .00015 L .56253 .00011 L .58108 8e-005 L .60017 6e-005 L .62093 4e-005 L .6407 3e-005 L .66171 2e-005 L .68118 2e-005 L .69946 1e-005 L .71964 1e-005 L .73815 1e-005 L .75707 0 L .77777 0 L .79738 0 L .81833 0 L .83968 0 L .85983 0 L .87985 0 L .8983 0 L .91706 0 L .9377 0 L .95626 0 L .97619 0 L s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg1oo`0000Eoo`00Oomoo`0000Qoo`04001oogoo0002Ool01000Oomoo`001Goo00<007oo Ool00Woo0P006Goo00<07gooOol0hGoo00001Goo001oogoo000027oo00@007ooOol0009oo`04001o ogoo0003Ool20005Ool00`00Oomoo`0HOol00`0OOomoo`3QOol00005Ool007ooOol00008Ool01000 Oomoo`000Woo00@007ooOol000=oo`03001oogoo00Aoo`03001oogoo01Moo`0301moogoo0>9oo`00 0Woo0P002Woo0P0017oo0P0017oo0`0017oo00<007ooOol05Woo00<07gooOol0hgoo000QOol00`00 Oomoo`0FOol00`0OOomoo`3SOol0025oo`8001Ioo`0301moogoo0>Aoo`008Goo00<007ooOol05Goo 00<07gooOol0i7oo000QOol00`00Oomoo`0DOol00`0OOomoo`3UOol0025oo`03001oogoo01Aoo`03 01moogoo0>Eoo`008Goo00<007ooOol057oo00<07gooOol0iGoo000QOol2000DOol00`0OOomoo`3V Ool0025oo`03001oogoo01=oo`0301moogoo0>Ioo`008Goo00<007ooOol04Woo00<07gooOol0igoo 000QOol00`00Oomoo`0BOol00`0OOomoo`3WOol0025oo`03001oogoo019oo`0301moogoo0>Moo`00 8Goo0P004Woo00<07gooOol0j7oo000QOol00`00Oomoo`0AOol00`0OOomoo`3XOol0025oo`03001o ogoo015oo`0301moogoo0>Qoo`008Goo00<007ooOol047oo00<07gooOol0jGoo000QOol00`00Oomo o`0@Ool00`0OOomoo`3YOol0025oo`80015oo`0301moogoo0>Uoo`008Goo00<007ooOol03goo00<0 7gooOol0jWoo000QOol00`00Oomoo`0?Ool00`0OOomoo`3ZOol000Qoo`8000Aoo`8000Aoo`8000=o o`D000=oo`03001oogoo00moo`0301moogoo0>Yoo`001goo00@007ooOol000Qoo`04001oogoo0004 Ool00`00Oomoo`03Ool00`00Oomoo`0>Ool00`0OOomoo`3[Ool000Moo`04001oogoo0008Ool01000 Oomoo`0017oo00<007ooOol00goo0P003goo00<07gooOol0jgoo0007Ool01000Oomoo`0027oo00@0 07ooOol000Aoo`03001oogoo00=oo`03001oogoo00ioo`0301moogoo0>]oo`001goo00@007ooOol0 00Qoo`04001oogoo0004Ool00`00Oomoo`03Ool00`00Oomoo`0=Ool00`0OOomoo`3/Ool000Qoo`80 00Yoo`8000Aoo`8000Eoo`03001oogoo00eoo`0301moogoo0>aoo`008Goo00<007ooOol03Goo00<0 7gooOol0k7oo000QOol2000=Ool00`0OOomoo`3]Ool0025oo`03001oogoo00aoo`0301moogoo0>eo o`008Goo00<007ooOol037oo00<07gooOol0kGoo000QOol00`00Oomoo`0;Ool00`0OOomoo`3^Ool0 025oo`03001oogoo00]oo`0301moogoo0>ioo`008Goo00<007ooOol02goo00<07gooOol0kWoo000Q Ool2000moo`008Goo00<007oo Ool02Woo00<07gooOol0kgoo000QOol00`00Oomoo`0:Ool00`0OOomoo`3_Ool0025oo`03001oogoo 00Yoo`0301moogoo0>moo`008Goo0P002Woo00<07gooOol0l7oo000QOol00`00Oomoo`09Ool00`0O Oomoo`3`Ool0025oo`03001oogoo00Uoo`0301moogoo0?1oo`008Goo00<007ooOol02Goo00<07goo Ool0l7oo000QOol00`00Oomoo`09Ool00`0OOomoo`3`Ool0025oo`8000Uoo`0301moogoo0?5oo`00 8Goo00<007ooOol027oo00<07gooOol0lGoo000QOol00`00Oomoo`08Ool00`0OOomoo`3aOol0009o o`8000Aoo`8000Aoo`8000=oo`D0009oo`8000Eoo`03001oogoo00Qoo`0301moogoo0?5oo`0000Eo o`00Oomoo`0000Qoo`04001oogoo0004Ool01@00Oomoogoo00000Woo00<007ooOol00Woo00<007oo Ool027oo00<07gooOol0lGoo00001Goo001oogoo000027oo00@007ooOol000Aoo`03001oogoo00Ao o`03001oogoo009oo`8000Qoo`0301moogoo0?9oo`0000Eoo`00Oomoo`0000Qoo`04001oogoo0004 Ool00`00Oomoo`02Ool20005Ool00`00Oomoo`07Ool00`0OOomoo`3bOol00005Ool007ooOol00008 Ool01000Oomoo`0017oo00<007ooOol00Woo00<007ooOol017oo00<007ooOol01goo00<07gooOol0 lWoo0002Ool2000:Ool20004Ool20004Ool30004Ool00`00Oomoo`07Ool00`0OOomoo`3bOol0025o o`03001oogoo00Ioo`0301moogoo0?=oo`008Goo0P001goo00<07gooOol0lgoo000QOol00`00Oomo o`06Ool00`0OOomoo`3cOol0025oo`03001oogoo00Ioo`0301moogoo0?=oo`008Goo00<007ooOol0 1Woo00<07gooOol0lgoo000QOol00`00Oomoo`06Ool00`0OOomoo`3cOol0025oo`8000Ioo`0301mo ogoo0?Aoo`008Goo00<007ooOol01Goo00<07gooOol0m7oo000QOol00`00Oomoo`05Ool00`0OOomo o`3dOol0025oo`03001oogoo00Eoo`0301moogoo0?Aoo`008Goo00<007ooOol01Goo00<07gooOol0 m7oo000QOol20006Ool00`0OOomoo`3dOol0025oo`03001oogoo00Aoo`0301moogoo0?Eoo`008Goo 00<007ooOol017oo00<07gooOol0mGoo000QOol00`00Oomoo`04Ool00`0OOomoo`3eOol0025oo`03 001oogoo00Aoo`0301moogoo0?Eoo`008Goo0P001Goo00<07gooOol0mGoo000QOol00`00Oomoo`04 Ool00`0OOomoo`3eOol0025oo`03001oogoo00=oo`0301moogoo0?Ioo`0027oo0P0017oo0P0017oo 0P000goo100017oo00<007ooOol00goo00<07gooOol0mWoo0007Ool01000Oomoo`0027oo00@007oo Ool0009oo`03001oogoo00Eoo`03001oogoo00=oo`0301moogoo0?Ioo`001goo00@007ooOol000Qo o`04001oogoo0003Ool00`00Oomoo`04Ool20004Ool00`0OOomoo`3fOol000Moo`04001oogoo0008 Ool01000Oomoo`0017oo00<007ooOol00goo00<007ooOol00goo00<07gooOol0mWoo0007Ool01000 Oomoo`0027oo00@007ooOol0009oo`04001oogoo0004Ool00`00Oomoo`03Ool00`0OOomoo`3fOol0 00Qoo`8000Yoo`8000Aoo`8000Eoo`03001oogoo009oo`0301moogoo0?Moo`008Goo00<007ooOol0 0Woo00<07gooOol0mgoo000QOol20003Ool00`0OOomoo`3gOol0025oo`03001oogoo009oo`0301mo ogoo0?Moo`008Goo00<007ooOol00Woo00<07gooOol0mgoo000QOol00`00Oomoo`02Ool00`0OOomo o`3gOol0025oo`05001oogooOol07`3jOol0025oo`05001oogooOol07`3jOol0025oo`80009oo`03 01moogoo0?Qoo`008Goo00D007ooOomoo`0O0?Yoo`008Goo00D007ooOomoo`0O0?Yoo`008Goo00D0 07ooOomoo`0O0?Yoo`008Goo00D007ooOomoo`0O0?Yoo`008Goo0P000Woo00<07gooOol0n7oo000Q Ool01000Oomoo`0Ongoo000QOol01000Oomoo`0Ongoo000QOol01000Oomoo`0Ongoo000QOol01000 Oomoo`0Ongoo000QOol200000goo01moo`3jOol0025oo`04001oogoo01okOol0025oo`04001oogoo 01okOol0009oo`8000Aoo`8000Aoo`8000=oo`@000=oo`8000Eoo`04001oogoo01okOol00005Ool0 07ooOol00008Ool01000Oomoo`000Woo00<007ooOol00goo00@007ooOol000Aoo`04001oogoo01ok Ool00005Ool007ooOol00008Ool01000Oomoo`000goo00<007ooOol01Goo00<007ooOol00Woo0P00 00=oo`0OOol0nWoo00001Goo001oogoo000027oo00@007ooOol000Aoo`03001oogoo009oo`8000Eo o`03001oo`0O0?aoo`0000Eoo`00Oomoo`0000Qoo`04001oogoo0002Ool01000Oomoo`000goo00<0 07ooOol017oo00<007oo01l0o7oo0002Ool2000:Ool20004Ool20004Ool30004Ool00`00Ool07`3l Ool0025oo`03001oo`0O0?aoo`008Goo0P0000<07gooOol0nWoo000QOol00`00Ool07`3lOol0025o o`03001oo`0O0?aoo`008Goo00<007oo01l0o7oo000QOol00`00Ool07`3lOol0025oo`80000301mo ogoo0?Yoo`008Goo00<0000OOol0o7oo000QOol00`0001moo`3lOol0025oo`0300007goo0?aoo`00 8Goo00<0000OOol0o7oo000QOol00`0001moo`3lOol0025oo`0300007goo0?aoo`008Goo00<0000O Ool0o7oo000QOol00`0001moo`3lOol0025oo`0300007goo0?aoo`008Goo00<0000OOol0o7oo000Q Ool00`0OOomoo`3lOol0025oo`0301moogoo0?aoo`0027oo0P0017oo0P0017oo0P0017oo0P001Goo 00<07gooOol0o7oo0007Ool01000Oomoo`0027oo00@007ooOol0009oo`04001oogoo0004Ool00`0O Oomoo`3lOol000Moo`04001oogoo0008Ool01000Oomoo`0017oo00<007ooOol00goo00<07`00Ool0 o7oo0007Ool01000Oomoo`0027oo00@007ooOol000Eoo`03001oogoo0?moo`9oo`001goo00@007oo Ool000Qoo`04001oogoo0002Ool01000Oomoo`00ogoo17oo0008Ool2000:Ool20004Ool2003oOol5 Ool00?moob5oo`00ogoo8Goo003oOolQOol00?moob5oo`00ogoo8Goo0000\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-1.40301*^-05, -0.0030816, \ 4.23905*^-07, 0.00019597}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Both methods give the same concentration profile", "Subsubtitle", Background->RGBColor[1, 1, 0.666667]], Cell[CellGroupData[{ Cell["Show[plt1,plt2]", "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 9523.81 -8.53809e-018 20.6011 [ [.21429 -0.0125 -21 -9 ] [.21429 -0.0125 21 0 ] [.40476 -0.0125 -21 -9 ] [.40476 -0.0125 21 0 ] [.59524 -0.0125 -21 -9 ] [.59524 -0.0125 21 0 ] [.78571 -0.0125 -21 -9 ] [.78571 -0.0125 21 0 ] [.97619 -0.0125 -18 -9 ] [.97619 -0.0125 18 0 ] [.01131 .10301 -30 -4.5 ] [.01131 .10301 0 4.5 ] [.01131 .20601 -24 -4.5 ] [.01131 .20601 0 4.5 ] [.01131 .30902 -30 -4.5 ] [.01131 .30902 0 4.5 ] [.01131 .41202 -24 -4.5 ] [.01131 .41202 0 4.5 ] [.01131 .51503 -30 -4.5 ] [.01131 .51503 0 4.5 ] [.01131 .61803 -24 -4.5 ] [.01131 .61803 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 0 m .21429 .00625 L s [(0.00002)] .21429 -0.0125 0 1 Mshowa .40476 0 m .40476 .00625 L s [(0.00004)] .40476 -0.0125 0 1 Mshowa .59524 0 m .59524 .00625 L s [(0.00006)] .59524 -0.0125 0 1 Mshowa .78571 0 m .78571 .00625 L s [(0.00008)] .78571 -0.0125 0 1 Mshowa .97619 0 m .97619 .00625 L s [(0.0001)] .97619 -0.0125 0 1 Mshowa .125 Mabswid .07143 0 m .07143 .00375 L s .11905 0 m .11905 .00375 L s .16667 0 m .16667 .00375 L s .2619 0 m .2619 .00375 L s .30952 0 m .30952 .00375 L s .35714 0 m .35714 .00375 L s .45238 0 m .45238 .00375 L s .5 0 m .5 .00375 L s .54762 0 m .54762 .00375 L s .64286 0 m .64286 .00375 L s .69048 0 m .69048 .00375 L s .7381 0 m .7381 .00375 L s .83333 0 m .83333 .00375 L s .88095 0 m .88095 .00375 L s .92857 0 m .92857 .00375 L s .25 Mabswid 0 0 m 1 0 L s .02381 .10301 m .03006 .10301 L s [(0.005)] .01131 .10301 1 0 Mshowa .02381 .20601 m .03006 .20601 L s [(0.01)] .01131 .20601 1 0 Mshowa .02381 .30902 m .03006 .30902 L s [(0.015)] .01131 .30902 1 0 Mshowa .02381 .41202 m .03006 .41202 L s [(0.02)] .01131 .41202 1 0 Mshowa .02381 .51503 m .03006 .51503 L s [(0.025)] .01131 .51503 1 0 Mshowa .02381 .61803 m .03006 .61803 L s [(0.03)] .01131 .61803 1 0 Mshowa .125 Mabswid .02381 .0206 m .02756 .0206 L s .02381 .0412 m .02756 .0412 L s .02381 .0618 m .02756 .0618 L s .02381 .0824 m .02756 .0824 L s .02381 .12361 m .02756 .12361 L s .02381 .14421 m .02756 .14421 L s .02381 .16481 m .02756 .16481 L s .02381 .18541 m .02756 .18541 L s .02381 .22661 m .02756 .22661 L s .02381 .24721 m .02756 .24721 L s .02381 .26781 m .02756 .26781 L s .02381 .28842 m .02756 .28842 L s .02381 .32962 m .02756 .32962 L s .02381 .35022 m .02756 .35022 L s .02381 .37082 m .02756 .37082 L s .02381 .39142 m .02756 .39142 L s .02381 .43262 m .02756 .43262 L s .02381 .45322 m .02756 .45322 L s .02381 .47383 m .02756 .47383 L s .02381 .49443 m .02756 .49443 L s .02381 .53563 m .02756 .53563 L s .02381 .55623 m .02756 .55623 L s .02381 .57683 m .02756 .57683 L s .02381 .59743 m .02756 .59743 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 1 0 0 r .5 Mabswid .02381 .61803 m .04262 .46255 L .06244 .33843 L .08255 .24523 L .10458 .17179 L .12415 .1252 L .14509 .08943 L .16639 .06367 L .18653 .04619 L .20651 .03349 L .22495 .02471 L .24367 .01832 L .2643 .01318 L .28371 .0096 L .30459 .00682 L .31469 .00581 L .32572 .00488 L .34581 .00352 L .36548 .00254 L .37648 .00213 L .38646 .00182 L .4057 .00134 L .41563 .00114 L .42652 .00095 L .44646 .00069 L .46753 .00049 L .48704 .00036 L .50795 .00025 L .51812 .00022 L .52919 .00018 L .54931 .00013 L .56909 9e-005 L .57907 8e-005 L .59009 7e-005 L .60944 5e-005 L .6194 4e-005 L .6303 4e-005 L .65034 3e-005 L .67144 2e-005 L .69105 1e-005 L .712 1e-005 L .72224 1e-005 L .73334 1e-005 L .7535 0 L .77337 0 L .78339 0 L .79441 0 L .81386 0 L .83475 0 L .84488 0 L Mistroke .85593 0 L .86648 0 L .87603 0 L .88551 0 L .89574 0 L .90656 0 L .91673 0 L .93631 0 L .94168 0 L .94742 0 L .95275 0 L .95778 0 L .9624 0 L .96742 0 L .97619 0 L Mfstroke 0 0 1 r .02381 .61803 m .04262 .45709 L .06244 .33258 L .08255 .24089 L .10458 .1692 L .12415 .12361 L .14509 .08835 L .16639 .06278 L .18653 .04545 L .20651 .03299 L .22495 .02454 L .24367 .01818 L .2643 .01306 L .28371 .00956 L .30459 .00684 L .32572 .00488 L .34581 .00353 L .36562 .00257 L .384 .00191 L .40453 .00138 L .42313 .00102 L .44238 .00075 L .4632 .00054 L .48314 .00039 L .5042 .00028 L .52384 .0002 L .54217 .00015 L .56253 .00011 L .58108 8e-005 L .60017 6e-005 L .62093 4e-005 L .6407 3e-005 L .66171 2e-005 L .68118 2e-005 L .69946 1e-005 L .71964 1e-005 L .73815 1e-005 L .75707 0 L .77777 0 L .79738 0 L .81833 0 L .83968 0 L .85983 0 L .87985 0 L .8983 0 L .91706 0 L .9377 0 L .95626 0 L .97619 0 L s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg1oo`0000Eoo`00Oomoo`0000Qoo`04001oogoo0002 Ool01000Oomoo`001Goo00<007ooOol00Woo0P006Goo00<07gooOol0hGoo00001Goo001oogoo0000 27oo00@007ooOol0009oo`04001oogoo0003Ool20005Ool00`00Oomoo`0HOol00`0OOomoo`3QOol0 0005Ool007ooOol00008Ool01000Oomoo`000Woo00@007ooOol000=oo`03001oogoo00Aoo`03001o ogoo01Moo`0301moogoo0>9oo`000Woo0P002Woo0P0017oo0P0017oo0`0017oo00<007ooOol05Woo 00<07gooOol0hgoo000QOol00`00Oomoo`0FOol00`0OOomoo`3SOol0025oo`8001Ioo`0301moogoo 0>Aoo`008Goo00<007ooOol05Goo00<07gooOol0i7oo000QOol00`00Oomoo`0DOol00`0OOomoo`3U Ool0025oo`03001oogoo01Aoo`0301moogoo0>Eoo`008Goo00<007ooOol057oo00<07gooOol0iGoo 000QOol2000DOol00`0OOomoo`3VOol0025oo`03001oogoo01=oo`0301moogoo0>Ioo`008Goo00<0 07ooOol04Woo00<07g`0Ool0igoo000QOol00`00Oomoo`0BOol00`0OOomoo`3WOol0025oo`03001o ogoo019oo`0301moogoo0>Moo`008Goo0P004Woo00<07g`0Ool0j7oo000QOol00`00Oomoo`0AOol0 0`0OOomoo`3XOol0025oo`03001oogoo015oo`0301moogoo0>Qoo`008Goo00<007ooOol047oo00<0 7g`0Ool0jGoo000QOol00`00Oomoo`0@Ool00`0OOomoo`3YOol0025oo`80015oo`0301moogoo0>Uo o`008Goo00<007ooOol03goo00<07g`0Ool0jWoo000QOol00`00Oomoo`0?Ool00`0OOomoo`3ZOol0 00Qoo`8000Aoo`8000Aoo`8000=oo`D000=oo`03001oogoo00moo`0301moogoo0>Yoo`001goo00@0 07ooOol000Qoo`04001oogoo0004Ool00`00Oomoo`03Ool00`00Oomoo`0>Ool00`0OO01oo`3[Ool0 00Moo`04001oogoo0008Ool01000Oomoo`0017oo00<007ooOol00goo0P003goo00<07gooOol0jgoo 0007Ool01000Oomoo`0027oo00@007ooOol000Aoo`03001oogoo00=oo`03001oogoo00ioo`0301mo ogoo0>]oo`001goo00@007ooOol000Qoo`04001oogoo0004Ool00`00Oomoo`03Ool00`00Oomoo`0= Ool00`0OO01oo`3/Ool000Qoo`8000Yoo`8000Aoo`8000Eoo`03001oogoo00eoo`0301moogoo0>ao o`008Goo00<007ooOol03Goo00<07gooOol0k7oo000QOol2000=Ool00`0OO01oo`3]Ool0025oo`03 001oogoo00aoo`0301moogoo0>eoo`008Goo00<007ooOol037oo00<07gooOol0kGoo000QOol00`00 Oomoo`0;Ool00`0OO01oo`3^Ool0025oo`03001oogoo00]oo`0301moogoo0>ioo`008Goo00<007oo Ool02goo00<07gooOol0kWoo000QOol2000moo`008Goo00<007ooOol02Woo00<07gooOol0kgoo000QOol00`00Oomoo`0:Ool00`0O Oomoo`3_Ool0025oo`03001oogoo00Yoo`0301moogoo0>moo`008Goo0P002Woo00<07g`0Ool0l7oo 000QOol00`00Oomoo`09Ool00`0OOomoo`3`Ool0025oo`03001oogoo00Uoo`0301moogoo0?1oo`00 8Goo00<007ooOol02Goo00<07gooOol0l7oo000QOol00`00Oomoo`09Ool00`0OOomoo`3`Ool0025o o`8000Uoo`0301ml07oo0?5oo`008Goo00<007ooOol027oo00<07gooOol0lGoo000QOol00`00Oomo o`08Ool00`0OOomoo`3aOol0009oo`8000Aoo`8000Aoo`8000=oo`D0009oo`8000Eoo`03001oogoo 00Qoo`0301moogoo0?5oo`0000Eoo`00Oomoo`0000Qoo`04001oogoo0004Ool01@00Oomoogoo0000 0Woo00<007ooOol00Woo00<007ooOol027oo00<07gooOol0lGoo00001Goo001oogoo000027oo00@0 07ooOol000Aoo`03001oogoo00Aoo`03001oogoo009oo`8000Qoo`0301ml07oo0?9oo`0000Eoo`00 Oomoo`0000Qoo`04001oogoo0004Ool00`00Oomoo`02Ool20005Ool00`00Oomoo`07Ool00`0OOomo o`3bOol00005Ool007ooOol00008Ool01000Oomoo`0017oo00<007ooOol00Woo00<007ooOol017oo 00<007ooOol01goo00<07gooOol0lWoo0002Ool2000:Ool20004Ool20004Ool30004Ool00`00Oomo o`07Ool00`0OOomoo`3bOol0025oo`03001oogoo00Ioo`0301ml07oo0?=oo`008Goo0P001goo00<0 7gooOol0lgoo000QOol00`00Oomoo`06Ool00`0OOomoo`3cOol0025oo`03001oogoo00Ioo`0301mo ogoo0?=oo`008Goo00<007ooOol01Woo00<07gooOol0lgoo000QOol00`00Oomoo`06Ool00`0OOomo o`3cOol0025oo`8000Ioo`0301ml07oo0?Aoo`008Goo00<007ooOol01Goo00<07gooOol0m7oo000Q Ool00`00Oomoo`05Ool00`0OOomoo`3dOol0025oo`03001oogoo00Eoo`0301moogoo0?Aoo`008Goo 00<007ooOol01Goo00<07gooOol0m7oo000QOol20006Ool00`0OOomoo`3dOol0025oo`03001oogoo 00Aoo`0301ml07oo0?Eoo`008Goo00<007ooOol017oo00<07gooOol0mGoo000QOol00`00Oomoo`04 Ool00`0OOomoo`3eOol0025oo`03001oogoo00Aoo`0301moogoo0?Eoo`008Goo0P001Goo00<07goo Ool0mGoo000QOol00`00Oomoo`04Ool00`0OOomoo`3eOol0025oo`03001oogoo00=oo`0301ml07oo 0?Ioo`0027oo0P0017oo0P0017oo0P000goo100017oo00<007ooOol00goo00<07gooOol0mWoo0007 Ool01000Oomoo`0027oo00@007ooOol0009oo`03001oogoo00Eoo`03001oogoo00=oo`0301moogoo 0?Ioo`001goo00@007ooOol000Qoo`04001oogoo0003Ool00`00Oomoo`04Ool20004Ool00`0OOomo o`3fOol000Moo`04001oogoo0008Ool01000Oomoo`0017oo00<007ooOol00goo00<007ooOol00goo 00<07gooOol0mWoo0007Ool01000Oomoo`0027oo00@007ooOol0009oo`04001oogoo0004Ool00`00 Oomoo`03Ool00`0OOomoo`3fOol000Qoo`8000Yoo`8000Aoo`8000Eoo`03001oogoo009oo`0301ml 07oo0?Moo`008Goo00<007ooOol00Woo00<07gooOol0mgoo000QOol20003Ool00`0OOomoo`3gOol0 025oo`03001oogoo009oo`0301moogoo0?Moo`008Goo00<007ooOol00Woo00<07gooOol0mgoo000Q Ool00`00Oomoo`02Ool00`0OOomoo`3gOol0025oo`06001oogooOol07g`0nGoo000QOol01@00Oomo ogoo01l0nWoo000QOol20002Ool00`0OOomoo`3hOol0025oo`05001oogooOol07`3jOol0025oo`05 001oogooOol07`3jOol0025oo`05001oogooOol07`3jOol0025oo`05001oogooOol07`3jOol0025o o`80009oo`0301moogoo0?Qoo`008Goo00D007ooOol07g`00?Yoo`008Goo00@007ooOol07o]oo`00 8Goo00@007ooOol07o]oo`008Goo00@007ooOol07o]oo`008Goo0P0000=oo`0OOol0nWoo000QOol0 1000Oomoo`0Ongoo000QOol01000Oomoo`0Ongoo0002Ool20004Ool20004Ool20003Ool40003Ool2 0005Ool01000Oomoo`0Ongoo00001Goo001oogoo000027oo00@007ooOol0009oo`03001oogoo00=o o`04001oogoo0004Ool01000Oomoo`0Ongoo00001Goo001oogoo000027oo00@007ooOol000=oo`03 001oogoo00Eoo`03001oogoo009oo`800003Ool07goo0?Yoo`0000Eoo`00Oomoo`0000Qoo`04001o ogoo0004Ool00`00Oomoo`02Ool20005Ool01000Ool07g`0ngoo00001Goo001oogoo000027oo00@0 07ooOol0009oo`04001oogoo0003Ool00`00Oomoo`04Ool00`00Ool07`3lOol0009oo`8000Yoo`80 00Aoo`8000Aoo`<000Aoo`03001oo`0O0?aoo`008Goo00<007oo01l0o7oo000QOol200000`0OOomo o`3jOol0025oo`03001oo`0O0?aoo`008Goo00<007oo01l0o7oo000QOol00`00Ool07`3lOol0025o o`03001oo`0O0?aoo`008Goo0P0000<07gooOol0nWoo000QOol00`0001moo`3lOol0025oo`030000 7goo0?aoo`008Goo00<0000OOol0o7oo000QOol00`0001moo`3lOol0025oo`0300007goo0?aoo`00 8Goo00<0000OOol0o7oo000QOol00`0001moo`3lOol0025oo`0300007goo0?aoo`008Goo00<0000O Ool0o7oo000QOol00`0001moo`3lOol0025oo`0301moogoo0?aoo`008Goo00<07gooOol0o7oo0008 Ool20004Ool20004Ool20004Ool20005Ool00`0OOomoo`3lOol000Moo`04001oogoo0008Ool01000 Oomoo`000Woo00@007ooOol000Aoo`0301moogoo0?aoo`001goo00@007ooOol000Qoo`04001oogoo 0004Ool00`00Oomoo`03Ool00`0O001oo`3lOol000Moo`04001oogoo0008Ool01000Oomoo`001Goo 00<007ooOol0ogoo0Woo0007Ool01000Oomoo`0027oo00@007ooOol0009oo`04001oogoo003oOol4 Ool000Qoo`8000Yoo`8000Aoo`800?moo`Eoo`00ogoo8Goo003oOolQOol00?moob5oo`00ogoo8Goo 003oOolQOol00001\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-1.40301*^-05, -0.0030816, \ 4.23905*^-07, 0.00019597}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ StyleBox["Case 2: Penetration depth is limited by diffusion: ", FontWeight->"Bold"], Cell[BoxData[ \(TraditionalForm\`\[Delta]\_d\/\[Delta]\_r\)]], "<<1" }], "Subsubtitle", Background->RGBColor[1, 1, 0.658824]], Cell["t=10^-7;", "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(\[Delta]\_d = Sqrt[D\_AB\ t]\)], "Input"], Cell[BoxData[ \(1.224744871391589`*^-8\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(\[Delta]\_r = Sqrt[D\_AB/k]\)], "Input"], Cell[BoxData[ \(6.546536707079772`*^-6\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(\[Delta]\_d\/\[Delta]\_r\)], "Input"], Cell[BoxData[ \(0.0018708286933869704`\)], "Output"] }, Open ]], Cell["c=.;t=.;", "Input"] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Solving the governing equation with NDSolve using the following boundary \ condition c[10 ", Cell[BoxData[ \(TraditionalForm\`\[Delta]\_d\)]], "]=0 with ", Cell[BoxData[ \(TraditionalForm\`\[Delta]\_d\)]], "~", Cell[BoxData[ \(TraditionalForm\`10\^\(-8\)\)]], "." }], "Subsubtitle", Background->RGBColor[1, 1, 0.666667]], Cell[CellGroupData[{ Cell[BoxData[ \(sol = NDSolve[{D[c[t, x], {t, 1}] \[Equal] D\_AB\ D[c[t, x], {x, 2}] - k\ c[t, x], c[0, x] \[Equal] c0\ Exp[\(-10^20\)\ x], c[t, 0] \[Equal] c0, c[t, 1\ 10^\(-7\)] \[Equal] 0}, c[t, x], {x, 0, 1\ 10^\(-7\)}, {t, 0, 10^\(-5\)}]\)], "Input"], Cell[BoxData[ RowBox[{"{", RowBox[{"{", RowBox[{\(c[t, x]\), "\[Rule]", RowBox[{ TagBox[\(InterpolatingFunction[{{0.`, 1.`*^-7}, {0.`, 0.00001`}}, "<>"]\), False, Editable->False], "[", \(x, t\), "]"}]}], "}"}], "}"}]], "Output"] }, Open ]], Cell[CellGroupData[{ Cell["\<\ plt1=Plot[Chop[c[t,x]/.sol/.t->10^-7],{x,0,1 \ 10^-7},PlotRange->{0,0.03},PlotStyle->RGBColor[1,0,0]]\ \>", "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 9.52381e+006 -8.53809e-018 20.6011 [ [.21429 -0.0125 -16.5 -12.5 ] [.21429 -0.0125 16.5 0 ] [.40476 -0.0125 -16.5 -12.5 ] [.40476 -0.0125 16.5 0 ] [.59524 -0.0125 -16.5 -12.5 ] [.59524 -0.0125 16.5 0 ] [.78571 -0.0125 -16.5 -12.5 ] [.78571 -0.0125 16.5 0 ] [.97619 -0.0125 -16.5 -12.5 ] [.97619 -0.0125 16.5 0 ] [.01131 .10301 -30 -4.5 ] [.01131 .10301 0 4.5 ] [.01131 .20601 -24 -4.5 ] [.01131 .20601 0 4.5 ] [.01131 .30902 -30 -4.5 ] [.01131 .30902 0 4.5 ] [.01131 .41202 -24 -4.5 ] [.01131 .41202 0 4.5 ] [.01131 .51503 -30 -4.5 ] [.01131 .51503 0 4.5 ] [.01131 .61803 -24 -4.5 ] [.01131 .61803 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 0 m .21429 .00625 L s gsave .21429 -0.0125 -16.5 -10.5 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (2) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (-8) show grestore .40476 0 m .40476 .00625 L s gsave .40476 -0.0125 -16.5 -10.5 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (4) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (-8) show grestore .59524 0 m .59524 .00625 L s gsave .59524 -0.0125 -16.5 -10.5 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (6) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (-8) show grestore .78571 0 m .78571 .00625 L s gsave .78571 -0.0125 -16.5 -10.5 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (8) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (-8) show grestore .97619 0 m .97619 .00625 L s gsave .97619 -0.0125 -16.5 -10.5 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (1) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (-7) show grestore .125 Mabswid .07143 0 m .07143 .00375 L s .11905 0 m .11905 .00375 L s .16667 0 m .16667 .00375 L s .2619 0 m .2619 .00375 L s .30952 0 m .30952 .00375 L s .35714 0 m .35714 .00375 L s .45238 0 m .45238 .00375 L s .5 0 m .5 .00375 L s .54762 0 m .54762 .00375 L s .64286 0 m .64286 .00375 L s .69048 0 m .69048 .00375 L s .7381 0 m .7381 .00375 L s .83333 0 m .83333 .00375 L s .88095 0 m .88095 .00375 L s .92857 0 m .92857 .00375 L s .25 Mabswid 0 0 m 1 0 L s .02381 .10301 m .03006 .10301 L s [(0.005)] .01131 .10301 1 0 Mshowa .02381 .20601 m .03006 .20601 L s [(0.01)] .01131 .20601 1 0 Mshowa .02381 .30902 m .03006 .30902 L s [(0.015)] .01131 .30902 1 0 Mshowa .02381 .41202 m .03006 .41202 L s [(0.02)] .01131 .41202 1 0 Mshowa .02381 .51503 m .03006 .51503 L s [(0.025)] .01131 .51503 1 0 Mshowa .02381 .61803 m .03006 .61803 L s [(0.03)] .01131 .61803 1 0 Mshowa .125 Mabswid .02381 .0206 m .02756 .0206 L s .02381 .0412 m .02756 .0412 L s .02381 .0618 m .02756 .0618 L s .02381 .0824 m .02756 .0824 L s .02381 .12361 m .02756 .12361 L s .02381 .14421 m .02756 .14421 L s .02381 .16481 m .02756 .16481 L s .02381 .18541 m .02756 .18541 L s .02381 .22661 m .02756 .22661 L s .02381 .24721 m .02756 .24721 L s .02381 .26781 m .02756 .26781 L s .02381 .28842 m .02756 .28842 L s .02381 .32962 m .02756 .32962 L s .02381 .35022 m .02756 .35022 L s .02381 .37082 m .02756 .37082 L s .02381 .39142 m .02756 .39142 L s .02381 .43262 m .02756 .43262 L s .02381 .45322 m .02756 .45322 L s .02381 .47383 m .02756 .47383 L s .02381 .49443 m .02756 .49443 L s .02381 .53563 m .02756 .53563 L s .02381 .55623 m .02756 .55623 L s .02381 .57683 m .02756 .57683 L s .02381 .59743 m .02756 .59743 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 1 0 0 r .5 Mabswid .02381 .61803 m .06244 .50399 L .10458 .38579 L .14415 .28759 L .18221 .2082 L .22272 .14091 L .26171 .09206 L .28302 .07143 L .30316 .05551 L .34157 .03335 L .36141 .02525 L .38244 .0184 L .40197 .01346 L .42027 .00989 L .44052 .00695 L .45904 .00504 L .47803 .00363 L .49875 .00255 L .51842 .00175 L .5394 .00111 L .54968 .00087 L .56081 .00065 L .56592 .00057 L .57131 .00049 L .58098 .00039 L .59046 .00032 L .60062 .00026 L .61021 .00022 L .61895 .00019 L .6588 9e-005 L .67702 5e-005 L .68739 3e-005 L .69713 2e-005 L .70176 1e-005 L .70289 1e-005 L .70409 1e-005 L .70541 1e-005 L .70664 0 L .71199 0 L .7169 0 L s .7169 0 m .71788 0 L s .74744 0 m .74796 0 L .75719 0 L .7628 0 L .7681 0 L .77041 1e-005 L .77167 1e-005 L .77286 1e-005 L .77413 1e-005 L .77554 1e-005 L .77674 1e-005 L .77803 1e-005 L .77926 1e-005 L .7804 1e-005 L .78166 1e-005 L .78236 1e-005 L .783 1e-005 L .78429 1e-005 L .78569 1e-005 L .78823 1e-005 L .7906 1e-005 L .7931 1e-005 L .79757 1e-005 L .80755 0 L .8185 0 L s .8185 0 m .83625 0 L s .91696 0 m .9172 0 L .92803 0 L .9333 0 L .93808 0 L .94232 0 L .94455 0 L .9469 0 L .94811 1e-005 L .94943 1e-005 L .95063 1e-005 L .95175 1e-005 L .9529 1e-005 L .95395 1e-005 L .95516 1e-005 L .95631 1e-005 L .95745 1e-005 L .95871 1e-005 L .96002 0 L .96126 0 L .96346 0 L .96583 0 L .96847 0 L .97124 0 L .97619 0 L s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgOol2O02/Ool0 025oo`03001oogoo04aoo`9l0:ioo`008Goo00<007ooOol0BWoo0W`0/7oo000QOol20019Ool2O02b Ool0025oo`03001oogoo04Ioo`9l0;Aoo`008Goo00<007ooOol0A7oo0W`0]Woo000QOol00`00Oomo o`12Ool2O02hOol0025oo`03001oogoo045oo`03O01oogoo0;Qoo`008Goo0P00@7oo0W`0^goo000Q Ool00`00Oomoo`0nOol00g`0Oomoo`2kOol0025oo`03001oogoo03eoo`03O01oogoo0;aoo`008Goo 00<007ooOol0?7oo00=l07ooOol0_Goo000QOol00`00Oomoo`0kOol00g`0Oomoo`2nOol0025oo`80 03]oo`03O01oogoo0;moo`008Goo00<007ooOol0>Woo00=l07ooOol0_goo000QOol00`00Oomoo`0i Ool00g`0Oomoo`30Ool0009oo`8000Aoo`8000Aoo`8000Aoo`8000Aoo`8000Eoo`03001oogoo03Qo o`03O01oogoo0<5oo`0000Eoo`00Oomoo`0000Qoo`04001oogoo0002Ool01000Oomoo`000Woo00@0 07ooOol000Aoo`03001oogoo03Moo`03O01oogoo0<9oo`0000Eoo`00Oomoo`0000Qoo`04001oogoo 0002Ool01000Oomoo`001Goo00<007ooOol00Woo0P00=goo00=l07ooOol0`goo00001Goo001oogoo 000027oo00@007ooOol0009oo`04001oogoo0003Ool20005Ool00`00Oomoo`0eOol00g`0Oomoo`34 Ool00005Ool007ooOol00008Ool01000Oomoo`000Woo00@007ooOol000=oo`03001oogoo00Aoo`03 001oogoo03Eoo`03O01oogoo05oo`0000Eoo`00Oomoo`0000Qoo`04001o ogoo0004Ool00`00Oomoo`02Ool00`00Oomoo`04Ool00`00Oomoo`0HOol00g`0Oomoo`3QOol0009o o`8000Yoo`8000Aoo`8000Aoo`<000Aoo`03001oogoo01Moo`03O01oogoo0>9oo`008Goo00<007oo Ool05goo00=l07ooOol0hWoo000QOol2000HOol00g`0Oomoo`3ROol0025oo`03001oogoo01Ioo`03 O01oogoo0>=oo`008Goo00<007ooOol05Woo00=l07ooOol0hgoo000QOol00`00Oomoo`0EOol00g`0 Oomoo`3TOol0025oo`03001oogoo01Eoo`03O01oogoo0>Aoo`008Goo0P005Woo00=l07ooOol0i7oo 000QOol00`00Oomoo`0DOol00g`0Oomoo`3UOol0025oo`03001oogoo01Aoo`03O01oogoo0>Eoo`00 8Goo00<007ooOol04goo00=l07ooOol0iWoo000QOol00`00Oomoo`0COol00g`0Oomoo`3VOol0025o o`8001Aoo`03O01oogoo0>Ioo`008Goo00<007ooOol04Woo00=l07ooOol0igoo000QOol00`00Oomo o`0BOol00g`0Oomoo`3WOol0025oo`03001oogoo015oo`03O01oogoo0>Qoo`008Goo00<007ooOol0 4Goo00=l07ooOol0j7oo000QOol2000BOol00g`0Oomoo`3XOol0025oo`03001oogoo011oo`03O01o ogoo0>Uoo`008Goo00<007ooOol047oo00=l07ooOol0jGoo0008Ool20004Ool20004Ool20003Ool4 0004Ool00`00Oomoo`0?Ool00g`0Oomoo`3ZOol000Moo`04001oogoo0008Ool01000Oomoo`000Woo 00<007ooOol01Goo00<007ooOol03goo00=l07ooOol0jWoo0007Ool01000Oomoo`0027oo00@007oo Ool000=oo`03001oogoo00Aoo`80011oo`03O01oogoo0>Yoo`001goo00@007ooOol000Qoo`04001o ogoo0004Ool00`00Oomoo`03Ool00`00Oomoo`0>Ool00g`0Oomoo`3[Ool000Moo`04001oogoo0008 Ool01000Oomoo`000Woo00@007ooOol000Aoo`03001oogoo00ioo`03O01oogoo0>]oo`0027oo0P00 2Woo0P0017oo0P001Goo00<007ooOol03Woo00=l07ooOol0jgoo000QOol00`00Oomoo`0=Ool00g`0 Oomoo`3/Ool0025oo`8000ioo`03O01oogoo0>aoo`008Goo00<007ooOol037oo00=l07ooOol0kGoo 000QOol00`00Oomoo`0eoo`00 8Goo00<007ooOol02goo00=l07ooOol0kWoo000QOol00`00Oomoo`0;Ool00g`0Oomoo`3^Ool0025o o`8000aoo`03O01oogoo0>ioo`008Goo00<007ooOol02Woo00=l07ooOol0kgoo000QOol00`00Oomo o`0:Ool00g`0Oomoo`3_Ool0025oo`03001oogoo00Uoo`03O01oogoo0?1oo`008Goo00<007ooOol0 2Goo00=l07ooOol0l7oo000QOol2000:Ool00g`0Oomoo`3`Ool0025oo`03001oogoo00Qoo`03O01o ogoo0?5oo`008Goo00<007ooOol027oo00=l07ooOol0lGoo000QOol00`00Oomoo`08Ool00g`0Oomo o`3aOol0025oo`03001oogoo00Moo`03O01oogoo0?9oo`008Goo0P0027oo00=l07ooOol0lWoo000Q Ool00`00Oomoo`06Ool00g`0Oomoo`3cOol0025oo`03001oogoo00Ioo`03O01oogoo0?=oo`000Woo 0P0017oo0P0017oo0P000goo10000goo0P001Goo00<007ooOol01Woo00=l07ooOol0lgoo00001Goo 001oogoo000027oo00@007ooOol0009oo`03001oogoo00=oo`04001oogoo0004Ool00`00Oomoo`05 Ool00g`0Oomoo`3dOol00005Ool007ooOol00008Ool01000Oomoo`000goo00<007ooOol01Goo00<0 07ooOol00Woo0P001Woo00=l07ooOol0m7oo00001Goo001oogoo000027oo00@007ooOol000Aoo`03 001oogoo009oo`8000Eoo`03001oogoo00Eoo`03O01oogoo0?Aoo`0000Eoo`00Oomoo`0000Qoo`04 001oogoo0002Ool01000Oomoo`000goo00<007ooOol017oo00<007ooOol017oo00=l07ooOol0mGoo 0002Ool2000:Ool20004Ool20004Ool30004Ool00`00Oomoo`04Ool00g`0Oomoo`3eOol0025oo`03 001oogoo00Aoo`03O01oogoo0?Eoo`008Goo0P001Goo00=l07ooOol0mGoo000QOol00`00Oomoo`03 Ool00g`0Oomoo`3fOol0025oo`03001oogoo00=oo`03O01oogoo0?Ioo`008Goo00<007ooOol00goo 00=l07ooOol0mWoo000QOol00`00Oomoo`02Ool00g`0Oomoo`3gOol0025oo`8000=oo`03O01oogoo 0?Moo`008Goo00<007ooOol00Woo00=l07ooOol0mgoo000QOol01@00OomoogooO000nWoo000QOol0 1@00OomoogooO000nWoo000QOol01@00OomoogooO000nWoo000QOol200000gooO01oo`3jOol0025o o`04001oogooO03kOol0025oo`04001oogooO03kOol0025oo`03001oog`00?aoo`008Goo00<007oo O000o7oo000QOol200000g`0Oomoo`3jOol0025oo`03001oog`00?aoo`008Goo00<007`0Ool0o7oo 000QOol00`00O01oo`3lOol000Qoo`8000Aoo`8000Aoo`8000Aoo`8000Eoo`03001l07oo0?aoo`00 1goo00@007ooOol000Qoo`04001oogoo0002Ool01000Oomoo`0017oo00=l07ooOol0o7oo0007Ool0 1000Oomoo`0027oo00@007ooOol000Aoo`03001oogoo00=oo`03O00007oo0?aoo`001goo00@007oo Ool000Qoo`04001oogoo0005Ool00`00Oomoo`3oOol2Ool000Moo`04001oogoo0008Ool01000Oomo o`000Woo00@007ooOol00?moo`Aoo`0027oo0P002Woo0P0017oo0P00ogoo1Goo003oOolQOol00?mo ob5oo`00\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-1.39508*^-08, -0.00331152, \ 4.21262*^-10, 0.000194748}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Danckwerts' solution:", "Subsubtitle", Background->RGBColor[1, 1, 0.666667]], Cell[CellGroupData[{ Cell[BoxData[ \(c = c0\ \((0.5\ Exp[\(-x\)\ \((k/D\_AB)\)^0.5]\ Erfc[ x/\((2\ \((t\ D\_AB)\)^0.5)\) - \((t\ k)\)^0.5] + 0.5\ Exp[x\ \((k/D\_AB)\)^0.5]\ Erfc[ x/\((2\ \((t\ D\_AB)\)^0.5)\) + \((t\ k)\)^0.5])\)\)], "Input"], Cell[BoxData[ \(3\/100\ \((0.5`\ \[ExponentialE]\^\(\(-152752.52316519467`\)\ x\)\ \ Erfc[\(-5.916079783099616`\)\ t\^0.5` + \(12909.944487358056`\ x\)\/t\^0.5`] \ + 0.5`\ \[ExponentialE]\^\(152752.52316519467`\ x\)\ Erfc[ 5.916079783099616`\ t\^0.5` + \(12909.944487358056`\ \ x\)\/t\^0.5`])\)\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell["\<\ plt2=Plot[Chop[c/.t->10^-7],{x,0,1 \ 10^-7},PlotRange->{0,0.03},PlotStyle->RGBColor[0,0,1]]\ \>", "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 9.52381e+006 -8.53809e-018 20.6011 [ [.21429 -0.0125 -16.5 -12.5 ] [.21429 -0.0125 16.5 0 ] [.40476 -0.0125 -16.5 -12.5 ] [.40476 -0.0125 16.5 0 ] [.59524 -0.0125 -16.5 -12.5 ] [.59524 -0.0125 16.5 0 ] [.78571 -0.0125 -16.5 -12.5 ] [.78571 -0.0125 16.5 0 ] [.97619 -0.0125 -16.5 -12.5 ] [.97619 -0.0125 16.5 0 ] [.01131 .10301 -30 -4.5 ] [.01131 .10301 0 4.5 ] [.01131 .20601 -24 -4.5 ] [.01131 .20601 0 4.5 ] [.01131 .30902 -30 -4.5 ] [.01131 .30902 0 4.5 ] [.01131 .41202 -24 -4.5 ] [.01131 .41202 0 4.5 ] [.01131 .51503 -30 -4.5 ] [.01131 .51503 0 4.5 ] [.01131 .61803 -24 -4.5 ] [.01131 .61803 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 0 m .21429 .00625 L s gsave .21429 -0.0125 -16.5 -10.5 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (2) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (-8) show grestore .40476 0 m .40476 .00625 L s gsave .40476 -0.0125 -16.5 -10.5 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (4) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (-8) show grestore .59524 0 m .59524 .00625 L s gsave .59524 -0.0125 -16.5 -10.5 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (6) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (-8) show grestore .78571 0 m .78571 .00625 L s gsave .78571 -0.0125 -16.5 -10.5 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (8) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (-8) show grestore .97619 0 m .97619 .00625 L s gsave .97619 -0.0125 -16.5 -10.5 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (1) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (-7) show grestore .125 Mabswid .07143 0 m .07143 .00375 L s .11905 0 m .11905 .00375 L s .16667 0 m .16667 .00375 L s .2619 0 m .2619 .00375 L s .30952 0 m .30952 .00375 L s .35714 0 m .35714 .00375 L s .45238 0 m .45238 .00375 L s .5 0 m .5 .00375 L s .54762 0 m .54762 .00375 L s .64286 0 m .64286 .00375 L s .69048 0 m .69048 .00375 L s .7381 0 m .7381 .00375 L s .83333 0 m .83333 .00375 L s .88095 0 m .88095 .00375 L s .92857 0 m .92857 .00375 L s .25 Mabswid 0 0 m 1 0 L s .02381 .10301 m .03006 .10301 L s [(0.005)] .01131 .10301 1 0 Mshowa .02381 .20601 m .03006 .20601 L s [(0.01)] .01131 .20601 1 0 Mshowa .02381 .30902 m .03006 .30902 L s [(0.015)] .01131 .30902 1 0 Mshowa .02381 .41202 m .03006 .41202 L s [(0.02)] .01131 .41202 1 0 Mshowa .02381 .51503 m .03006 .51503 L s [(0.025)] .01131 .51503 1 0 Mshowa .02381 .61803 m .03006 .61803 L s [(0.03)] .01131 .61803 1 0 Mshowa .125 Mabswid .02381 .0206 m .02756 .0206 L s .02381 .0412 m .02756 .0412 L s .02381 .0618 m .02756 .0618 L s .02381 .0824 m .02756 .0824 L s .02381 .12361 m .02756 .12361 L s .02381 .14421 m .02756 .14421 L s .02381 .16481 m .02756 .16481 L s .02381 .18541 m .02756 .18541 L s .02381 .22661 m .02756 .22661 L s .02381 .24721 m .02756 .24721 L s .02381 .26781 m .02756 .26781 L s .02381 .28842 m .02756 .28842 L s .02381 .32962 m .02756 .32962 L s .02381 .35022 m .02756 .35022 L s .02381 .37082 m .02756 .37082 L s .02381 .39142 m .02756 .39142 L s .02381 .43262 m .02756 .43262 L s .02381 .45322 m .02756 .45322 L s .02381 .47383 m .02756 .47383 L s .02381 .49443 m .02756 .49443 L s .02381 .53563 m .02756 .53563 L s .02381 .55623 m .02756 .55623 L s .02381 .57683 m .02756 .57683 L s .02381 .59743 m .02756 .59743 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 0 0 1 r .5 Mabswid .02381 .61803 m .06244 .50359 L .10458 .38589 L .14415 .2878 L .18221 .20824 L .22272 .14084 L .26171 .09224 L .28158 .07301 L .30316 .05585 L .34309 .03271 L .36292 .0246 L .38395 .01793 L .40349 .0132 L .42179 .00979 L .44203 .00694 L .46056 .00501 L .47954 .00354 L .49041 .00289 L .50027 .00239 L .51994 .00163 L .53074 .00131 L .54091 .00106 L .55068 .00087 L .56099 .0007 L .57946 .00047 L .58894 .00038 L .5991 .0003 L .61744 .0002 L .62761 .00016 L .63868 .00012 L .64824 9e-005 L .6588 7e-005 L .66831 6e-005 L .67857 4e-005 L .68941 3e-005 L .69958 3e-005 L .70915 2e-005 L .71962 2e-005 L .73055 1e-005 L .74072 1e-005 L .75124 1e-005 L .76118 0 L .77009 0 L .77976 0 L .78923 0 L .79964 0 L .81051 0 L .82068 0 L .83109 0 L .84097 0 L Mistroke .84984 0 L .85951 0 L .86985 0 L .87922 0 L .89003 0 L .9002 0 L .90999 0 L .92032 0 L .92914 0 L .93881 0 L .94826 0 L .95686 0 L .96679 0 L .97619 0 L Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgOol201n/Ool0 025oo`03001oogoo04aoo`807jioo`008Goo00<007ooOol0BWoo0P0O/7oo000QOol20019Ool201nb Ool0025oo`03001oogoo04Ioo`807kAoo`008Goo00<007ooOol0A7oo0P0O]Woo000QOol00`00Oomo o`12Ool201nhOol0025oo`03001oogoo045oo`0301moogoo0;Qoo`008Goo0P00@Goo00<07gooOol0 ^Goo000QOol00`00Oomoo`0oOol00`0OOomoo`2jOol0025oo`03001oogoo03ioo`0301moogoo0;]o o`008Goo00<007ooOol0?Goo00<07gooOol0_7oo000QOol00`00Oomoo`0lOol00`0OOomoo`2mOol0 025oo`8003aoo`0301moogoo0;ioo`008Goo00<007ooOol0>Woo00<07gooOol0_goo000QOol00`00 Oomoo`0iOol00`0OOomoo`30Ool0009oo`8000Aoo`8000Aoo`8000Aoo`8000Aoo`8000Eoo`03001o ogoo03Qoo`0301moogoo0<5oo`0000Eoo`00Oomoo`0000Qoo`04001oogoo0002Ool01000Oomoo`00 0Woo00@007ooOol000Aoo`03001oogoo03Moo`0301moogoo0<9oo`0000Eoo`00Oomoo`0000Qoo`04 001oogoo0002Ool01000Oomoo`001Goo00<007ooOol00Woo0P00=goo00<07gooOol0`goo00001Goo 001oogoo000027oo00@007ooOol0009oo`04001oogoo0003Ool20005Ool00`00Oomoo`0eOol00`0O Oomoo`34Ool00005Ool007ooOol00008Ool01000Oomoo`000Woo00@007ooOol000=oo`03001oogoo 00Aoo`03001oogoo03Eoo`0301moogoo05oo`0000Eoo`00Oomoo`0000Qo o`04001oogoo0004Ool00`00Oomoo`02Ool00`00Oomoo`04Ool00`00Oomoo`0HOol00`0OOomoo`3Q Ool0009oo`8000Yoo`8000Aoo`8000Aoo`<000Aoo`03001oogoo01Moo`0301moogoo0>9oo`008Goo 00<007ooOol05goo00<07gooOol0hWoo000QOol2000HOol00`0OOomoo`3ROol0025oo`03001oogoo 01Ioo`0301moogoo0>=oo`008Goo00<007ooOol05Woo00<07gooOol0hgoo000QOol00`00Oomoo`0E Ool00`0OOomoo`3TOol0025oo`03001oogoo01Eoo`0301moogoo0>Aoo`008Goo0P005Woo00<07goo Ool0i7oo000QOol00`00Oomoo`0DOol00`0OOomoo`3UOol0025oo`03001oogoo01Aoo`0301moogoo 0>Eoo`008Goo00<007ooOol04goo00<07gooOol0iWoo000QOol00`00Oomoo`0COol00`0OOomoo`3V Ool0025oo`8001Aoo`0301moogoo0>Ioo`008Goo00<007ooOol04Woo00<07gooOol0igoo000QOol0 0`00Oomoo`0BOol00`0OOomoo`3WOol0025oo`03001oogoo015oo`0301moogoo0>Qoo`008Goo00<0 07ooOol04Goo00<07gooOol0j7oo000QOol2000BOol00`0OOomoo`3XOol0025oo`03001oogoo011o o`0301moogoo0>Uoo`008Goo00<007ooOol047oo00<07gooOol0jGoo0008Ool20004Ool20004Ool2 0003Ool40004Ool00`00Oomoo`0?Ool00`0OOomoo`3ZOol000Moo`04001oogoo0008Ool01000Oomo o`000Woo00<007ooOol01Goo00<007ooOol03goo00<07gooOol0jWoo0007Ool01000Oomoo`0027oo 00@007ooOol000=oo`03001oogoo00Aoo`80011oo`0301moogoo0>Yoo`001goo00@007ooOol000Qo o`04001oogoo0004Ool00`00Oomoo`03Ool00`00Oomoo`0>Ool00`0OOomoo`3[Ool000Moo`04001o ogoo0008Ool01000Oomoo`000Woo00@007ooOol000Aoo`03001oogoo00ioo`0301moogoo0>]oo`00 27oo0P002Woo0P0017oo0P001Goo00<007ooOol03Woo00<07gooOol0jgoo000QOol00`00Oomoo`0= Ool00`0OOomoo`3/Ool0025oo`8000ioo`0301moogoo0>aoo`008Goo00<007ooOol037oo00<07goo Ool0kGoo000QOol00`00Oomoo`0eoo`008Goo00<007ooOol02goo00<07gooOol0kWoo000QOol00`00Oomoo`0;Ool00`0OOomoo`3^ Ool0025oo`8000aoo`0301moogoo0>ioo`008Goo00<007ooOol02Woo00<07gooOol0kgoo000QOol0 0`00Oomoo`0:Ool00`0OOomoo`3_Ool0025oo`03001oogoo00Uoo`0301moogoo0?1oo`008Goo00<0 07ooOol02Goo00<07gooOol0l7oo000QOol2000:Ool00`0OOomoo`3`Ool0025oo`03001oogoo00Qo o`0301moogoo0?5oo`008Goo00<007ooOol027oo00<07gooOol0lGoo000QOol00`00Oomoo`08Ool0 0`0OOomoo`3aOol0025oo`03001oogoo00Moo`0301moogoo0?9oo`008Goo0P0027oo00<07gooOol0 lWoo000QOol00`00Oomoo`06Ool00`0OOomoo`3cOol0025oo`03001oogoo00Ioo`0301moogoo0?=o o`000Woo0P0017oo0P0017oo0P000goo10000goo0P001Goo00<007ooOol01Woo00<07gooOol0lgoo 00001Goo001oogoo000027oo00@007ooOol0009oo`03001oogoo00=oo`04001oogoo0004Ool00`00 Oomoo`05Ool00`0OOomoo`3dOol00005Ool007ooOol00008Ool01000Oomoo`000goo00<007ooOol0 1Goo00<007ooOol00Woo0P001Woo00<07gooOol0m7oo00001Goo001oogoo000027oo00@007ooOol0 00Aoo`03001oogoo009oo`8000Eoo`03001oogoo00Eoo`0301moogoo0?Aoo`0000Eoo`00Oomoo`00 00Qoo`04001oogoo0002Ool01000Oomoo`000goo00<007ooOol017oo00<007ooOol017oo00<07goo Ool0mGoo0002Ool2000:Ool20004Ool20004Ool30004Ool00`00Oomoo`04Ool00`0OOomoo`3eOol0 025oo`03001oogoo00Aoo`0301moogoo0?Eoo`008Goo0P001Goo00<07gooOol0mGoo000QOol00`00 Oomoo`03Ool00`0OOomoo`3fOol0025oo`03001oogoo00=oo`0301moogoo0?Ioo`008Goo00<007oo Ool00goo00<07gooOol0mWoo000QOol00`00Oomoo`02Ool00`0OOomoo`3gOol0025oo`8000=oo`03 01moogoo0?Moo`008Goo00<007ooOol00Woo00<07gooOol0mgoo000QOol01@00Oomoogoo01l0nWoo 000QOol01@00Oomoogoo01l0nWoo000QOol01@00Oomoogoo01l0nWoo000QOol200000goo01moo`3j Ool0025oo`04001oogoo01okOol0025oo`04001oogoo01okOol0025oo`03001oo`0O0?aoo`008Goo 00<007oo01l0o7oo000QOol200000`0OOomoo`3jOol0025oo`03001oo`0O0?aoo`008Goo00<0000O Ool0o7oo000QOol00`0001moo`3lOol000Qoo`8000Aoo`8000Aoo`8000Aoo`8000Eoo`0300007goo 0?aoo`001goo00@007ooOol000Qoo`04001oogoo0002Ool01000Oomoo`0017oo00<07gooOol0o7oo 0007Ool01000Oomoo`0027oo00@007ooOol000Aoo`03001oogoo00=oo`0301l007oo0?aoo`001goo 00@007ooOol000Qoo`04001oogoo0005Ool00`00Oomoo`3oOol2Ool000Moo`04001oogoo0008Ool0 1000Oomoo`000Woo00@007ooOol00?moo`Aoo`0027oo0P002Woo0P0017oo0P00ogoo1Goo003oOolQ Ool00?moob5oo`00\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-1.39508*^-08, -0.00331152, \ 4.21262*^-10, 0.000194748}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Both methods give the same concentration profile", "Subsubtitle", Background->RGBColor[1, 1, 0.666667]], Cell[CellGroupData[{ Cell["Show[plt1,plt2]", "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 9.52381e+006 -8.53809e-018 20.6011 [ [.21429 -0.0125 -16.5 -12.5 ] [.21429 -0.0125 16.5 0 ] [.40476 -0.0125 -16.5 -12.5 ] [.40476 -0.0125 16.5 0 ] [.59524 -0.0125 -16.5 -12.5 ] [.59524 -0.0125 16.5 0 ] [.78571 -0.0125 -16.5 -12.5 ] [.78571 -0.0125 16.5 0 ] [.97619 -0.0125 -16.5 -12.5 ] [.97619 -0.0125 16.5 0 ] [.01131 .10301 -30 -4.5 ] [.01131 .10301 0 4.5 ] [.01131 .20601 -24 -4.5 ] [.01131 .20601 0 4.5 ] [.01131 .30902 -30 -4.5 ] [.01131 .30902 0 4.5 ] [.01131 .41202 -24 -4.5 ] [.01131 .41202 0 4.5 ] [.01131 .51503 -30 -4.5 ] [.01131 .51503 0 4.5 ] [.01131 .61803 -24 -4.5 ] [.01131 .61803 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 0 m .21429 .00625 L s gsave .21429 -0.0125 -16.5 -10.5 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (2) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (-8) show grestore .40476 0 m .40476 .00625 L s gsave .40476 -0.0125 -16.5 -10.5 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (4) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (-8) show grestore .59524 0 m .59524 .00625 L s gsave .59524 -0.0125 -16.5 -10.5 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (6) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (-8) show grestore .78571 0 m .78571 .00625 L s gsave .78571 -0.0125 -16.5 -10.5 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (8) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (-8) show grestore .97619 0 m .97619 .00625 L s gsave .97619 -0.0125 -16.5 -10.5 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (1) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (-7) show grestore .125 Mabswid .07143 0 m .07143 .00375 L s .11905 0 m .11905 .00375 L s .16667 0 m .16667 .00375 L s .2619 0 m .2619 .00375 L s .30952 0 m .30952 .00375 L s .35714 0 m .35714 .00375 L s .45238 0 m .45238 .00375 L s .5 0 m .5 .00375 L s .54762 0 m .54762 .00375 L s .64286 0 m .64286 .00375 L s .69048 0 m .69048 .00375 L s .7381 0 m .7381 .00375 L s .83333 0 m .83333 .00375 L s .88095 0 m .88095 .00375 L s .92857 0 m .92857 .00375 L s .25 Mabswid 0 0 m 1 0 L s .02381 .10301 m .03006 .10301 L s [(0.005)] .01131 .10301 1 0 Mshowa .02381 .20601 m .03006 .20601 L s [(0.01)] .01131 .20601 1 0 Mshowa .02381 .30902 m .03006 .30902 L s [(0.015)] .01131 .30902 1 0 Mshowa .02381 .41202 m .03006 .41202 L s [(0.02)] .01131 .41202 1 0 Mshowa .02381 .51503 m .03006 .51503 L s [(0.025)] .01131 .51503 1 0 Mshowa .02381 .61803 m .03006 .61803 L s [(0.03)] .01131 .61803 1 0 Mshowa .125 Mabswid .02381 .0206 m .02756 .0206 L s .02381 .0412 m .02756 .0412 L s .02381 .0618 m .02756 .0618 L s .02381 .0824 m .02756 .0824 L s .02381 .12361 m .02756 .12361 L s .02381 .14421 m .02756 .14421 L s .02381 .16481 m .02756 .16481 L s .02381 .18541 m .02756 .18541 L s .02381 .22661 m .02756 .22661 L s .02381 .24721 m .02756 .24721 L s .02381 .26781 m .02756 .26781 L s .02381 .28842 m .02756 .28842 L s .02381 .32962 m .02756 .32962 L s .02381 .35022 m .02756 .35022 L s .02381 .37082 m .02756 .37082 L s .02381 .39142 m .02756 .39142 L s .02381 .43262 m .02756 .43262 L s .02381 .45322 m .02756 .45322 L s .02381 .47383 m .02756 .47383 L s .02381 .49443 m .02756 .49443 L s .02381 .53563 m .02756 .53563 L s .02381 .55623 m .02756 .55623 L s .02381 .57683 m .02756 .57683 L s .02381 .59743 m .02756 .59743 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 1 0 0 r .5 Mabswid .02381 .61803 m .06244 .50399 L .10458 .38579 L .14415 .28759 L .18221 .2082 L .22272 .14091 L .26171 .09206 L .28302 .07143 L .30316 .05551 L .34157 .03335 L .36141 .02525 L .38244 .0184 L .40197 .01346 L .42027 .00989 L .44052 .00695 L .45904 .00504 L .47803 .00363 L .49875 .00255 L .51842 .00175 L .5394 .00111 L .54968 .00087 L .56081 .00065 L .56592 .00057 L .57131 .00049 L .58098 .00039 L .59046 .00032 L .60062 .00026 L .61021 .00022 L .61895 .00019 L .6588 9e-005 L .67702 5e-005 L .68739 3e-005 L .69713 2e-005 L .70176 1e-005 L .70289 1e-005 L .70409 1e-005 L .70541 1e-005 L .70664 0 L .71199 0 L .7169 0 L s .7169 0 m .71788 0 L s .74744 0 m .74796 0 L .75719 0 L .7628 0 L .7681 0 L .77041 1e-005 L .77167 1e-005 L .77286 1e-005 L .77413 1e-005 L .77554 1e-005 L .77674 1e-005 L .77803 1e-005 L .77926 1e-005 L .7804 1e-005 L .78166 1e-005 L .78236 1e-005 L .783 1e-005 L .78429 1e-005 L .78569 1e-005 L .78823 1e-005 L .7906 1e-005 L .7931 1e-005 L .79757 1e-005 L .80755 0 L .8185 0 L s .8185 0 m .83625 0 L s .91696 0 m .9172 0 L .92803 0 L .9333 0 L .93808 0 L .94232 0 L .94455 0 L .9469 0 L .94811 1e-005 L .94943 1e-005 L .95063 1e-005 L .95175 1e-005 L .9529 1e-005 L .95395 1e-005 L .95516 1e-005 L .95631 1e-005 L .95745 1e-005 L .95871 1e-005 L .96002 0 L .96126 0 L .96346 0 L .96583 0 L .96847 0 L .97124 0 L .97619 0 L s 0 0 1 r .02381 .61803 m .06244 .50359 L .10458 .38589 L .14415 .2878 L .18221 .20824 L .22272 .14084 L .26171 .09224 L .28158 .07301 L .30316 .05585 L .34309 .03271 L .36292 .0246 L .38395 .01793 L .40349 .0132 L .42179 .00979 L .44203 .00694 L .46056 .00501 L .47954 .00354 L .49041 .00289 L .50027 .00239 L .51994 .00163 L .53074 .00131 L .54091 .00106 L .55068 .00087 L .56099 .0007 L .57946 .00047 L .58894 .00038 L .5991 .0003 L .61744 .0002 L .62761 .00016 L .63868 .00012 L .64824 9e-005 L .6588 7e-005 L .66831 6e-005 L .67857 4e-005 L .68941 3e-005 L .69958 3e-005 L .70915 2e-005 L .71962 2e-005 L .73055 1e-005 L .74072 1e-005 L .75124 1e-005 L .76118 0 L .77009 0 L .77976 0 L .78923 0 L .79964 0 L .81051 0 L .82068 0 L .83109 0 L .84097 0 L Mistroke .84984 0 L .85951 0 L .86985 0 L .87922 0 L .89003 0 L .9002 0 L .90999 0 L .92032 0 L .92914 0 L .93881 0 L .94826 0 L .95686 0 L .96679 0 L .97619 0 L Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg Ool201n/Ool0025oo`03001oogoo04aoo`807jioo`008Goo00<007ooOol0BWoo0P0O/7oo000QOol2 0019Ool201nbOol0025oo`03001oogoo04Ioo`807kAoo`008Goo00<007ooOol0A7oo0P0O]Woo000Q Ool00`00Oomoo`12Ool201nhOol0025oo`03001oogoo045oo`0301moogoo0;Qoo`008Goo0P00@7oo 00=l000OOol0^Woo000QOol00`00Oomoo`0nOol00g`001moo`2kOol0025oo`03001oogoo03eoo`03 O0007goo0;aoo`008Goo00<007ooOol0?7oo00=l000OOol0_Goo000QOol00`00Oomoo`0kOol00g`0 01moo`2nOol0025oo`8003]oo`03O0007goo0;moo`008Goo00<007ooOol0>Woo00<07gooOol0_goo 000QOol00`00Oomoo`0iOol00`0OOomoo`30Ool0009oo`8000Aoo`8000Aoo`8000Aoo`8000Aoo`80 00Eoo`03001oogoo03Qoo`0301moogoo0<5oo`0000Eoo`00Oomoo`0000Qoo`04001oogoo0002Ool0 1000Oomoo`000Woo00@007ooOol000Aoo`03001oogoo03Moo`0301moogoo0<9oo`0000Eoo`00Oomo o`0000Qoo`04001oogoo0002Ool01000Oomoo`001Goo00<007ooOol00Woo0P00=goo00<07gooOol0 `goo00001Goo001oogoo000027oo00@007ooOol0009oo`04001oogoo0003Ool20005Ool00`00Oomo o`0eOol00`0OOomoo`34Ool00005Ool007ooOol00008Ool01000Oomoo`000Woo00@007ooOol000=o o`03001oogoo00Aoo`03001oogoo03Eoo`0301moogoo05oo`0000Eoo`00 Oomoo`0000Qoo`04001oogoo0004Ool00`00Oomoo`02Ool00`00Oomoo`04Ool00`00Oomoo`0HOol0 0`0OOomoo`3QOol0009oo`8000Yoo`8000Aoo`8000Aoo`<000Aoo`03001oogoo01Moo`0301moogoo 0>9oo`008Goo00<007ooOol05goo00<07gooOol0hWoo000QOol2000HOol00`0OOomoo`3ROol0025o o`03001oogoo01Ioo`0301moogoo0>=oo`008Goo00<007ooOol05Woo00<07gooOol0hgoo000QOol0 0`00Oomoo`0EOol00`0OOomoo`3TOol0025oo`03001oogoo01Eoo`0301moogoo0>Aoo`008Goo0P00 5Woo00<07gooOol0i7oo000QOol00`00Oomoo`0DOol00`0OOomoo`3UOol0025oo`03001oogoo01Ao o`0301moogoo0>Eoo`008Goo00<007ooOol04goo00<07gooOol0iWoo000QOol00`00Oomoo`0COol0 0`0OOomoo`3VOol0025oo`8001Aoo`0301moogoo0>Ioo`008Goo00<007ooOol04Woo00<07gooOol0 igoo000QOol00`00Oomoo`0BOol00`0OOomoo`3WOol0025oo`03001oogoo015oo`0301moogoo0>Qo o`008Goo00<007ooOol04Goo00<07gooOol0j7oo000QOol2000BOol00`0OOomoo`3XOol0025oo`03 001oogoo011oo`0301moogoo0>Uoo`008Goo00<007ooOol047oo00<07gooOol0jGoo0008Ool20004 Ool20004Ool20003Ool40004Ool00`00Oomoo`0?Ool00`0OOomoo`3ZOol000Moo`04001oogoo0008 Ool01000Oomoo`000Woo00<007ooOol01Goo00<007ooOol03goo00<07gooOol0jWoo0007Ool01000 Oomoo`0027oo00@007ooOol000=oo`03001oogoo00Aoo`80011oo`0301moogoo0>Yoo`001goo00@0 07ooOol000Qoo`04001oogoo0004Ool00`00Oomoo`03Ool00`00Oomoo`0>Ool00`0OOomoo`3[Ool0 00Moo`04001oogoo0008Ool01000Oomoo`000Woo00@007ooOol000Aoo`03001oogoo00ioo`0301mo ogoo0>]oo`0027oo0P002Woo0P0017oo0P001Goo00<007ooOol03Woo00<07gooOol0jgoo000QOol0 0`00Oomoo`0=Ool00`0OOomoo`3/Ool0025oo`8000ioo`0301moogoo0>aoo`008Goo00<007ooOol0 37oo00<07gooOol0kGoo000QOol00`00Oomoo`0eoo`008Goo00<007ooOol02goo00<07gooOol0kWoo000QOol00`00Oomoo`0;Ool0 0`0OOomoo`3^Ool0025oo`8000aoo`0301moogoo0>ioo`008Goo00<007ooOol02Woo00<07gooOol0 kgoo000QOol00`00Oomoo`0:Ool00`0OOomoo`3_Ool0025oo`03001oogoo00Uoo`0301moogoo0?1o o`008Goo00<007ooOol02Goo00<07gooOol0l7oo000QOol2000:Ool00`0OOomoo`3`Ool0025oo`03 001oogoo00Qoo`0301moogoo0?5oo`008Goo00<007ooOol027oo00<07gooOol0lGoo000QOol00`00 Oomoo`08Ool00`0OOomoo`3aOol0025oo`03001oogoo00Moo`0301moogoo0?9oo`008Goo0P0027oo 00<07gooOol0lWoo000QOol00`00Oomoo`06Ool00`0OOomoo`3cOol0025oo`03001oogoo00Ioo`03 01moogoo0?=oo`000Woo0P0017oo0P0017oo0P000goo10000goo0P001Goo00<007ooOol01Woo00<0 7gooOol0lgoo00001Goo001oogoo000027oo00@007ooOol0009oo`03001oogoo00=oo`04001oogoo 0004Ool00`00Oomoo`05Ool00`0OOomoo`3dOol00005Ool007ooOol00008Ool01000Oomoo`000goo 00<007ooOol01Goo00<007ooOol00Woo0P001Woo00<07gooOol0m7oo00001Goo001oogoo000027oo 00@007ooOol000Aoo`03001oogoo009oo`8000Eoo`03001oogoo00Eoo`0301moogoo0?Aoo`0000Eo o`00Oomoo`0000Qoo`04001oogoo0002Ool01000Oomoo`000goo00<007ooOol017oo00<007ooOol0 17oo00<07gooOol0mGoo0002Ool2000:Ool20004Ool20004Ool30004Ool00`00Oomoo`04Ool00`0O Oomoo`3eOol0025oo`03001oogoo00Aoo`0301moogoo0?Eoo`008Goo0P001Goo00<07gooOol0mGoo 000QOol00`00Oomoo`03Ool00`0OOomoo`3fOol0025oo`03001oogoo00=oo`0301moogoo0?Ioo`00 8Goo00<007ooOol00goo00<07gooOol0mWoo000QOol00`00Oomoo`02Ool00`0OOomoo`3gOol0025o o`8000=oo`0301moogoo0?Moo`008Goo00<007ooOol00Woo00<07gooOol0mgoo000QOol01@00Oomo ogoo01l0nWoo000QOol01@00Oomoogoo01l0nWoo000QOol01@00Oomoogoo01l0nWoo000QOol20000 0goo01moo`3jOol0025oo`04001oogoo01okOol0025oo`04001oogoo01okOol0025oo`03001oo`0O 0?aoo`008Goo00<007oo01l0o7oo000QOol200000`0OOomoo`3jOol0025oo`03001oo`0O0?aoo`00 8Goo00<0000OOol0o7oo000QOol00`0001moo`3lOol000Qoo`8000Aoo`8000Aoo`8000Aoo`8000Eo o`0300007goo0?aoo`001goo00@007ooOol000Qoo`04001oogoo0002Ool01000Oomoo`0017oo00<0 7gooOol0o7oo0007Ool01000Oomoo`0027oo00@007ooOol000Aoo`03001oogoo00=oo`0301l007oo 0?aoo`001goo00@007ooOol000Qoo`04001oogoo0005Ool00`00Oomoo`3oOol2Ool000Moo`04001o ogoo0008Ool01000Oomoo`000Woo00@007ooOol00?moo`Aoo`0027oo0P002Woo0P0017oo0P00ogoo 1Goo003oOolQOol00?moob5oo`00\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-1.39508*^-08, -0.00331152, \ 4.21262*^-10, 0.000194748}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]] }, Closed]] }, Open ]] }, FrontEndVersion->"5.0 for Microsoft Windows", ScreenRectangle->{{0, 1024}, {0, 695}}, CellGrouping->Manual, WindowSize->{496, 537}, 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, 635, 20, 278, "Title"], Cell[2414, 75, 209, 3, 68, "Subsubtitle"], Cell[CellGroupData[{ Cell[2648, 82, 110, 1, 46, "Subsubtitle"], Cell[CellGroupData[{ Cell[2783, 87, 6167, 79, 60, 6071, 76, "GraphicsData", "Metafile", \ "Graphics"], Cell[8953, 168, 6509, 83, 92, 6411, 80, "GraphicsData", "Metafile", \ "Graphics"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[15511, 257, 163, 4, 68, "Subsubtitle"], Cell[15677, 263, 18923, 236, 135, 18828, 233, "GraphicsData", "Metafile", \ "Graphics"] }, Closed]], Cell[CellGroupData[{ Cell[34637, 504, 212, 6, 68, "Subsubtitle"], Cell[34852, 512, 60, 1, 30, "Input"], Cell[34915, 515, 22, 0, 30, "Input"], Cell[34940, 517, 28, 0, 30, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[35005, 522, 243, 7, 84, "Subsubtitle"], Cell[35251, 531, 24, 0, 30, "Input"], Cell[CellGroupData[{ Cell[35300, 535, 61, 1, 30, "Input"], Cell[35364, 538, 56, 1, 29, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[35457, 544, 60, 1, 30, "Input"], Cell[35520, 547, 56, 1, 29, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[35613, 553, 57, 1, 44, "Input"], Cell[35673, 556, 52, 1, 29, "Output"] }, Open ]], Cell[35740, 560, 25, 0, 30, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[35802, 565, 371, 13, 68, "Subsubtitle"], Cell[CellGroupData[{ Cell[36198, 582, 304, 6, 150, "Input"], Cell[36505, 590, 334, 10, 48, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[36876, 605, 125, 3, 66, "Input"], Cell[37004, 610, 14563, 433, 186, 4190, 301, "GraphicsData", "PostScript", \ "Graphics"], Cell[51570, 1045, 130, 3, 29, "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[51749, 1054, 84, 1, 48, "Subsubtitle"], Cell[CellGroupData[{ Cell[51858, 1059, 277, 5, 130, "Input"], Cell[52138, 1066, 326, 5, 76, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[52501, 1076, 113, 3, 48, "Input"], Cell[52617, 1081, 14325, 416, 186, 3968, 284, "GraphicsData", "PostScript", \ "Graphics"], Cell[66945, 1499, 130, 3, 29, "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[67124, 1508, 111, 1, 48, "Subsubtitle"], Cell[CellGroupData[{ Cell[67260, 1513, 32, 0, 30, "Input"], Cell[67295, 1515, 15308, 485, 186, 4914, 352, "GraphicsData", "PostScript", \ "Graphics"], Cell[82606, 2002, 130, 3, 29, "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[82785, 2011, 244, 7, 84, "Subsubtitle"], Cell[83032, 2020, 25, 0, 30, "Input"], Cell[CellGroupData[{ Cell[83082, 2024, 61, 1, 30, "Input"], Cell[83146, 2027, 56, 1, 29, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[83239, 2033, 60, 1, 30, "Input"], Cell[83302, 2036, 56, 1, 29, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[83395, 2042, 57, 1, 44, "Input"], Cell[83455, 2045, 56, 1, 29, "Output"] }, Open ]], Cell[83526, 2049, 25, 0, 30, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[83588, 2054, 371, 13, 68, "Subsubtitle"], Cell[CellGroupData[{ Cell[83984, 2071, 310, 6, 150, "Input"], Cell[84297, 2079, 337, 10, 48, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[84671, 2094, 126, 3, 66, "Input"], Cell[84800, 2099, 15365, 515, 186, 5868, 393, "GraphicsData", "PostScript", \ "Graphics"], Cell[100168, 2616, 130, 3, 29, "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[100347, 2625, 84, 1, 48, "Subsubtitle"], Cell[CellGroupData[{ Cell[100456, 2630, 277, 5, 130, "Input"], Cell[100736, 2637, 326, 5, 76, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[101099, 2647, 116, 3, 66, "Input"], Cell[101218, 2652, 14941, 482, 186, 5436, 360, "GraphicsData", "PostScript", \ "Graphics"], Cell[116162, 3136, 130, 3, 29, "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[116341, 3145, 111, 1, 48, "Subsubtitle"], Cell[CellGroupData[{ Cell[116477, 3150, 32, 0, 30, "Input"], Cell[116512, 3152, 16311, 582, 186, 6794, 460, "GraphicsData", "PostScript", \ "Graphics"], Cell[132826, 3736, 130, 3, 29, "Output"] }, Open ]] }, Closed]] }, Open ]] } ] *) (******************************************************************* End of Mathematica Notebook file. *******************************************************************)